Soru girilen verinin önüne yıl ekleme

[sirkülasyon]

Üstadım
Y3.Y55 aralığında herhangi bir hücreye rakam girişi yaptığım zaman hangi yıl içerisinde ise o yılı ekleyebilir miyiz?
Örnek :
Girilen Rakam = 25236
Olması gereken : 2022 / 25236

 

[EmrExcel16]

Merhaba , kod ile aşağıdaki gibi olur ..

Sayfanın kod bölümüne

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("Y3:Y55")) Is Nothing Or Target.Cells.Count > 1 Then Exit Sub
    Application.EnableEvents = False
    Target.Value = Year(Date) & " \ " & Target.Value
    Application.EnableEvents = True
End Sub

 

[sirkülasyon]

Teşekkür Ederim. Sağ olasın.

 

[EmrExcel16]

Teşekkür Ederim. Sağ olasın.

Rica ederim , iyi çalışmalar.

 

[Necdet]

Merhaba,

Biçimlendirme ile de yapabilirsiniz
Hücre Biçimlendirme
Sayı
İsteğe Uyarlanmış
Tür :

"2020 / " 0