Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
unhiding columns problem
Thanks for the response but I am a novice at this and I can't figure out what
sh.columns(21) means. Could you please explain it and how I am to use it? Thank you Neal "Tom Ogilvy" wrote in message ... for each sh in Worksheets sh.Columns(21).Hidden = False Next or for each sh in Activewindow.SelectedSheets sh.Columns(21).Hidden = False Next -- Regards, Tom Ogilvy "Neal" wrote in message ... I have a workbook with seven worksheets. I have recorded several macros that have selected all the worksheets and then cleared the contents in a range. I have used this same method to hide a column in all the worksheets successfully but when I try to unhide a column, it only works on one of the worksheets. What code can I use to to unhide the selected column on all seven worksheets. Thanks Neal |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
unhiding columns problem
sh is a reference to the sheet where you want a column unhidden.
Columns(21) refers to the 21st column. ? columns(1).address $A:$A ? columns(21).address $U:$U So column U. Just used 21 as an example since you didn't specify which column. -- Regards, Tom Ogilvy "Neal" wrote in message ... Thanks for the response but I am a novice at this and I can't figure out what sh.columns(21) means. Could you please explain it and how I am to use it? Thank you Neal "Tom Ogilvy" wrote in message for each sh in Worksheets sh.Columns(21).Hidden = False Next or for each sh in Activewindow.SelectedSheets sh.Columns(21).Hidden = False Next -- Regards, Tom Ogilvy "Neal" wrote in message ... I have a workbook with seven worksheets. I have recorded several macros that have selected all the worksheets and then cleared the contents in a range. I have used this same method to hide a column in all the worksheets successfully but when I try to unhide a column, it only works on one of the worksheets. What code can I use to to unhide the selected column on all seven worksheets. Thanks Neal |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
unhiding columns problem
I suppose I did not make myself clear on what was needed. I will have to study
VBA more before I ask questions because this makes no sense to me. I have figured out how to do it by recording a macro but I will have to add 72 macros to the worksheet to accomplish it. I was hoping for an easier solution. Neal .. "Tom Ogilvy" wrote in message ... sh is a reference to the sheet where you want a column unhidden. Columns(21) refers to the 21st column. ? columns(1).address $A:$A ? columns(21).address $U:$U So column U. Just used 21 as an example since you didn't specify which column. -- Regards, Tom Ogilvy "Neal" wrote in message ... Thanks for the response but I am a novice at this and I can't figure out what sh.columns(21) means. Could you please explain it and how I am to use it? Thank you Neal "Tom Ogilvy" wrote in message for each sh in Worksheets sh.Columns(21).Hidden = False Next or for each sh in Activewindow.SelectedSheets sh.Columns(21).Hidden = False Next -- Regards, Tom Ogilvy "Neal" wrote in message ... I have a workbook with seven worksheets. I have recorded several macros that have selected all the worksheets and then cleared the contents in a range. I have used this same method to hide a column in all the worksheets successfully but when I try to unhide a column, it only works on one of the worksheets. What code can I use to to unhide the selected column on all seven worksheets. Thanks Neal |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
unhiding columns problem
What is it you want to do. Perhaps you just need to state what you want to
do specifically in plain english. Regards, Tom Ogilvy Neal wrote in message ... I suppose I did not make myself clear on what was needed. I will have to study VBA more before I ask questions because this makes no sense to me. I have figured out how to do it by recording a macro but I will have to add 72 macros to the worksheet to accomplish it. I was hoping for an easier solution. Neal . "Tom Ogilvy" wrote in message ... sh is a reference to the sheet where you want a column unhidden. Columns(21) refers to the 21st column. ? columns(1).address $A:$A ? columns(21).address $U:$U So column U. Just used 21 as an example since you didn't specify which column. -- Regards, Tom Ogilvy "Neal" wrote in message ... Thanks for the response but I am a novice at this and I can't figure out what sh.columns(21) means. Could you please explain it and how I am to use it? Thank you Neal "Tom Ogilvy" wrote in message for each sh in Worksheets sh.Columns(21).Hidden = False Next or for each sh in Activewindow.SelectedSheets sh.Columns(21).Hidden = False Next -- Regards, Tom Ogilvy "Neal" wrote in message ... I have a workbook with seven worksheets. I have recorded several macros that have selected all the worksheets and then cleared the contents in a range. I have used this same method to hide a column in all the worksheets successfully but when I try to unhide a column, it only works on one of the worksheets. What code can I use to to unhide the selected column on all seven worksheets. Thanks Neal |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
unhiding columns problem
I think you are absolutely right, I need to restate what I need. Sorry about my
inexperience with VBA. I have a workbook that tracks employee hours in different labor catagories on a daily basis. There are 37 labor catagories and therefore 37 columns and 7 worksheets (Mon-Sun). On some job projects, all of the 37 labor catagories are not needed. Perhaps 3 or 4 could be eliminated. Those that can be eliminated are not grouped together. They could be any of the 37. I need a macro that will allow me to hide the labor catagory columns that I don't need on all 7 days and also unhide them when needed. Ideally I would want to list the labor catagories on another worksheet and perhaps put a X in the column next to the catagory that I would like hidden and then run the macro and it would hide the columns with a X. I have tried this by adding a If Then argument to a recorded macro but it only hides the columns and does not unhide them. Also, I would have to have a macro for each catagory using this method. Is there any easier way? Can someone point me in the right direction? Your help is appreciated Neal "Tom Ogilvy" wrote in message ... What is it you want to do. Perhaps you just need to state what you want to do specifically in plain english. Regards, Tom Ogilvy Neal wrote in message ... I suppose I did not make myself clear on what was needed. I will have to study VBA more before I ask questions because this makes no sense to me. I have figured out how to do it by recording a macro but I will have to add 72 macros to the worksheet to accomplish it. I was hoping for an easier solution. Neal . "Tom Ogilvy" wrote in message ... sh is a reference to the sheet where you want a column unhidden. Columns(21) refers to the 21st column. ? columns(1).address $A:$A ? columns(21).address $U:$U So column U. Just used 21 as an example since you didn't specify which column. -- Regards, Tom Ogilvy "Neal" wrote in message ... Thanks for the response but I am a novice at this and I can't figure out what sh.columns(21) means. Could you please explain it and how I am to use it? Thank you Neal "Tom Ogilvy" wrote in message for each sh in Worksheets sh.Columns(21).Hidden = False Next or for each sh in Activewindow.SelectedSheets sh.Columns(21).Hidden = False Next -- Regards, Tom Ogilvy "Neal" wrote in message ... I have a workbook with seven worksheets. I have recorded several macros that have selected all the worksheets and then cleared the contents in a range. I have used this same method to hide a column in all the worksheets successfully but when I try to unhide a column, it only works on one of the worksheets. What code can I use to to unhide the selected column on all seven worksheets. Thanks Neal |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
unhiding columns problem
Assume you have a sheet with 37 cells in column B containing an X if you
want that column hidden. If I want column B hidden, I put an X in B2, if I want column AA hidden, I put an X in B27. You can have the 37 labels in column A, but that is not needed by the macro. Assume this sheet is named data and the only other sheets in the workbook are the 7 sheets. Sub HandleColumns() Dim varr() Dim sStr As String, rng As Range Dim sh As Worksheet On Error Resume Next With Worksheets("Data") Set rng = .Range(.Cells(1, 2), .Cells(37, 2)). _ SpecialCells(xlConstants, xlTextValues) End With On Error GoTo 0 if rng is nothing then exit sub ReDim varr(1 To rng.Count) sStr = "" For Each cell In rng sCol = Left(Cells(1, cell.Row).Address(0, 0), 2 + (cell.Row < 27)) sStr = sStr & sCol & ":" & sCol & "," Next sStr = Left(sStr, Len(sStr) - 1) If Len(Trim(sStr)) = 0 Then Exit Sub For Each sh In Worksheets If LCase(sh.Name) < "data" Then sh.Columns.Hidden = False sh.Range(sStr).EntireColumn.Hidden = True End If Next End Sub -- Regards, Tom Ogilvy "Neal" wrote in message ... I think you are absolutely right, I need to restate what I need. Sorry about my inexperience with VBA. I have a workbook that tracks employee hours in different labor catagories on a daily basis. There are 37 labor catagories and therefore 37 columns and 7 worksheets (Mon-Sun). On some job projects, all of the 37 labor catagories are not needed. Perhaps 3 or 4 could be eliminated. Those that can be eliminated are not grouped together. They could be any of the 37. I need a macro that will allow me to hide the labor catagory columns that I don't need on all 7 days and also unhide them when needed. Ideally I would want to list the labor catagories on another worksheet and perhaps put a X in the column next to the catagory that I would like hidden and then run the macro and it would hide the columns with a X. I have tried this by adding a If Then argument to a recorded macro but it only hides the columns and does not unhide them. Also, I would have to have a macro for each catagory using this method. Is there any easier way? Can someone point me in the right direction? Your help is appreciated Neal "Tom Ogilvy" wrote in message ... What is it you want to do. Perhaps you just need to state what you want to do specifically in plain english. Regards, Tom Ogilvy Neal wrote in message ... I suppose I did not make myself clear on what was needed. I will have to study VBA more before I ask questions because this makes no sense to me. I have figured out how to do it by recording a macro but I will have to add 72 macros to the worksheet to accomplish it. I was hoping for an easier solution. Neal . "Tom Ogilvy" wrote in message ... sh is a reference to the sheet where you want a column unhidden. Columns(21) refers to the 21st column. ? columns(1).address $A:$A ? columns(21).address $U:$U So column U. Just used 21 as an example since you didn't specify which column. -- Regards, Tom Ogilvy "Neal" wrote in message ... Thanks for the response but I am a novice at this and I can't figure out what sh.columns(21) means. Could you please explain it and how I am to use it? Thank you Neal "Tom Ogilvy" wrote in message for each sh in Worksheets sh.Columns(21).Hidden = False Next or for each sh in Activewindow.SelectedSheets sh.Columns(21).Hidden = False Next -- Regards, Tom Ogilvy "Neal" wrote in message ... I have a workbook with seven worksheets. I have recorded several macros that have selected all the worksheets and then cleared the contents in a range. I have used this same method to hide a column in all the worksheets successfully but when I try to unhide a column, it only works on one of the worksheets. What code can I use to to unhide the selected column on all seven worksheets. Thanks Neal |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Unhiding Columns | Excel Discussion (Misc queries) | |||
Unhiding columns | Excel Discussion (Misc queries) | |||
Hiding/Unhiding Columns | Excel Worksheet Functions | |||
Unhiding Columns | Excel Discussion (Misc queries) | |||
Unhiding columns | Excel Worksheet Functions |