Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet selectionChange problem
I am trying to run a macro called hardware when the user clicks in cell C14.
I am new to VB in Excel, but use VB in Access. When I run the following code in debug mode, I can see that it is skipping the instructions after "then" in the if statement even when the target address is $C$14. What am I missing? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$14" Then MsgBox "Hardware" End If End Sub Thanks Sammie |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet selectionChange problem
Sammie
Try this Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Cells.Count 1 Then Exit Sub If Not Application.Intersect(Range("$c$14"), Target) Is Nothing Then MsgBox "Hardware" End If End Sub hth Mark "Sammie" wrote: I am trying to run a macro called hardware when the user clicks in cell C14. I am new to VB in Excel, but use VB in Access. When I run the following code in debug mode, I can see that it is skipping the instructions after "then" in the if statement even when the target address is $C$14. What am I missing? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$14" Then MsgBox "Hardware" End If End Sub Thanks Sammie |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet selectionChange problem
When using this code:
If Target.Address = "$c$14" Then I got the same result that you did. But using this: If Target.Address = "$C$14" Then It worked fine. "Sammie" wrote: I am trying to run a macro called hardware when the user clicks in cell C14. I am new to VB in Excel, but use VB in Access. When I run the following code in debug mode, I can see that it is skipping the instructions after "then" in the if statement even when the target address is $C$14. What am I missing? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$14" Then MsgBox "Hardware" End If End Sub Thanks Sammie |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet selectionChange problem
Thanks. Your code does read the then statement, however, the msgbox doesn't
run the macro. I get a dialog box that says "hardware". Can you help? "Mark Dullingham" wrote: Sammie Try this Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Cells.Count 1 Then Exit Sub If Not Application.Intersect(Range("$c$14"), Target) Is Nothing Then MsgBox "Hardware" End If End Sub hth Mark "Sammie" wrote: I am trying to run a macro called hardware when the user clicks in cell C14. I am new to VB in Excel, but use VB in Access. When I run the following code in debug mode, I can see that it is skipping the instructions after "then" in the if statement even when the target address is $C$14. What am I missing? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$14" Then MsgBox "Hardware" End If End Sub Thanks Sammie |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet selectionChange problem
Wow! As simple as using upper case for the reference! You learn something
every day. Thanks. Your code does read the then statement, however, the msgbox doesn't run the macro. I get a dialog box that says "hardware". Can you help? Sammie "JLGWhiz" wrote: When using this code: If Target.Address = "$c$14" Then I got the same result that you did. But using this: If Target.Address = "$C$14" Then It worked fine. "Sammie" wrote: I am trying to run a macro called hardware when the user clicks in cell C14. I am new to VB in Excel, but use VB in Access. When I run the following code in debug mode, I can see that it is skipping the instructions after "then" in the if statement even when the target address is $C$14. What am I missing? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$14" Then MsgBox "Hardware" End If End Sub Thanks Sammie |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet selectionChange problem
The msgbox isn't ever going to run a macro.
Maybe you want to call the macro after the msgbox: MsgBox "Hardware" Call whateverprocedureyouaretryingtorun ????? Sammie wrote: Wow! As simple as using upper case for the reference! You learn something every day. Thanks. Your code does read the then statement, however, the msgbox doesn't run the macro. I get a dialog box that says "hardware". Can you help? Sammie "JLGWhiz" wrote: When using this code: If Target.Address = "$c$14" Then I got the same result that you did. But using this: If Target.Address = "$C$14" Then It worked fine. "Sammie" wrote: I am trying to run a macro called hardware when the user clicks in cell C14. I am new to VB in Excel, but use VB in Access. When I run the following code in debug mode, I can see that it is skipping the instructions after "then" in the if statement even when the target address is $C$14. What am I missing? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$14" Then MsgBox "Hardware" End If End Sub Thanks Sammie -- Dave Peterson |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet selectionChange problem
"Dave Peterson" wrote: The msgbox isn't ever going to run a macro. Maybe you want to call the macro after the msgbox: MsgBox "Hardware" Call whateverprocedureyouaretryingtorun ????? Sammie wrote: Wow! As simple as using upper case for the reference! You learn something every day. Thanks. Your code does read the then statement, however, the msgbox doesn't run the macro. I get a dialog box that says "hardware". Can you help? Sammie "JLGWhiz" wrote: When using this code: If Target.Address = "$c$14" Then I got the same result that you did. But using this: If Target.Address = "$C$14" Then It worked fine. "Sammie" wrote: I am trying to run a macro called hardware when the user clicks in cell C14. I am new to VB in Excel, but use VB in Access. When I run the following code in debug mode, I can see that it is skipping the instructions after "then" in the if statement even when the target address is $C$14. What am I missing? Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$14" Then MsgBox "Hardware" End If End Sub Thanks Sammie -- Dave Peterson So simple. Thanks! Sammie |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Button Visibility / Selectionchange Problem | Excel Programming | |||
Worksheet SelectionChange Event | Excel Discussion (Misc queries) | |||
Worksheet SelectionChange event | Excel Programming | |||
selectionchange problem | Excel Programming | |||
SelectionChange problem | Excel Programming |