İki makroyu tek düğmede kullanmak

[izcik]

Merhaba, İyi günler

Ekteki dosyada iki makro kodu vardır. Fakat biri çalışıyor. İkisini de çalıştırmak için nasıl bir değişiklik gerekiyor?

(Daha sonra üçüncü kodu da eklemeyi deneyeceğim ve F tuşlarından birine atamaya çalışacağım, takıldığım bir yer olursa arz edeceğim)

Saygılar

ornek.xlsm dosyasını indir - download

ornek.xlsm dosyasını indir, download. Dosya.tc .Dosya Upload. Dosya Paylaş. Dosya Yükle

s7.dosya.tc

 

[cems]

Bir module ikinci kodları yazın ve koda ad verin mesela ikincimakro
kaydırma cubugunu kaldırıp yerine getiren makroda end sub dan önce " Call ikincimakro " yazın

 

[izcik]

Bir module ikinci kodları yazın ve koda ad verin mesela ikincimakro
kaydırma cubugunu kaldırıp yerine getiren makroda end sub dan önce " Call ikincimakro " yazın

Cevabınız için çok teşekkürler
Fakat maalesef anlayamadım ve yapamadım

İki modül değil tek modül olması gerekiyor zira, nasıl yapıldığını öğrendikten sonra üçüncü makroyu da ekleyip, denemeler yapıp, F tuşuna atayıp eklenti haline getireceğim.

 

[Seyit Tiken]

Bu şekilde deneyiniz.

Sub ytgg()
ActiveWindow.DisplayHorizontalScrollBar = ActiveWindow.DisplayHorizontalScrollBar = 0
ActiveWindow.DisplayVerticalScrollBar = ActiveWindow.DisplayVerticalScrollBar = 0
End Sub

 

[izcik]

Bu şekilde deneyiniz.

Sub ytgg()
ActiveWindow.DisplayHorizontalScrollBar = ActiveWindow.DisplayHorizontalScrollBar = 0
ActiveWindow.DisplayVerticalScrollBar = ActiveWindow.DisplayVerticalScrollBar = 0
End Sub

Seyit Tiken uzmanım oldu
Teşekkür ederim ilginize
Saygılar