Açılışta Standard Menüleri Yok EtMe Makrosu

[dream_er]

LÜTFEN YARDIM !!! Açılışta standard araç çubuğu, biçimlendirme araç çubuğu ve diğer bütün menüleri kaldırarak ECXEL in bir userform gibi acılmasını istiyorum arkadaslar bunun için bir makro varmıdır acaba diğer sayfalarda aradım ama aradığımı bulamadım lütfen Yardım


YARDIMLARINIZ İCİN TEŞEKKR EDERİM

 

[Skorpiyon]

Sayın dream_er,

Aşağıdaki şekilde yapabilirsiniz.

Sub Autpen()
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.CommandBars("Drawing").Visible = False
Application.CommandBars("Visual Basic").Visible = False
Application.DisplayFormulaBar = False
Application.DisplayStatusBar = False
End Sub

 

[dream_er]

Sayın dream_er,

Aşağıdaki şekilde yapabilirsiniz.

Sub Autpen()
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.CommandBars("Drawing").Visible = False
Application.CommandBars("Visual Basic").Visible = False
Application.DisplayFormulaBar = False
Application.DisplayStatusBar = False
End Sub

Çok TEŞEKKÜR EDERİM kod işime yaradı EMEĞE SAYGI

 

[mithatgokceli]

bu kodu kod sayfasını açarak thisworkbooka yazdım ama olmadı nasıl bir yol izlemem gerekiyor?
tşk. ederim.

 

[1Al2Ver]

bu kodu kod sayfasını açarak thisworkbooka yazdım ama olmadı nasıl bir yol izlemem gerekiyor?
tşk. ederim.

Merhaba,

Modül açarak ekleyiniz,

 

[mithatgokceli]

şimdi oldu teşkkür ederim. ama ben böyle bişey beklemiyordum sadece Kitap1 yazan çubuk kalsın diğerlerinin tamamının gitmesi için nasıl bir kod gerekli?