Bir buton ile iki makroyu çalıştırmak.

[asiye_konya]

Arkadaşlar elimde iki farklı makro var. Bu iki makroyu tek buton ile çalıştırmak istiyorum. İkisinin arasına nasıl bir cümle yazarak birinci ile ikinci makronun tek butona basıldığında çalışmasını sağlayabilirim acaba bilen var mı ?

 

[gelibolu]

ustalardan aşağıdaki gibi bir cevap almıştım bi dene istersen
sub ucmakroyudacagir()
call macro1
call macro2
call macro3
end sub

 

[asiye_konya]

Üstadım

Dediğiniz şekilde yapıyorum ancak ikinci makro dediğim aşağıdaki komut sanırım makro değil diyor excell. bir kontrol eder misiniz. ?

Private Sub Worksheet_Change(ByVal Target As Range)
'B ve H SÜTUNLARINI ŞİFRELEME
Application.EnableEvents = False
If Not Intersect(Target, [(AZ33:BZ33), (O4:Z6), (F6:F6), (O10:AB17), (O21:Z25), (O29:Z33), (AE4:AE4), (AE7:AE7), (AE10:AE10), (AE13:AE13), (AE16:AE16), (AE22:AE22), (AE29:AE29)]) Is Nothing Then
If sor = False Then
i = InputBox("Bu alandaki değişikliği yapmaya yetkili değilsiniz... Yetkili iseniz Lütfen İdari İşler ile irtibata geçiniz...!!!")
If i <> 571632 Then
Application.Undo
Else
sor = True
End If: End If: End If
Application.EnableEvents = True
End Sub