DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub bak()
if Range("a1").value > 0 then
Call makro1
End if
if Range("a1").value = 0 then
Call makro2
End if
if Range("a1").value < 0 then
Call makro3
End if
End Sub