- Katılım
- 24 May 2021
- Mesajlar
- 6
- Aldığı beğeni
- 3
- Excel V
- Office 2019 TR
Konu Sahibi
Aşağıdaki kod ile F sütunundaki hücrelere çift tıklayarak günün tarihini yazdırıyorum.
Şunu yapamadım. F sütununda en üstteki hücreye çift tıkladığımda dolu olan tüm satırların F sütununa
tek seferde günün tarihini yazdırmak. Yardımınızı rica ediyorum.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, [F:F]) Is Nothing Then Exit Sub
Target = Date
Target.Offset(1).Select
End Sub
Şunu yapamadım. F sütununda en üstteki hücreye çift tıkladığımda dolu olan tüm satırların F sütununa
tek seferde günün tarihini yazdırmak. Yardımınızı rica ediyorum.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, [F:F]) Is Nothing Then Exit Sub
Target = Date
Target.Offset(1).Select
End Sub
