Macro Ranges

[Guest]

What statement can be wriiten in Macro
that I can say range1 = range2 divided by range3
if range2 >1 and range 3 is >1

 

[Guest]

Try this example.

Sub If_Test()

Dim rng1 As Range
Dim rng2 As Range
Dim rng3 As Range

Set rng1 = Sheets("Sheet1").Range("A1")
Set rng2 = Sheets("Sheet1").Range("B1")
Set rng3 = Sheets("Sheet1").Range("C1")

If rng2 > 1 And rng3 > 1 Then
rng1 = rng2 / rng3
End If

End Sub

Regards,

OssieMac