SÜtun Atlatma

[pier014]

Üstadlar merhaba;
A sütununa girdiğim numaralara ait bilgileri B sütununa formulle getiriyorum. Sorum ise A sütununa numarayı girdikten sonra enter yaptığımda C sütununa direk geçerek girişe devam edebileceğim bir fonksiyon veya formul varmıdır? Yardımlarınız için şimdiden teşekkürler.

 

[Korhan Ayhan]

Selamlar,

İstediğiniz işlemi ancak kod ile yapabilirsiniz. Aşağıdaki kodu ilgili sayfanın kod bölümüne uygulayıp denermisiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, [A2:A65536,C2:C65536]) Is Nothing Then Exit Sub
    If Target.Count > 1 Then Exit Sub
    If Not IsEmpty(Target) And Target.Column = 1 Then Target.Next.Next.Activate
    If Not IsEmpty(Target) And Target.Column = 3 Then Target.Offset(1, -2).Activate
End Sub

 

[uzmanamele]

merhaba
syn Korhan Ayhan,
Then Target.Next.Next.Activate
ilk kez gördüm, ufkumu açtı, teşekkürler.

 

[pier014]

üstadim VerdİĞİn Kodu Uyguladim. Yalniz ŞÖyle Bİr Sorun Çikti. Benİm GÖnderdİĞİm Sayfa ÇaliŞma Sayfam DeĞİldİ. ÇaliŞma Sayfamda Numara D Sutununda Ve Ben Buraya GİrİŞ Yaptiktan Sonra G Sutununa Gİtmek İstİyorum. VerdİĞİn Koddakİ DeĞerlerİ DeĞİŞtİrdİm Ama SonuÇ Elde Edemedİm ( E Sutunu Gİzl&#304.

 

[Seyit Tiken]

Bu şekilde kendinize uyarlayın.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then Target.Offset(, 1).Next.Select
End Sub

 

[pier014]

Bu şekilde kendinize uyarlayın.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then Target.Offset(, 1).Next.Select
End Sub

ÜSTADIM TEŞEKKÜR EDERİM