ComboBox Nesnesine AddItem Yöntemiyle Ayları Yazdırma

Bu dosya, UserForm üzerindeki bir ComboBox nesnesine ay adlarının VBA ile nasıl yazdırılacağını gösteren örnek çalışmadır. Ay adları hücrelerden okunmaz; form açılırken AddItem yöntemi ve bir döngü ile listeye eklenir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makro kodunda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur.

Dosyanın içeriği​

• Sayfa1: Formu açan CommandButton1 düğmesi bu sayfadadır.
• aylar: Üzerinde ComboBox1 ve cmdOK düğmesi bulunan UserForm'dur.
• Module1: Formu açan ssho adlı makroyu barındırır.

Dosyada hücre formülü bulunmaz.

Makrolar​

• CommandButton1_Click (Sayfa1): Düğmeye tıklandığında ssho makrosunu çağırır.
• ssho (Module1): aylar adlı UserForm'u görüntüler.
• UserForm_Initialize (aylar): Form açılırken 1'den 12'ye kadar bir döngü çalışır. Her adımda DateSerial ile oluşturulan tarih Format işlevine "MMMM" biçimiyle verilir ve elde edilen ay adı ComboBox1'e eklenir. Liste Ocak'tan Aralık'a kadar 12 ay adıyla dolar.
• cmdOK_Click (aylar): Tamam düğmesine basıldığında Unload Me ile formu kapatır.

Ay adları Excel'in dil ayarına göre görüntülenir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sayfa1'deki düğmeye tıklayarak formu açın.
3. ComboBox1 açılır listesinden istediğiniz ayı seçin.
4. Formu kapatmak için cmdOK düğmesini kullanın.
5. Kodu incelemek için Alt+F11 ile VBA düzenleyicisini açıp aylar formunun kod penceresine bakın. Listeyi başka değerlerle doldurmak için döngü ve AddItem satırı uyarlanır.