View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Mark Dullingham Mark Dullingham is offline
external usenet poster
 
Posts: 92
Default 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