Açılış Düzenleme

Katılım
24 Nisan 2007
Mesajlar
8
Excel Vers. ve Dili
türkçe 2003
Merhaba arkadaşlar. Bu konu hakkında son olarak bir yardım daha iztiyorum. Yardımlarınız sayesinde basit bir stok programı yaptım ama benim işime yarıyor. Şimdi son olarak siteyeceğim yardım şu:
Masa üzrinde bulunan Excel kıtabının üzerine tıkladığımızda açılan pencerenin excel gibi değilde sanki bir web sayfası gibi açılmasını veyahut açlılan exce sayfasını üst kısmındaki menülerin gözükmesini isteiyorum umarım sorunumu anlatabilmişimdir.... üzerinde düzenleme yapılaacakolan örnek ektedir yardımcı olursanız teşekkür ederim
 
Katılım
28 Ağustos 2006
Mesajlar
108
Excel Vers. ve Dili
excel-2010 tr
açılışı düzenlemesi için gerekli kodlar;

Sub Auto_Open()

Sheets("sayfa ismi").Select
Application.DisplayFullScreen = True
Application.DisplayFormulaBar = False
Application.DisplayFormulaBar = False
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
Range("açışılta seçilmesini istediğin hücre").Select

End Sub

kapanışta eski haline getirmesi için gerekli kodlar;

Sub Auto_Close()
Sheets("sayfa ismi").Select
Application.DisplayFullScreen = False
Application.DisplayFormulaBar = True
With ActiveWindow
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
End With
End Sub
 
Katılım
24 Nisan 2007
Mesajlar
8
Excel Vers. ve Dili
türkçe 2003
açılışı düzenlemesi için gerekli kodlar;

Sub Auto_Open()

Sheets("sayfa ismi").Select
Application.DisplayFullScreen = True
Application.DisplayFormulaBar = False
Application.DisplayFormulaBar = False
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
Range("açışılta seçilmesini istediğin hücre").Select

End Sub

kapanışta eski haline getirmesi için gerekli kodlar;

Sub Auto_Close()
Sheets("sayfa ismi").Select
Application.DisplayFullScreen = False
Application.DisplayFormulaBar = True
With ActiveWindow
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
End With
End Sub
İlginiz için size teşekkür ederim ama bu kadar bilgiye sahip değilim. Bana nasıl yapılması gerektiğini örnek olarak açıklarsanız daha anlaşılır olur benm için teşekkür ederim
 
Katılım
28 Ağustos 2006
Mesajlar
108
Excel Vers. ve Dili
excel-2010 tr
İlginiz için size teşekkür ederim ama bu kadar bilgiye sahip değilim. Bana nasıl yapılması gerektiğini örnek olarak açıklarsanız daha anlaşılır olur benm için teşekkür ederim
şimdi bunu anlatmam çok uzun sürer forum içinde visual basic ile modül oluşturmayı aratırsan cevabına ulaşmış olursun. hatta daha fazla işine yarar bilgilerle karşılaşabilirsin..
 
Üst