• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

Çözüldü Userform Üzerinde Açılır Takvim

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Hsn55

Yeni Üye
Katılım
14 Nis 2021
Mesajlar
837
Çözümler
2
Aldığı beğeni
125
Excel V
Office 2010 TR
Konu Sahibi
Merhabalar,
Userform üzerinde bulunan Textbox1 çift tıkladığımızda açılır takvim çikabilir mi.Takvimi seçtiğimiz de ise seçilen tarihi Textbox1 e yazabilir miyiz?
 
Çözüm
1 - 1 modül oluşturun yada var olan bir modülün en başına aşağıdaki kodu yazınHTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
2 - suçtutanağı formuna aşağıdaki olayı ekleyin bu sadece Image27 içindir diğer imaj nesnesi için de benzer kod eklenmel
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
3 -takvim formundaki tikla olayındaki
ad = Takvim.ActiveControl.Name
UserForm1.Controls(ad).Value = Label1.Caption


satırlarını aşağıdaki kodla değiştirin HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Şu an mobilim. Ancak sizin shift dosyanızda ki Aralık ayı verileriniz bu şekilde. Kodda hata yok yani. Siz shift dosyanızı kontrol edin varsa oradaki hatayı giderin.
 
Konu Sahibi
Hocam kontrol ettim aşağıdaki kodda hata veriyor.Başka bir dosyaya alıyorum.Çalışıyor. Anlamadım
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Konu Sahibi
Merhabalar;
Arkadaşlar bu takvimi ne yaptımsa kendi dosyamda çalıştıramadım. Hata veriyor. Acaba başka alternatif takvim varsa paylaşabilir misiniz?
 
1 - 1 modül oluşturun yada var olan bir modülün en başına aşağıdaki kodu yazınHTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
2 - suçtutanağı formuna aşağıdaki olayı ekleyin bu sadece Image27 içindir diğer imaj nesnesi için de benzer kod eklenmel
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
3 -takvim formundaki tikla olayındaki
ad = Takvim.ActiveControl.Name
UserForm1.Controls(ad).Value = Label1.Caption


satırlarını aşağıdaki kodla değiştirin HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Çözüm
Rica ederim
İyi çalışmalar
Sorun çözüldü mü? Diğeri için de yapabildiniz mi?
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst