ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   hide columns/rows/cells on open (https://www.excelbanter.com/excel-discussion-misc-queries/204235-hide-columns-rows-cells-open.html)

notso

hide columns/rows/cells on open
 
I want to automatically hide columns when the user opens a password protected
sheet or workbook. The users with the passwords sometimes leave the hidden
columns in unhidden when they save and close. How do I make sure that hidden
columns etc. are automatically hidden on all sheets when the workbook is
opened.

FSt1

hide columns/rows/cells on open
 
hi
you did say how many sheets or what columns to hide but here is the syntax...

Private Sub Workbook_Open()
Sheets("sheet1").Columns("C:C").EntireColumn.Hidde n = True
Sheets("sheet2").Columns("C:C").EntireColumn.Hidde n = True
End Sub

adjust to suit your data.
personally i would use the before save event and hidde on close instead of
open
might be just me.

Regards
FSt1
"notso" wrote:

I want to automatically hide columns when the user opens a password protected
sheet or workbook. The users with the passwords sometimes leave the hidden
columns in unhidden when they save and close. How do I make sure that hidden
columns etc. are automatically hidden on all sheets when the workbook is
opened.


Mike H

hide columns/rows/cells on open
 
remembering that if it's protected you would need to unprotect to do this

Sheets("Sheet3").Unprotect Password:="MyPass"
Sheets("sheet3").Columns("C:C").EntireColumn.Hidde n = True
Sheets("Sheet3").Protect Password:="MyPass"

Mike

"FSt1" wrote:

hi
you did say how many sheets or what columns to hide but here is the syntax...

Private Sub Workbook_Open()
Sheets("sheet1").Columns("C:C").EntireColumn.Hidde n = True
Sheets("sheet2").Columns("C:C").EntireColumn.Hidde n = True
End Sub

adjust to suit your data.
personally i would use the before save event and hidde on close instead of
open
might be just me.

Regards
FSt1
"notso" wrote:

I want to automatically hide columns when the user opens a password protected
sheet or workbook. The users with the passwords sometimes leave the hidden
columns in unhidden when they save and close. How do I make sure that hidden
columns etc. are automatically hidden on all sheets when the workbook is
opened.


FSt1

hide columns/rows/cells on open
 
opps.
forgot about that part.
thanks mike

regards
FSt1

"Mike H" wrote:

remembering that if it's protected you would need to unprotect to do this

Sheets("Sheet3").Unprotect Password:="MyPass"
Sheets("sheet3").Columns("C:C").EntireColumn.Hidde n = True
Sheets("Sheet3").Protect Password:="MyPass"

Mike

"FSt1" wrote:

hi
you did say how many sheets or what columns to hide but here is the syntax...

Private Sub Workbook_Open()
Sheets("sheet1").Columns("C:C").EntireColumn.Hidde n = True
Sheets("sheet2").Columns("C:C").EntireColumn.Hidde n = True
End Sub

adjust to suit your data.
personally i would use the before save event and hidde on close instead of
open
might be just me.

Regards
FSt1
"notso" wrote:

I want to automatically hide columns when the user opens a password protected
sheet or workbook. The users with the passwords sometimes leave the hidden
columns in unhidden when they save and close. How do I make sure that hidden
columns etc. are automatically hidden on all sheets when the workbook is
opened.


notso

hide columns/rows/cells on open
 
Thank you. Is the same true if I hade on close? I tried this and decided not
to because the user is prompted to save the document and if they don't save
it, then the columns are not hidden when they re-open. Plus if the user does
not change anything I don't want them to get confused when the work book asks
them whether or not they want to save. If you can send me the code to hide
on close with the characteristics outlined above, that would be great!
Thanks!

"Mike H" wrote:

remembering that if it's protected you would need to unprotect to do this

Sheets("Sheet3").Unprotect Password:="MyPass"
Sheets("sheet3").Columns("C:C").EntireColumn.Hidde n = True
Sheets("Sheet3").Protect Password:="MyPass"

Mike

"FSt1" wrote:

hi
you did say how many sheets or what columns to hide but here is the syntax...

Private Sub Workbook_Open()
Sheets("sheet1").Columns("C:C").EntireColumn.Hidde n = True
Sheets("sheet2").Columns("C:C").EntireColumn.Hidde n = True
End Sub

adjust to suit your data.
personally i would use the before save event and hidde on close instead of
open
might be just me.

Regards
FSt1
"notso" wrote:

I want to automatically hide columns when the user opens a password protected
sheet or workbook. The users with the passwords sometimes leave the hidden
columns in unhidden when they save and close. How do I make sure that hidden
columns etc. are automatically hidden on all sheets when the workbook is
opened.



All times are GMT +1. The time now is 07:23 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com