HIDING ROWS AND COLUMNS

[cpc]

Using Excel XP. If I highlight a column, right click and select hide, the column hides
completly. Is there a way to create a one or two key stroke function, or is there a function, that would allow the un-hiding of a specific column to a specific width?

[James]

Hi cpc,

Heres an example, change to suit:

Sub UnhideColumn()
If Columns("D").EntireColumn.Hidden = True Then
Selection.EntireColumn.Hidden = False
Selection.ColumnWidth = 20
End If
End Sub

James

[dimrod]

Alternatively, you could un-hide any column and set the width, by selecting any cell(s) in the column immediately to the left of the hidden column and then run the following :-

Sub UnhideNextColumn()
With ActiveCell(1, 2).EntireColumn
.Hidden = False
.ColumnWidth = 20
End With
End Sub

[dimrod]

On 2002-05-16 21:33, James wrote:
Hi cpc,

Heres an example, change to suit:

Sub UnhideColumn()
If Columns("D").EntireColumn.Hidden = True Then
Selection.EntireColumn.Hidden = False
Selection.ColumnWidth = 20
End If
End Sub

James

I think James meant to post :-

Sub UnhideColumn()
If Columns("D").EntireColumn.Hidden = True Then
Columns("D").EntireColumn.Hidden = False
Columns("D").ColumnWidth = 20
End If
End Sub


(Presumably his typo arose because of the pressure arising from his on-going project of how to sum two cells.)


[ This Message was edited by: dimrod on 2002-05-17 04:56 ]

[Wayne Duncan]

Just for completeness: don't forget you can select toolbar button: , , select , highlight . Click on "1" or "2" to hide & unhide respectively.

[Wayne Duncan]

That last post didn't print as intended. I meant to say; Click on toolbar button DATA, select GROUP & OUTLINE, select GROUP, & select COLUMN. In future to hide & unhide the selected column, click on the "1" or "2" button in the upper left corner.