Hi, and welcome to the forum! 
There sure is a way to do that. In the Worksheet module for the correct worksheet, just copy and paste this code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 7 And Target.Row >= 53 And Target.Row <= 60 Then
Macro3
End If
End Sub
An alternative (and probably cleaner way) would be:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
Set rng = Me.Range("G53:G60")
If Not Intersect(Target, rng) Is Nothing Then
Macro3
End If
End Sub
I hope this helps
Bookmarks