[Çözüldü] - Menu Pasif Etme

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

[Çözüldü] - Menu Pasif Etme

İleti#1)  Bülent Kars » 31 Arl 2009 14:42

Arkadaşalar Merhaba

Excelde Araçlar>Çalışma kitabını Paylaştır menüsünü pasif hale getirebilirmiyim acaba.
Kullanıcı avatarı
Bülent Kars
Site Dostu
 
Adı Soyadı:Bülent Kars
Kayıt: 25 Ekm 2008 22:06
Konum: Yönetici
Meslek: Finans
Yaş: 42
İleti: 516
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul / Gaziosmanpaşa

Cevap: Menu Pasif Etme

İleti#2)  Tarkan VURAL » 31 Arl 2009 16:02

Bülent,

O menü sekmesini tıklayan kişi, senin istediğin özel bir mesaj ile karşılaşsa olur mu ? :)
Resim
www.tarkanvural.com.tr

İnnâ lillâhi ve innâ ileyhi raciûn
Şüphesiz ki; biz Allah’a âidiz ve vakti geldiğinde O’na döndürüleceğiz.

HasbunAllâhu ve nimel vekîl
Bize Allah yeter. O ne güzel vekildir.


ExcelVBA.NET' e katkıda bulunmak ister misiniz ? O halde BAĞIŞ butonunu tıklayın...
Kullanıcı avatarı
Tarkan VURAL
Yönetim Kurulu
 
Adı Soyadı:Tarkan VURAL
Kayıt: 14 Haz 2008 18:27
Konum: @tarkanvural73
Meslek: LUU, Database Expert, Senior Software Specialist, Developer
Yaş: 45
İleti: 27008
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul - Beylikdüzü

Cevap: Menu Pasif Etme

İleti#3)  Tarkan VURAL » 31 Arl 2009 16:14

Boş bir module aşağıdaki kodları yazıp deneyebilirsiniz.

Kod: Tümünü seç
Sub Auto_Open()
Application.MenuBars("WorkSheet").Menus("Araçlar").MenuItems("Çalışma Kitabını &Paylaştır...").OnAction = "mesaj"
End Sub

Sub Auto_Close()
Application.MenuBars("WorkSheet").Menus("Araçlar").MenuItems("Çalışma Kitabını &Paylaştır...").OnAction = ""
End Sub

Sub mesaj()
MsgBox "Bu seçimi yapmak için yetkiniz yok.   ", vbCritical, "Www.ExcelVBA.Net"
End Sub
Resim
www.tarkanvural.com.tr

İnnâ lillâhi ve innâ ileyhi raciûn
Şüphesiz ki; biz Allah’a âidiz ve vakti geldiğinde O’na döndürüleceğiz.

HasbunAllâhu ve nimel vekîl
Bize Allah yeter. O ne güzel vekildir.


ExcelVBA.NET' e katkıda bulunmak ister misiniz ? O halde BAĞIŞ butonunu tıklayın...
Kullanıcı avatarı
Tarkan VURAL
Yönetim Kurulu
 
Adı Soyadı:Tarkan VURAL
Kayıt: 14 Haz 2008 18:27
Konum: @tarkanvural73
Meslek: LUU, Database Expert, Senior Software Specialist, Developer
Yaş: 45
İleti: 27008
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul - Beylikdüzü

Cevap: Menu Pasif Etme

İleti#4)  Bülent Kars » 31 Arl 2009 16:32

Tarkan Bey

Çok Teşekkür ederim.Elinize sağlık.
Kullanıcı avatarı
Bülent Kars
Site Dostu
 
Adı Soyadı:Bülent Kars
Kayıt: 25 Ekm 2008 22:06
Konum: Yönetici
Meslek: Finans
Yaş: 42
İleti: 516
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul / Gaziosmanpaşa

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: AhrefsBot ve 0 misafir

Bumerang - Yazarkafe