Çözüldü veri doğrulama ile, ayın son günü haricini engelleme

[gy121]

Merhaba. Hücreye ay sonu harici girişi nasıl engellerim. hangi ayı yazarsam o ayın son gününü girebileyim. Teşekkürler

31.1.2025
28.2.2025
31.3.2025 gibi

 

[muhasebeciyiz]

deneyiniz A1 e 05.2025 yazarsanız 31.05.2025 olarak yazılır veya hücreyi genişletirsek

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim hucre As Range
    On Error GoTo Hata
    Application.EnableEvents = False

    For Each hucre In Intersect(Target, Range("A1:A100"))
        If IsDate(hucre.Value) Then
            Dim girilenTarih As Date
            girilenTarih = hucre.Value          
            hucre.Value = DateSerial(Year(girilenTarih), Month(girilenTarih) + 1, 0)
        End If
    Next hucre

Hata:
    Application.EnableEvents = True
End Sub

Formüllede c1 e yaz =TARİH(YIL(A1);AY(A1)+1;0)

 

[gy121]

deneyiniz A1 e 05.2025 yazarsanız 31.05.2025 olarak yazılır veya hücreyi genişletirsek

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim hucre As Range
    On Error GoTo Hata
    Application.EnableEvents = False

    For Each hucre In Intersect(Target, Range("A1:A100"))
        If IsDate(hucre.Value) Then
            Dim girilenTarih As Date
            girilenTarih = hucre.Value       
            hucre.Value = DateSerial(Year(girilenTarih), Month(girilenTarih) + 1, 0)
        End If
    Next hucre

Hata:
    Application.EnableEvents = True
End Sub

Hocam makrosuz olabilir mi? Genelde telefondan çalışıyorum, bu yüzden açılmıyor. Tabi mümkünse. TARİH(YIL(A1);AY(A1)+1;0) formülünüzü hücreye bağlamadan yapabilirmiyiz? veri doğrulamayla. Yani A1 e ay sonu harici giriş olmasın.( formül de A1 gibi yani)

 

[muhasebeciyiz]

Makronu dosyana uygulayabilirsin.Dosyayı indiremeyeceğin için paylaşmadım.Makrosuz kolay değil.veri doğrulama ile aynı etkiyi doğrudan elde etmek mümkün değildir çünkü veri doğrulama hücredeki değeri değiştirmez, yalnızca geçerli olup olmadığını kontrol eder.

Ancak, veri doğrulama kullanarak yalnızca belirli bir tarih aralığında giriş yapılmasını sağlayabilirsin. Örneğin, bugünden sonraki tarihleri ya da yalnızca bir ay içindeki tarihleri kabul etmek gibi.

 

[Korhan Ayhan]

Alternatif..

Harici Link (Silinebilir) ; https://www.filemail.com/d/mwqvnykmunazgmo

 

[gy121]

Alternatif..

Harici Link (Silinebilir) ; https://www.filemail.com/d/mwqvnykmunazgmo

@Korhan Ayhan hocam çok teşekkürler.