Range Reference in Visual Basic

[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

 

[Don Guillett]

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

 

[Guest]

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

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

 

[Gord Dibben]

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

 

[Dana DeLouis]

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