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

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
H

Hsn55

Yeni Üye
Kullanıcı Bilgileri
Katılım
14 Nis 2021
Mesajlar
568
Çözümler
2
Aldığı beğeni
87
Excel Versiyonu
Office 2010 TR
Konuyu Başlatan
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
halily
1 - 1 modül oluşturun yada var olan bir modülün en başına aşağıdaki kodu yazın
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
2 - suçtutanağı formuna aşağıdaki olayı ekleyin bu sadece Image27 içindir diğer imaj nesnesi için de benzer kod eklenmel
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
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
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
Tarihe göre sırala Oylara göre sırala
Patron

Patron

Site Dostu
Kullanıcı Bilgileri
Katılım
6 Mar 2021
Mesajlar
2,359
Çözümler
694
Aldığı beğeni
2,751
Excel Versiyonu
Office 2021 TR
excelcozum.com

TAKVİM uygulaması

Basit ve kullanışlı bir TAKVİM uygulaması. Uygulama 2020 yılından başlayıp, bulunduğunuz yıla kadar devam eder.(Revize edilebilir) 2020-2050 yılları arası tüm resmi tatil günleri eklenmiştir. (Dini Bayramlar dahil) TAMAM butonu ile hücreye seçilen tarih yazılır. TAMAM butonu kodu revize edilerek...
excelcozum.com excelcozum.com
Konusunu inceleyiniz.
 
Olumlu oy 0 Negatif oyla
H

Hsn55

Yeni Üye
Kullanıcı Bilgileri
Katılım
14 Nis 2021
Mesajlar
568
Çözümler
2
Aldığı beğeni
87
Excel Versiyonu
Office 2010 TR
Konuyu Başlatan
Sayın Balta bu takvim sayfa içerisinde ki hücrelere ekleniyor. Bunun userform olanı yok mu?
 
Olumlu oy 0 Negatif oyla
Patron

Patron

Site Dostu
Kullanıcı Bilgileri
Katılım
6 Mar 2021
Mesajlar
2,359
Çözümler
694
Aldığı beğeni
2,751
Excel Versiyonu
Office 2021 TR
Ufak bir düzenleme ile halledebilirdiniz.
Dosya ekte.
 

Ekli dosyalar

  • Takvim (1).xlsm
    34.8 KB · Gösterim: 72
Olumlu oy 0 Negatif oyla
H

himmgarip

Excel Dostu
Kullanıcı Bilgileri
Katılım
27 Mar 2021
Mesajlar
800
Çözümler
90
Aldığı beğeni
747
Excel Versiyonu
Office 2016 TR
Olumlu oy 0 Negatif oyla
H

Hsn55

Yeni Üye
Kullanıcı Bilgileri
Katılım
14 Nis 2021
Mesajlar
568
Çözümler
2
Aldığı beğeni
87
Excel Versiyonu
Office 2010 TR
Konuyu Başlatan
Balta' Alıntı:
Ufak bir düzenleme ile halledebilirdiniz.
Genişletmek için tıkla...
Sayın hocam çok teşekkür ederim. Şöyle bir şey olabilir mi?. Texboxu çift tıkayınca tarih açılıyor. İstediğimiz tarihi seçiğimde tamam butonuna basmadan kendisi seçilen tarihi textboxa yazsa ve userformu kapatsa. Bu şekilde revize edebilir misiniz?
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,907
Excel Versiyonu
Office 2021 TR
Merhaba.
Takvimi class yöntemi ile ayarladım bazı yerleri.
Takvime çift tıklarsanız textboxa tarih aktarır ve kapanır.

Dikkat edilmesi gereken userform1 deki textboxların tagı test olarak yazılırsa bunlarda çalışır bunu değiştirebilirsinizde.

rrtt.gif
 

Ekli dosyalar

  • Takvim 2.xlsm
    51.4 KB · Gösterim: 34
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,907
Excel Versiyonu
Office 2021 TR
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Ayrıca koddaki yukardaki yer ile alttakini değiştiriseniz 5 yıl öncesi ve 5 yıl sonrası yıla kadar gösterir.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
H

himmgarip

Excel Dostu
Kullanıcı Bilgileri
Katılım
27 Mar 2021
Mesajlar
800
Çözümler
90
Aldığı beğeni
747
Excel Versiyonu
Office 2016 TR
Refaz' Alıntı:
Merhaba.
Takvimi class yöntemi ile ayarladım bazı yerleri.
Takvime çift tıklarsanız textboxa tarih aktarır ve kapanır.

Dikkat edilmesi gereken userform1 deki textboxların tagı test olarak yazılırsa bunlarda çalışır bunu değiştirebilirsinizde.

Ekli dosyayı görüntüle 4076
Genişletmek için tıkla...
Refaz hocam,

Doğrudan takvim userformunun içine fonksiyon eklesek "secilentarih" gibi. Bu fonksiyonu çağırsak doğrudan olmaz mı acaba?
 
Olumlu oy 0 Negatif oyla
H

himmgarip

Excel Dostu
Kullanıcı Bilgileri
Katılım
27 Mar 2021
Mesajlar
800
Çözümler
90
Aldığı beğeni
747
Excel Versiyonu
Office 2016 TR
himmgarip' Alıntı:
Refaz hocam,

Doğrudan takvim userformunun içine fonksiyon eklesek "secilentarih" gibi. Bu fonksiyonu çağırsak doğrudan olmaz mı acaba?
Genişletmek için tıkla...

Öncelikle Balta hocama bu güzel çalışmadan dolayı teşekkür ederim.

Takvim içine fonksiyon ekleyince daha da basitleşti hocalarım.

1638145567715.png

Aşağıdaki kod ile resme tıklayınca takvimi açtırdım. Takvimden seçilen tarihi txt_tarih isimli textbox a aldırdım. Takvim userfomuna 1 adet textbox ve fonksiyon ekledim. Takvim içinde hiçbir değişiklik yapmadan birden fazla textboxa tarih yazdırılabilir. Sadece aşağıdaki kod satırını takvimi çağırdığınız textbox, label v.s. neyse ona göre revize ediniz.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

Ekli dosyalar

  • Takvim.xlsm
    52.3 KB · Gösterim: 47
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,907
Excel Versiyonu
Office 2021 TR
Merhaba sayın @himmgarip abey.
Evet aslında bende dediğiniz gibi functionlarla uğraşırdım genelde ama aklıma birden Class gelince onunla başladım ve function aklıma gelmedi.
Aslında konu sahibi abey çift tıklama istedi sonlarda bunun için bence takvimdeki butonların hepsine çift tıklama koduna tektar kodlar yazılacaktı tabii ordada tekrer bir sub içine yazılıp tüm butonların hepsine yine kod yazılmak zorunda kalınacaktı.
Ama class kodunu incelediyseniz çok sade oldu bunda dolayı.
Evet çift tıklama olmazsa function daha sade.
Yada tüm takvimdeki butonların çift tıklama olayına kodlar eklenirse başka dosyalarda sizin function daha iyi olur.

Benim yaptığım dosyada öncedende dediğim gibi sadece tag kısmına test yazılması gerek.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,907
Excel Versiyonu
Office 2021 TR
Birde önceki verdiğim dosyada denemek için kod yazmıştım takvim içine o unutulmuş silinmeyi.
Ayrıca öceki mesajda demek istediğim alttaki kod gibi uzun yazılmaya gerek yoktu çift tıklamayı.Ve alttaki kodda kısatılır class ile abey basitçe :)Tabii yapan abey böyle tercih etmiş.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

Ekli dosyalar

  • Takvim Tr Dini ve Mili Bayramlı.xlsm
    42.9 KB · Gösterim: 30
Olumlu oy 0 Negatif oyla
Patron

Patron

Site Dostu
Kullanıcı Bilgileri
Katılım
6 Mar 2021
Mesajlar
2,359
Çözümler
694
Aldığı beğeni
2,751
Excel Versiyonu
Office 2021 TR
Bir alternatif de benden olsun o zaman.
 

Ekli dosyalar

  • Takvim.xlsm
    48 KB · Gösterim: 43
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,907
Excel Versiyonu
Office 2021 TR
Elim değmişken 12.mesajdaki kodlarıda class ile kısalttım.
 

Ekli dosyalar

  • Takvim Tr Dini ve Mili Bayramlı.xlsm
    48.6 KB · Gösterim: 35
Olumlu oy 0 Negatif oyla
Patron

Patron

Site Dostu
Kullanıcı Bilgileri
Katılım
6 Mar 2021
Mesajlar
2,359
Çözümler
694
Aldığı beğeni
2,751
Excel Versiyonu
Office 2021 TR
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,907
Excel Versiyonu
Office 2021 TR
Son defa yazmış olayım son dosyamdaki Class içindeki kod alttaki ile değişirse tek tıklamada tarih atar textboxa.

C++:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
H

Hsn55

Yeni Üye
Kullanıcı Bilgileri
Katılım
14 Nis 2021
Mesajlar
568
Çözümler
2
Aldığı beğeni
87
Excel Versiyonu
Office 2010 TR
Konuyu Başlatan
Günaydın ; hücre içerisinde açılır takvimi kendi dosyama uyarladım .Fakat Textbox5 ve Textbox11 hücrelerini tıkladığımda takvim açılıyor. Günü seçtiğimde ise makroda hata veriyor. Günü Textboxlara yazmıyor. Ayrıca takvimin açılmasını textbox içerisini tıklayınca değil de, Labeli tıklayınca açılsa ve günü seçip tıklayınca tarihi textboxa yazsa T.
 

Ekli dosyalar

  • Dava-2022.xlsb
    908.3 KB · Gösterim: 36
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Toplam: 2 (Kullanıcı: 0, Ziyaretçi: 2)
Üst