Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Make Dropdown List Temporarily Wider & Same Width for Multiple Col
Hi,
How do I modify the following macro from http://www.contextures.com/xlDataVal08.html#Wider to make the dropdown list temporarily wider for say COLUMNS BETWEEN 1 and 10, without having to specify columns individually, e.g. Target.Column = 1, Target.Column = 2, etc. Is there some sort of BETWEEN COMMAND I can use? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Count 1 Then Exit Sub If Target.Column = 4 Then Target.Columns.ColumnWidth = 20 Else Columns(4).ColumnWidth = 5 End If End Sub |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Make Dropdown List Temporarily Wider & Same Width for Multiple Col
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Const WS_RANGE As String = "A:E" '<======= change to suit If Target.Count 1 Then Exit Sub If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then Target.Columns.ColumnWidth = 20 Else Columns(4).ColumnWidth = 5 End If End Sub -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "AK9955" wrote in message ... Hi, How do I modify the following macro from http://www.contextures.com/xlDataVal08.html#Wider to make the dropdown list temporarily wider for say COLUMNS BETWEEN 1 and 10, without having to specify columns individually, e.g. Target.Column = 1, Target.Column = 2, etc. Is there some sort of BETWEEN COMMAND I can use? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Count 1 Then Exit Sub If Target.Column = 4 Then Target.Columns.ColumnWidth = 20 Else Columns(4).ColumnWidth = 5 End If End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Help with Macro - Make Dropdown List Temporarily Wider | Excel Discussion (Misc queries) | |||
How to make fx field wider? | Excel Discussion (Misc queries) | |||
Dropdown list width changing code | Excel Worksheet Functions | |||
Make input in one column determine dropdown list in another. | Excel Discussion (Misc queries) | |||
How can I allow users to make multiple selections from a dropdown. | Excel Worksheet Functions |