DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Worksheet_Calculate()
If Range("B1") = "bb" Then
Call Deneme
Else
Range("A1").ClearContents
End If
End Sub
Sub Deneme()
Range("A1") = "Makro Çalıştı"
End Sub