1-2 eksik hakkında bilgi rica ediyorum..

Katılım
10 Kasım 2005
Mesajlar
14
Merhaba Arkadaşlar, Eşimin çalıştığı firmaya ait bir finans kasa programı hazırladım fakat bir iki eksiğim var ve bunları sizlerle paylaşarak yardımlarınızı bekliyorum.

1. Dosya hangi sayfada save/kayıt edilip çıkılırsa çıkılsın program açıldığında ana giriş sayfası ekrana gelsin.

2. Program açıldığında, bir selamlama penceresi ekrana gelsin.

Bunları yapabilmem için gereken yardımlarınızı bekliyorum. Teşekkürler..
 

mehmett

Altın Üye
Katılım
18 Mayıs 2005
Mesajlar
2,571
Excel Vers. ve Dili
Excel 2010 Türkçe
Aşağıdaki kodu bir modülün içine yapıştırın ve "Sayfa1" yerine Ana sayfanızın adını yazın.

[vb:1:9f072a82a0]Sub Auto_Open()
Sheets("Sayfa1").Select
MsgBox "Bugün " & Format(Date) & " Baris Ariman İyi Günler diler", vbInformation, "Merhaba"
End Sub[/vb:1:9f072a82a0]
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,370
Excel Vers. ve Dili
Ofis 365 Türkçe
Workbook_Open ile auto_open arasında ne fark vardır?
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Hiç bir fark yoktur. auto_open normal modüle yazılır. Workbook_Open ise bir private prosedür olarak Thisworkbook modülüne yazılır.
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,370
Excel Vers. ve Dili
Ofis 365 Türkçe
Teşekkürler Levent Bey
 
Katılım
10 Kasım 2005
Mesajlar
14
Arkadaşlar, 1.soruma karşılık hala yardım alamadım. Bu arada Moderatör arkadaşlara verdiği bilgilerden dolayı teşekkür ederim.
 

Ali

Uzman
Katılım
21 Temmuz 2005
Mesajlar
7,897
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
Cevap almışsınız ama dikkat etmemişsiniz

mehmett' Alıntı:
Aşağıdaki kodu bir modülün içine yapıştırın ve "Sayfa1" yerine Ana sayfanızın adını yazın.

[vb:1:c095a75ece]Sub Auto_Open()
Sheets("Sayfa1").Select
MsgBox "Bugün " & Format(Date) & " Baris Ariman İyi Günler diler", vbInformation, "Merhaba"
End Sub[/vb:1:c095a75ece]

Mehmet beyin yazdıkları kod iki sorunuz cevabınıda içermektedir
 

mehmett

Altın Üye
Katılım
18 Mayıs 2005
Mesajlar
2,571
Excel Vers. ve Dili
Excel 2010 Türkçe
Sn barisariman

Sn fructose'un da belirttiği gibi, verdiğim örnek kod her iki sorunuza da cevap veriyor.
Ayrıca açılış mesajı kodunun daha sade olmasını isterseniz;

Bu satırı silin,

[vb:1:295bdae54e]MsgBox "Bugün " & Format(Date) & " Baris Ariman İyi Günler diler", vbInformation, "Merhaba"[/vb:1:295bdae54e]

Ve bu satırı ekleyin,

[vb:1:295bdae54e]MsgBox "Merhaba, İyi Günler."[/vb:1:295bdae54e]
 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,406
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Necdet_Yesertener' Alıntı:
Workbook_Open ile auto_open arasında ne fark vardır?
Levent dostumun açıklamalarına ilave olarak, aşağıdakileri de belirtmek isterim ki.... bana göre önemlidir;

1) İçinde makrolar oluşan bir Excel dosyası, normal bir şekilde yani üzerinde çift tıklamayla açıldığında, eğer varsa ilk önce Workbook_Open daha sonra Auto_Open prorosedurleri içindeki kodlar çalışır.

2) Eğer söz konusu dosyayı VBA kodlarıyla açarsanız yani, başka bir dosyada yazılmış kodlarla içinde Workbook_Open ve Auto_Open prosedürleri olan bir dosyayı açmaya çalışırsanız (Workbooks.Open "C:\Test.xls" gibi bir kod...), sadece Workbook_Open prosedüründeki kodlar çalışır, Auto_Open prosedürü olduğu halde bu prosedürün kodları çalışmaz.
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,370
Excel Vers. ve Dili
Ofis 365 Türkçe
Kısacası "Uzun İnce Bir Yoldayım" yani Haluk Bey
Ã?ğrenilecek çok şey var
 
Üst