Hücre Atlatma

[mustili]

Merhaba

2 hücreye değer girip entere basınca 7 hücre atlatmam gerekiyor. Örnek çalışma ek'tedir Yardımlarınız için teşekkürler

 

[uzmanamele]

merhaba
nerden nereye hangi şartlarda atlayacaksınız, biraz daha net açıklayınız?

 

[mustili]

özür dilerim ekli dosya yanlıştır şimdi doğrusunu ekliyorum

 

[uzmanamele]

merhaba

aşağıdaki kodları sayfanın kod bölümüne yazarak dener misiniz?

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, [e:e]) Is Nothing Then Exit Sub
If Target.Offset(0, -2) = "Çıkış" And Target.Offset(-1, 0) <> "" Then
ActiveCell.Offset(7, 0).Select
End If
End Sub