Menü oluşturmak

[Barons]

Merhaba

Ekteki dosyada sadece kendi menulerim olsun istiyorum yani altındaki kaydet,kopyala, yapıştır v.s olmamalı ve dosya kapandığındada Excel eski haline gelmeli? BU mümkünmüdür acaba?

Birde örnek olarak tek menuler var..alt menu olmadan sadece tek menu oluşturmak istiyorum ancak yapamadım...örnek : yardım dendiğinde alt menu olmamalı


Çok teşekkürler

 

[Levent Menteşoğlu]

1.sorunuz; Dosyadan çıkıldığında menülerin eski haline gelmesi için Excel menüsü isimli butona yazdığınız kodları bir auto_close kodunun içine yazın.

[vb:1:4dd90bed0e]sub auto_close()
.
.Mevcut kodlarınız
.
end sub
[/vb:1:4dd90bed0e]

Açılıştada kendi menülerinizin oluşması içinde;

[vb:1:4dd90bed0e]sub auto_open()
.
.Mevcut kodlarınız
.
end sub[/vb:1:4dd90bed0e]

2.sorunuz; Alt menü istemiyorsanız bu durumda menüye buton koymanız gerekir. Ã?rneğin "yardım" ile ilgili menü kodlarını aşağıdaki ile değiştirin.

[vb:1:4dd90bed0e]Set Kontrollerim = YeniMenuCubugu.Controls.Add(Type:=msoControlButton, ID:=1)
With Kontrollerim
.Style = msoButtonCaption
.Caption = "Yardım"
.OnAction = "BeepleBakalim"
End With
[/vb:1:4dd90bed0e]

 

[Barons]

Çok teşekkürler

Alt menü konusu tamam...Diğer konuyu ise ekteki resimde oldugu gibi yapmak mümkünmüdür acaba?

Tekrar elinize sağlık

 

[Barons]

Ok gerek yok aslında ..Yerleşik menüleride kaldırmak istedim ancak durabilir...sonradan vazgeçtim...

Sn leventm tekrar teşekkürler