• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

formul içinde makro

  • Konbuyu başlatan Konbuyu başlatan Barons
  • Başlangıç tarihi Başlangıç tarihi

Barons

Altın Üye
Katılım
14 Mayıs 2005
Mesajlar
967
Excel Vers. ve Dili
Microsoft Ofis 365
merhaba

formul içinde makro çalışırmı?

örnek: =eğer(a1=5;makro1;"") gibi.

çok teşekkürler
 
merhaba

bu işinizi görür mü?
A1'e veri giriniz, B2'e formül yazınız =EĞER(A1=5;"makro1";"makro2")

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [a1]) Is Nothing Then Exit Sub
Run CStr([b1])
End Sub
Kod:
Sub makro1()
MsgBox "selam"
End Sub
Sub makro2()
MsgBox "merhaba"
End Sub
 
gayet kullanisli gorunuyor Suleyman Bey tesekkurler..
 
merhaba

ek dosyada kod çalışıyor, deneyiniz.
 

Ekli dosyalar

Geri
Üst