Sayfaları Menü Olarak Ekleme Online Eğitimler sadece 49,99 TL. Hem de ikinci eğitim ücretsiz! Makroyu Kopyala 'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. Dim MyControl Sub Auto_Open() MyMenu Range("A1").Select End Sub Sub MyMenu() On Error Resume Next If Not MyControl Is Nothing Then GoTo ResumeSub: Set MyControl = CommandBars.FindControl(Type:=msoControlComboBox, Tag:="MyMenu", Visible:=True) MyControl.Delete On Error GoTo 0 Set MyBar = Application.CommandBars("standard") Set NewCombo = MyBar.Controls.Add(Type:=msoControlComboBox) ResumeSub: With NewCombo .Clear .Text = "Sayfa secin" .Tag = "MyMenu" .Width = 150 .Text = ActiveSheet.Name For i = 1 To Worksheets.Count .AddItem Sheets(i).Name, i Next .DropDownLines = 5 .DropDownWidth = 90 .OnAction = "MyCombo" End With Set NewCombo = Nothing Set MyBar = Nothing Set MyControl = Nothing End Sub ' Sub MyCombo() Set MyControl = CommandBars.FindControl(Type:=msoControlComboBox, Tag:="MyMenu", Visible:=True) Sheets(MyControl.Text).Select Set MyControl = Nothing End Sub ' Sub DelMyMenu() Set MyControl = CommandBars.FindControl(Type:=msoControlComboBox, Tag:="MyMenu", Visible:=True) MyControl.Delete Set MyControl = Nothing End Sub ' Sub Auto_Close() DelMyMenu End Sub Bu makro ile ilgili sorun bildir Bu makro çalışmıyor. Kodlarda bir hata var. Diğer Hata ile ilgili görüşlerinizi aşağıdaki kutuya yazabilirsiniz. Hata bildir TÜM MAKROLAR Youtube Kanalımız Aşağıdaki makrolar işinize yarayabilir. Benzer Sonuçlar NoMakro Adı 1 sayfaları menü olarak ekleme 2 excel sayfalarını menü olarak ekleme 3 menü olarak saat ekleme (en güvenilir) 4 sayfaların menü olarak listelenmesi 5 kitap ismi ile klasör oluşturur her sayfayı ayrı ayrı olarak kaydet 6 saati menü olarak ekleme 7 menü çubuğunun silinmesi ve özel bir menünün oluşturulması 8 sayfalara otomatik özel alt ve üst bilgi ekleme 9 excelde kendi eklenti ve fonksiyonlarınızı oluşturun 10 Seri Numaraları Ekleme: Bu makro kodu, excel sayfanıza seri numaraları otomatik olarak eklemenize yardımcı olacaktır. Bu makroyu çalıştırdıktan sonra seri numaralar için maksimum sayı girmeniz gereken bir giriş kutusu gösterecektir ve bundan sonra bir sütundaki sütuna sayı ekleyecektir. 11 ayları sayfa olarak ekleme 12 sayfaların index numaraları mesajla, grafik sayfası ekleme 13 sayfa aktif olunca sol üstbilgi olarak tarihi ekleme 14 listbox index numarasını öğrenme 15 sayfadaki formüllü hücrelerin formüllerini açıklama olarak ekleme ve silme 16 userform'u otomatik boyutlandırma 17 sayfaları köprü olarak ekler 18 mükemmel menü ekleme, dosya menüsünde yazdır, baskı önizle, sayfa yapısı kalır 19 sayfalarin kisa yolunu ekrana getirir 20 sayfada sağ fareye menü ekleme