Excel Vba Forum - Excelce.Net

SORU ve CEVAPLAR (Yazılabilir) => Microsoft Excel, Vba, Makro, Formül vb. Soruları => Çözülen Excel, Vba, Makro, Formül vb. Soruları => Konuyu başlatan: yesilyurtlu - 01 Mayıs 2010, 12:36:02

Başlık: [Çözüldü] Gizlenmiş menü, pasif menü düğmesi
Gönderen: yesilyurtlu - 01 Mayıs 2010, 12:36:02

ÜStadım;
Makroları etkinleştirdiğimiz ve Userform açıldığı zaman "Dosya, Düzen, Görünüm vb" araçlar pasif kalıyor.
Aktif etmemiz ne yapmalıyım.
Terşekkür Ederim

Başlık: Ynt: Gizlenmiş menü
Gönderen: Bülent Öztürk - 23 Haziran 2010, 10:17:24

Pasif etmek için kullanılan kodları tersine çevirip aktif edebilirsiniz.

Örneğin pasif etmek için;

Kod: [Seç]

Sub Ada_gore_menu_pasif_et()
Application.CommandBars("Worksheet Menu Bar").Controls("Dosya").Enabled = False
Application.CommandBars("Worksheet Menu Bar").Controls("Düzen").Enabled = False
Application.CommandBars("Worksheet Menu Bar").Controls("Görünüm").Enabled = False
End Sub
Aktif etmek için;

Kod: [Seç]

Sub Ada_gore_menu_aktif_et()
Application.CommandBars("Worksheet Menu Bar").Controls("Dosya").Enabled = True
Application.CommandBars("Worksheet Menu Bar").Controls("Düzen").Enabled = True
Application.CommandBars("Worksheet Menu Bar").Controls("Görünüm").Enabled = True
End Sub

Başlık: Ynt: Gizlenmiş menü
Gönderen: yesilyurtlu - 23 Haziran 2010, 22:58:05

 Bülent Öztürk Üstadım;

Teşekkür Ederim. Allah Razı Olsun

Başlık: Ynt: Gizlenmiş menü
Gönderen: Bülent Öztürk - 24 Haziran 2010, 08:23:02

Rica ederim. Cümlemizden razı olsun.

Başlık: Ynt: [Çözüldü] Gizlenmiş menü, pasif menü düğmesi
Gönderen: rebel_child - 09 Mart 2012, 21:48:16

bulent bey benım bır rıcam olacak excel sayfasında menulerı nasıl gızlerız