| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro launches after activating a range of cells
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 |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Macro launches after activating a range of cells
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 |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Macro launches after activating a range of cells
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 |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| 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 | |||
Linear Mode
