ant6729, в вашем макросе (да и в том варианте, что я написал), непонятно, что надо делать, если Range("G6").Value < Range("G9").Value.
Правильно будет так:
[vba]Код
Sub macro345()
If Range("G6").Value = Range("G9").Value Then
Application.Run "Макрос6"
ElseIf Range("G6").Value > Range("G9").Value Then
Application.Run "Макрос7"
Else
Application.Run "Макрос8"
End If
End Sub
[/vba]
или, если запускаем тот же "Макрос7", то
[vba]Код
Sub macro345()
If Range("G6").Value = Range("G9").Value Then
Application.Run "Макрос6"
Else
Application.Run "Макрос7"
End If
End Sub
[/vba]