Check if a column is hidden or visible in VBA

's Computer Specifications

I have some VBA code which copies part of a spreadsheet to a new workbook,
when i copy it i need to be able to check if a column has been hidden or not,
if it has been hidden then i need to hide the same column on the new sheet.

e.g. If column F is hidden on the current sheet then hide column F on the
new workbook.

I am using Excel 2000.

's Computer Specifications

Can you please post up the code as it currently is?

Stephen C wrote:
> I have some VBA code which copies part of a spreadsheet to a new workbook,
> when i copy it i need to be able to check if a column has been hidden or not,
> if it has been hidden then i need to hide the same column on the new sheet.
>
> e.g. If column F is hidden on the current sheet then hide column F on the
> new workbook.
>
> I am using Excel 2000.

's Computer Specifications

Just tweak this until it fits your specific needs:

Sub HiddenColumns()
Dim i As Long

For i = 1 To 256
Workbooks("Workbook1").Sheets("Sheet1").Columns(i).Hidden =
Workbooks("Workbook1").Sheets("Sheet1").Columns(i).Hidden
Next i

End Sub

------
Cheers,
Anony

"Stephen C" wrote:

> I have some VBA code which copies part of a spreadsheet to a new workbook,
> when i copy it i need to be able to check if a column has been hidden or not,
> if it has been hidden then i need to hide the same column on the new sheet.
>
> e.g. If column F is hidden on the current sheet then hide column F on the
> new workbook.
>
> I am using Excel 2000.

's Computer Specifications

Just a little tweak and it works fine.

Thank you

"Anony" wrote:

> Just tweak this until it fits your specific needs:
>
> Sub HiddenColumns()
> Dim i As Long
>
> For i = 1 To 256
> Workbooks("Workbook1").Sheets("Sheet1").Columns(i).Hidden =
> Workbooks("Workbook1").Sheets("Sheet1").Columns(i).Hidden
> Next i
>
> End Sub
>
> ------
> Cheers,
> Anony
>
>
> "Stephen C" wrote:
>
> > I have some VBA code which copies part of a spreadsheet to a new workbook,
> > when i copy it i need to be able to check if a column has been hidden or not,
> > if it has been hidden then i need to hide the same column on the new sheet.
> >
> > e.g. If column F is hidden on the current sheet then hide column F on the
> > new workbook.
> >
> > I am using Excel 2000.

Thread Tools
Show Printable Version Email this Page
Rate This Thread
Rate This Thread:

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Hidden column is visible on reload	ArunDhaJ	Microsoft C# .NET	1	21st May 2010 02:35 PM
Check Control if Visible or hidden	Abe Katz	Microsoft Access Forms	1	4th Mar 2010 10:10 PM
Events - controls visible/hidden depending on a check box	=?Utf-8?B?TmV3S2lkb250aGVCbG9jaw==?=	Microsoft Access Form Coding	2	8th Aug 2006 02:02 PM
Summing visible column values but not hidden column values	=?Utf-8?B?Qlc=?=	Microsoft Excel Misc	2	2nd Nov 2004 06:32 PM
Check status row (hidden or visible)?	Martin Los	Microsoft Excel Programming	1	18th Dec 2003 03:32 PM