Range Reference in Visual Basic

  • Thread starter Thread starter John Baker
  • Start date Start date
J

John Baker

Hi:

I have the following worksheet based macro in VBA:


Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$F$5" Then
Run "buttonchange"
End If
End Sub

I want to expand the target address to F5 OR F6, and have no idea how to do it. Whatever I
try $F$5:$F$6, $F$5 OR $F$6 or a myriad of variations around that come up with a compile
error OR don't work!

Anyone got any thoughts on this?

Regards
John Baker
 
simplest would be
If Target.Address = "$F$5" or Target.Address = "$F$6" Then
or
intersect(target,range("f5:f6"))
 
try

If Target.Address = "$F$5" OR Target.Address = "$F$6" Then
Run "buttonchange"
End If

regards ojv
-----Original Message-----
Hi:

I have the following worksheet based macro in VBA:


Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$F$5" Then
Run "buttonchange"
End If
End Sub

I want to expand the target address to F5 OR F6, and
Click to expand...
have no idea how to do it. Whatever I
try $F$5:$F$6, $F$5 OR $F$6 or a myriad of variations
Click to expand...
around that come up with a compile
 
John

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$F$5" Or Target.Address = "$F$6" Then
Run "buttonchange"
End If
End Sub

Gord Dibben XL2002
 
Just to give another option...

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Address(False, False)
Case "F5", "F6"
Run "buttonchange"
End Select
End Sub
 
Back
Top