Bazen Excel'de takvim olmasını seviyoruz. Bir excel sayfasında bir takvimi görüntüleyebilir ve uygun tarihi seçerek bir hücreye tarih girebilirsiniz. Verilen adımları izleyin: -
1. Excel çalışma kitabını açın.
2 Görünüm>Araç Çubukları>Kontrol Araç Kutusu'na gidin
3. Artık sayfada bir araç kutusu penceresi görebilirsiniz. Son düğmeye (daha fazla kontrol) gidin ve tıklayın. Burada kontrollerin bir listesini görebilirsiniz, Takvim kontrolüne tıklayın.
4. Takvimi, bunun görüntülenmesini istediğiniz sayfada ayarlayın.
5. Takvime çift tıklayın veya sağ tıklayın, ardından kodu görüntüleyin, kodlama penceresinde aşağıdaki kodu bulacaksınız: -
Özel Alt Takvim1_Click()
Alt Bitiş
6. 1. ve son satır arasına aşağıdaki satırı girin
ActiveCell.Value = Calendar1.Value
7. Kodunuz şöyle görünecek :_
Özel Alt Takvim1_Click()
ActiveCell.Value = Calendar1.Value
Alt Bitiş
8. VBA penceresinden çıkın ve excel sayfasına gidin ve takvimi kullanın.