• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

D5 İle D16 Arası Kod kullanmak

Katılım
3 Haziran 2020
Mesajlar
34
Excel Vers. ve Dili
Türkçe 2016
kolay gelsin
benim ihtiyacım olan (D5 te başlayıp D16 da) bitmesi Bu konuda yardımcı olabilirmisiniz
kullandığım kod

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Column = 5 Then
Cells(Rows.Count, "D").End(3).Offset(1).Select
End If
End Sub
 
C++:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Selection.Column <> 5 Or Selection.Row < 5 Or Selection.Row > 16 Then Exit Sub
    Cells(Rows.Count, "D").End(3).Offset(1).Select
End Sub
 
Merhaba,
Genel ve pratik yöntemi

Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Intersect(Target, [D5:D16]) Is Nothing Then Exit Sub
    'kodlarınız
    
End Sub
 
Geri
Üst