Hi,

Maybe this

Sub Sonic()
Set myrange = Range("G5:H5")
If Application.CountA(myrange) Then
moveresults2
Else
moveresults
End If
End Sub

"Miree" wrote:

I want to write code to say that if range G5:H5 is empty run macro
moveresults, if it is not empty run macro moveresults2.

Thank You