Look at the "Thisworkbook" module in the VB Editor.
Notice that in the Hide...xlsm workbook, this module has the Workbook_Open 
event macro?
Your testing.xlsm workbook doesn't have this.
I noticed that you've added an Auto_Open macro.this is also an option.You could 
simply add  a call to HideAllSheets to this macro before the Msgbox line. 
Paul-----------------------------------------
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
----------------------------------------- 

    On Thursday, December 15, 2016 7:43 AM, Vijayendra Rao 
<vijayendrar...@gmail.com> wrote:
 

 Dear Paul,
I am facing one issue here, I try to use the macros to my other file by using 
you have provided macros. It is not hide when I open second time. I am not sure 
where I made a mistake or do I need to change any settings. Can you please help 
on the same.
Attached are the both the files. "Hide & unhilde - 2nd page" is the macro 
provided by you and "TESTING - 001" is my file.
Regards,Vijayendra

2016-12-13 18:24 GMT+05:30 Vijayendra Rao <vijayendrar...@gmail.com>:

Thanks Paul for your help, it is working fine. You saved my lot of time.
Thank you again.
Regards,Vijayendra
2016-12-13 17:41 GMT+05:30 Paul Schreiner <schreiner_p...@att.net>:

I'd suggest changing the HideAllSheets macro to first display the "read" sheet 
(what you called "guidelines"?)then hide everything EXCEPT the "read" sheet.
Like:
Sub HideAllSheets()
    Dim wsSheet As Worksheet
    Sheets("read").Visible = True
    For Each wsSheet In ActiveWorkbook.Worksheets
        If wsSheet.Name <> "read" Then
            wsSheet.Visible = xlSheetHidden
        End If
    Next wsSheet
End Sub
 Paul------------------------------ -----------
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
------------------------------ ----------- 

    On Tuesday, December 13, 2016 1:45 AM, karleenbiggs via MS EXCEL AND VBA 
MACROS <excel-macros@googlegroups.com > wrote:
 

 
------------------------------ --------------
On Tue, 12/13/16, ileanakeating via MS EXCEL AND VBA MACROS 
<excel-macros@googlegroups.com > wrote:

 Subject: Re: $$Excel-Macros$$ Excel Sheet Hide and Unhide
 To: excel-macros@googlegroups.com
 Date: Tuesday, December 13, 2016, 8:27 AM
 
 
 ------------------------------ --------------
 On Tue, 12/13/16, Vijayendra Rao <vijayendrar...@gmail.com>
 wrote:
 
  Subject: Re: $$Excel-Macros$$ Excel Sheet Hide and Unhide
  To: excel-macros@googlegroups.com
  Date: Tuesday, December 13, 2016, 3:50 AM
  
  Thanks Paul for quick
  help, it fulfilled my most of the requirement. One last
  favor, Now while opening last saved sheet only visible and
  guidelines sheet is hide , is it possible to view only
 first
  sheet (sheet name read) of the file.
  Regards,Vijayendra
  2016-12-12 18:52
  GMT+05:30 Paul Schreiner <schreiner_p...@att.net>:
  There's
  nothing that is "automatic".
  Attached
  uses a Workbook_open event macro to hide the sheets when
  you OPEN the document.
  That way, it doesn't matter whether the
  sheets are visible or not when the file is saved, but
  it will hide the sheets when it's opened.
  
  Paul-------------------------- ----
  -----------
  “Do
  all the good you can,
  By all the means you can,
  In all the ways you can,
  In all the places you can,
  At all the times you can,
  To all the people you can,
  As long as ever you can.” - John Wesley
  ------------------------------
  -----------
  
  
   
    On Monday, December 12, 2016 7:50 AM,
  karleenbiggs via MS EXCEL AND VBA MACROS <excel-macros@googlegroups.com
  > wrote:
    
  
   
  ------------------------------ --------------
  On Mon, 12/12/16, Vijayendra Rao <vijayendrar...@gmail.com>
  wrote:
  
   Subject: Re: $$Excel-Macros$$ Excel Sheet Hide and
 Unhide
   To: excel-macros@googlegroups.com
   Date: Monday, December 12, 2016, 2:43 PM
   
   Thanks Paul for quick
   guidance.
   This file is used by many people and they are
   working without reading few guidelines from first
 sheet.
   There may be chances of not using the sheet_hide
 macro
   option by other user. Is there any macros which
   automatically hide those sheets when close the file.
   Attached is the my workbook.
   Regards,Vijayendra
   2016-12-12 17:46
   GMT+05:30 Paul Schreiner <schreiner_p...@att.net>:
   Just
   as you created a macro to "unhide" the sheets,
  you
   need to create a macro to hide them.
   Additionally,
   you can create a BeforeSave event to check to see if
 the
   sheets are displayed.Then
   execute your "Sheets_Hide" macro to hide the
   sheets before saving (that
   way the sheets are always hidden before saving the
   file)
   Note:
   Using a macro, you can use .Visible =
 xlVeryHiddenwhich
  will hide the sheets and they will not show
   up when trying to manually unhide the sheets!
   Paul-------------------------- ----
   -----------
   “Do
   all the good you can,
   By all the means you can,
   In all the ways you can,
   In all the places you can,
   At all the times you can,
   To all the people you can,
   As long as ever you can.” - John Wesley
   ------------------------------
   ----------- 
   
    
     On Monday, December 12, 2016 7:04 AM, Vijayendra
   Rao <vijayendrar...@gmail.com>
   wrote:
     
   
    Hi Experts,
   I have created one excel file and except one
   sheet all sheets are hided. I have added shape button
 in
   first sheet to unhide all the sheets with the help
 of
  macro.
   When i worked and saved all sheets will be visible
 when I
   opened again. Is it possible to remain hide those
 sheets
   after saving the file.
   Request you to help on the same.-- 
    
   
   Regards,
   Vijayendra
   94491 67631
   
   
   
   
   -- 
   
   Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And
 do you
   wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
   Facebook page of this forum @ https://www.facebook.com/
   discussexcel
   
    
   
   FORUM RULES
   
    
   
   1) Use concise, accurate thread titles. Poor thread
  titles,
   like Please Help, Urgent, Need Help, Formula Problem,
 Code
   Problem, and Need Advice will not get quick attention
 or
  may
   not be answered.
   
   2) Don't post a question in the thread of another
   member.
   
   3) Don't post questions regarding breaking or
  bypassing
   any security measure.
   
   4) Acknowledge the responses you receive, good or
 bad.
   
   5) Jobs posting is not allowed.
   
   6) Sharing copyrighted material and their links is
 not
   allowed.
   
    
   
   NOTE  : Don't ever post confidential data in a
  workbook.
   Forum owners and members are not responsible for any
 loss.
   
   --- 
   
   You received this message because you are subscribed
 to
  the
   Google Groups "MS EXCEL AND VBA MACROS" group.
   
   To unsubscribe from this group and stop receiving
 emails
   from it, send an email to excel-macros+unsubscribe@
   googlegroups.com.
   
   To post to this group, send email to excel-macros@googlegroups.com.
   
   Visit this group at https://groups.google.com/
   group/excel-macros.
   
   For more options, visit https://groups.google.com/d/
   optout.
   
   
        
   
   
   
   -- 
   
   Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And
 do you
   wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
   Facebook page of this forum @ https://www.facebook.com/
   discussexcel
   
    
   
   FORUM RULES
   
    
   
   1) Use concise, accurate thread titles. Poor thread
  titles,
   like Please Help, Urgent, Need Help, Formula Problem,
 Code
   Problem, and Need Advice will not get quick attention
 or
  may
   not be answered.
   
   2) Don't post a question in the thread of another
   member.
   
   3) Don't post questions regarding breaking or
  bypassing
   any security measure.
   
   4) Acknowledge the responses you receive, good or
 bad.
   
   5) Jobs posting is not allowed.
   
   6) Sharing copyrighted material and their links is
 not
   allowed.
   
    
   
   NOTE  : Don't ever post confidential data in a
  workbook.
   Forum owners and members are not responsible for any
 loss.
   
   --- 
   
   You received this message because you are subscribed
 to
  the
   Google Groups "MS EXCEL AND VBA MACROS" group.
   
   To unsubscribe from this group and stop receiving
 emails
   from it, send an email to excel-macros+unsubscribe@
   googlegroups.com.
   
   To post to this group, send email to excel-macros@googlegroups.com.
   
   Visit this group at https://groups.google.com/
   group/excel-macros.
   
   For more options, visit https://groups.google.com/d/
   optout.
   
   
   
   
   -- 
   ಧನ್ಯವಾದಗಳು,
   ವಿಜಯೇಂದ್ರ,
   ೯೪೪೯೧ ೬೭೬೩೧
    
   Regards,
   Vijayendra
   94491 67631
   
   
   
   
   -- 
   
   Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And
 do you
   wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
   Facebook page of this forum @ https://www.facebook.com/
  discussexcel
   
    
   
   FORUM RULES
   
    
   
   1) Use concise, accurate thread titles. Poor thread
  titles,
   like Please Help, Urgent, Need Help, Formula Problem,
 Code
   Problem, and Need Advice will not get quick attention
 or
  may
   not be answered.
   
   2) Don't post a question in the thread of another
   member.
   
   3) Don't post questions regarding breaking or
  bypassing
   any security measure.
   
   4) Acknowledge the responses you receive, good or
 bad.
   
   5) Jobs posting is not allowed.
   
   6) Sharing copyrighted material and their links is
 not
   allowed.
   
    
   
   NOTE  : Don't ever post confidential data in a
  workbook.
   Forum owners and members are not responsible for any
 loss.
   
   --- 
   
   You received this message because you are subscribed
 to
  the
   Google Groups "MS EXCEL AND VBA MACROS" group.
   
   To unsubscribe from this group and stop receiving
 emails
   from it, send an email to excel-macros+unsubscribe@
  googlegroups.com.
   
   To post to this group, send email to excel-macros@googlegroups.com.
   
   Visit this group at https://groups.google.com/
  group/excel-macros.
   
   For more options, visit https://groups.google.com/d/
  optout.
   age 22 of 131agenie -am anunat lui Rosetti plecarea
 mea i 
  daca n-am plecat  d-ta vei crede ca nu-s aa de nebun sa
 fi
  stat numai de flori de cuc aici. 1. Agenia diplomatica a
  Romaniei la Berlin - un fel de ambasada  pe cand Romania
 nu
  era inca independenta  acolo a lucrat Eminescu in anii
  studeniei berlineze. 2. napoleon - moneda franceza de aur
 in
  valoare de 20 de franci  creata de Napoleon I dar ramasa
 in
  circulaie  cu efigia schimbata  pana la primul razboi
  mondial. 3. Curtea de Casaie  azi inalta Curte de Casaie
 i
  Justiie  - tribunal suprem care poate anula sentinele ori
  judecaile altor tribunale.  sursa: DEX online  4.
  Kretzulescu  Creulescu  Kreulescu  - om politic 
  succesorul lui Theodor Rosetti in funcia de agent
 diplomatic
  al Romaniei la Berlin  l-a motenit de la acela i pe
  Eminescu ca secretar particular. 5. Lipsca - vechea
 denumire
  romaneasca  provenita din limbile slave  a oraului
  Leipzig. De la Iai [tatalui sau  in 4 16 nov. 1874  la
 24
  de ani] Iai  in 4 16 noiemvrie 874 Iubite Tata  erban 
 a
  dupa cum prevazusem  e alienat i totodata in stadiu
 foarte
  greu a boalei de plamani. inca inainte de-a intra in
  spital  imi scrie d. secretar 1 al ageniei  se observara
  semne de alienaiune a minii  care insa  crescand din ce
 in
  ce  au ajuns la un grad foarte mare. intreinerea sa in
  spital costa opt napoleoni pe luna  suma de care eu nu
  dispun. D-nul Kreulescu se-nelege ca nu poate lua asupra-i
 o
  asemenea sarcina  dei pan-acum au avut toate ingrijirile
  putincioase pentru insul. Va rog a-mi raspunde grabnic ce
  putei face i daca-i putei trimite cel puin pe doua luni
  deocamdata. Sa-mi spunei i cum stau toate acasa i sa
 tainuii
  mamei cuprinsul scrisorii mele. Ministrul Cultelor 2 a
 fost
  in Iai. El tia deja 22 Page 22 of 131
  
  -- 
  Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
  wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
  Facebook page of this forum @ https://www.facebook.com/
  discussexcel
  
  FORUM RULES
  
  1) Use concise, accurate thread titles. Poor thread
 titles,
  like Please Help, Urgent, Need Help, Formula Problem, Code
  Problem, and Need Advice will not get quick attention or
 may
  not be answered.
  2) Don't post a question in the thread of another
  member.
  3) Don't post questions regarding breaking or bypassing
  any security measure.
  4) Acknowledge the responses you receive, good or bad.
  5) Jobs posting is not allowed.
  6) Sharing copyrighted material and their links is not
  allowed.
  
  NOTE  : Don't ever post confidential data in a
  workbook. Forum owners and members are not responsible for
  any loss.
  --- 
  You received this message because you are subscribed to
 the
  Google Groups "MS EXCEL AND VBA MACROS" group.
  To unsubscribe from this group and stop receiving emails
  from it, send an email to excel-macros+unsubscribe@
  googlegroups.com.
  To post to this group, send email to excel-macros@googlegroups.com.
  Visit this group at https://groups.google.com/
  group/excel-macros.
  For more options, visit https://groups.google.com/d/
  optout.
  
       
  
  
  
  -- 
  
  Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
  wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
  Facebook page of this forum @ https://www.facebook.com/
  discussexcel
  
   
  
  FORUM RULES
  
   
  
  1) Use concise, accurate thread titles. Poor thread
 titles,
  like Please Help, Urgent, Need Help, Formula Problem, Code
  Problem, and Need Advice will not get quick attention or
 may
  not be answered.
  
  2) Don't post a question in the thread of another
  member.
  
  3) Don't post questions regarding breaking or bypassing
  any security measure.
  
  4) Acknowledge the responses you receive, good or bad.
  
  5) Jobs posting is not allowed.
  
  6) Sharing copyrighted material and their links is not
  allowed.
  
   
  
  NOTE  : Don't ever post confidential data in a
 workbook.
  Forum owners and members are not responsible for any loss.
  
  --- 
  
  You received this message because you are subscribed to
 the
  Google Groups "MS EXCEL AND VBA MACROS" group.
  
  To unsubscribe from this group and stop receiving emails
  from it, send an email to excel-macros+unsubscribe@
  googlegroups.com.
  
  To post to this group, send email to excel-macros@googlegroups.com.
  
  Visit this group at https://groups.google.com/
  group/excel-macros.
  
  For more options, visit https://groups.google.com/d/
  optout.
  
  
  
  
  -- 
  ಧನ್ಯವಾದಗಳು,
  ವಿಜಯೇಂದ್ರ,
  ೯೪೪೯೧ ೬೭೬೩೧
   
  Regards,
  Vijayendra
  94491 67631
  
  
  
  
  -- 
  
  Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
  wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
  Facebook page of this forum @ https://www.facebook.com/discu ssexcel
  
   
  
  FORUM RULES
  
   
  
  1) Use concise, accurate thread titles. Poor thread
 titles,
  like Please Help, Urgent, Need Help, Formula Problem, Code
  Problem, and Need Advice will not get quick attention or
 may
  not be answered.
  
  2) Don't post a question in the thread of another
  member.
  
  3) Don't post questions regarding breaking or bypassing
  any security measure.
  
  4) Acknowledge the responses you receive, good or bad.
  
  5) Jobs posting is not allowed.
  
  6) Sharing copyrighted material and their links is not
  allowed.
  
   
  
  NOTE  : Don't ever post confidential data in a
 workbook.
  Forum owners and members are not responsible for any loss.
  
  --- 
  
  You received this message because you are subscribed to
 the
  Google Groups "MS EXCEL AND VBA MACROS" group.
  
  To unsubscribe from this group and stop receiving emails
  from it, send an email to excel-macros+unsubscribe@googl egroups.com.
  
  To post to this group, send email to excel-macros@googlegroups.com.
  
  Visit this group at
 https://groups.google.com/grou p/excel-macros.
  
  For more options, visit
 https://groups.google.com/d/op tout.
  n acelasi timp  adoptarea Codului Calimah 
 1817   in Moldova  si a Legiuirii
 Caragea  in tara Romaneasca 
 1818   dupa numele penultimilor domni
 fanarioti  inspirate din Codul civil austriac  din
 1811  si Codul napoleonian  inscriau in
 modernitate legislatia romaneasca.
 
 -- 
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you
 wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official
 Facebook page of this forum @ https://www.facebook.com/discu ssexcel
 
 FORUM RULES
 
 1) Use concise, accurate thread titles. Poor thread titles,
 like Please Help, Urgent, Need Help, Formula Problem, Code
 Problem, and Need Advice will not get quick attention or may
 not be answered.
 2) Don't post a question in the thread of another member.
 3) Don't post questions regarding breaking or bypassing any
 security measure.
 4) Acknowledge the responses you receive, good or bad.
 5) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not
 allowed.
 
 NOTE  : Don't ever post confidential data in a
 workbook. Forum owners and members are not responsible for
 any loss.
 --- 
 You received this message because you are subscribed to the
 Google Groups "MS EXCEL AND VBA MACROS" group.
 To unsubscribe from this group and stop receiving emails
 from it, send an email to excel-macros+unsubscribe@googl egroups.com.
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at
 https://groups.google.com/grou p/excel-macros.
 For more options, visit
 https://groups.google.com/d/op tout.pr 28 mai - Legea privind organizarea 
armei militare

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discu ssexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscribe@googl egroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/grou p/excel-macros.
For more options, visit https://groups.google.com/d/op tout.

   -- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discu ssexcel
 
FORUM RULES
 
1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
 
NOTE : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscribe@googl egroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/grou p/excel-macros.
For more options, visit https://groups.google.com/d/op tout.




-- 
ಧನ್ಯವಾದಗಳು,ವಿಜಯೇಂದ್ರ,೯೪೪೯೧ ೬೭೬೩೧ Regards,
Vijayendra
94491 67631



-- 
ಧನ್ಯವಾದಗಳು,ವಿಜಯೇಂದ್ರ,೯೪೪೯೧ ೬೭೬೩೧ Regards,
Vijayendra
94491 67631-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel
 
FORUM RULES
 
1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
 
NOTE : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


   

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.

Reply via email to