LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 81
Default Code to hide columns problem

Hi,
not very elegent but should do the job, stick it all in the click
event of the check box

x = ActiveSheet.Name

If CheckBox1.Value = True Then

Sheets("DomShip").Activate
Sheets("DomShip").Range("A:D").Select
Selection.EntireColumn.Hidden = True
Sheets("ConShip").Activate
Sheets("ConShip").Range("A:D").Select
Selection.EntireColumn.Hidden = True
Sheets("IntShip").Activate
Sheets("IntShip").Range("A:D").Select
Selection.EntireColumn.Hidden = True
Sheets("FinShip").Activate
Sheets("FinShip").Range("A:D").Select
Selection.EntireColumn.Hidden = True


Else

Sheets("DomShip").Activate
Sheets("DomShip").Range("A:D").Select
Selection.EntireColumn.Hidden = False
Sheets("ConShip").Activate
Sheets("ConShip").Range("A:D").Select
Selection.EntireColumn.Hidden = False
Sheets("IntShip").Activate
Sheets("IntShip").Range("A:D").Select
Selection.EntireColumn.Hidden = False
Sheets("FinShip").Activate
Sheets("FinShip").Range("A:D").Select
Selection.EntireColumn.Hidden = False

End If

Sheets(x).Activate
Sheets(x).Range("F1").Select


good luck
ross
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
vb code to hide columns pm tlb Excel Discussion (Misc queries) 4 May 28th 09 09:36 AM
Want to Hide columns in spreadsheet but NOT hide data in chart. KrispyData Charts and Charting in Excel 1 March 20th 09 04:45 PM
Hide columns code jlclyde Excel Discussion (Misc queries) 0 April 25th 08 03:17 PM
hide code does not hide Wanna Learn Excel Discussion (Misc queries) 2 March 6th 08 07:21 PM
Hide Columns before Print problem Stuart[_5_] Excel Programming 0 August 1st 03 08:00 PM


All times are GMT +1. The time now is 04:59 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"