Home |
Search |
Today's Posts |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Thanks
"William" wrote: Hi Martin Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Sheets("Sheet1") If Not Intersect(Target, .Range("E6:E1006 ")) Is Nothing Then LayoutType.Show End If End With End Sub -- XL2002 Regards William "Martin" wrote in message ... | I would like to run a macro upon the selection of a cell within a given range. | The following code works, but runs the macro upon selection of the entire | column... | | Private Sub Worksheet_SelectionChange(ByVal Target As Range) | If Target.Column = 5 Then LayoutType.Show | End Sub | | So I wondering if something along the lines of... | | Private Sub Worksheet_SelectionChange(ByVal Target As Range) | If Target.Range = E6:E1006 Then LayoutType.Show | End Sub | | ... however this doesn't work | | Any help with this would be appreciated |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Excel launches AOL too | Excel Discussion (Misc queries) | |||
Activating macro on enter. | Excel Worksheet Functions | |||
Activating a Macro | New Users to Excel | |||
activating cells | Excel Programming | |||
Subscript our of range when activating a worksheet | Excel Programming |