enterden sonra istenilen hücreye gitmek

[kemal turan]

merhaba,
Enterden sonra istenilen hücreye gitme kodunu yapmaya çalıştım başaramadım.
sırası ile ;
c2 açılışta seçilen hücre
e2 = c2 ye veri girildikten sonra gidilecek hücre (bunu yapabildim.)
c4
e4
c6
örnek dosya ektedir.

 

[Ömer BARAN]

Makro işinden anlamıyorum, ama aşağıdaki yöntemi uygulayarak istediğiniz sonucu elde edebilirsiniz.

Excel seçeneklerinde Gelişmiş Menüsünde, Enter'dan sonra Aşağı olan ayarı SAĞA haline getirip, veri girişi yapılacak hücreler dışındaki hücreleri kilitli konuma getirin, sonra sayfa koruması eklerseniz (kilitli hücreleri seç seçeneğinin başındaki onay işaretini kaldırarak) artık ENTER tuşuna bastıkça (veya ENTER yerine TAB tuşu da kullanılabilir) kilitli olmayan yani sadece veri girişi yapılacak hücreler arasında gezinti yapıldığını göreceksiniz.
İyi günler dilerim.

 

[kemal turan]

Merhaba ömer bey,
Bu özelliği biliyordum.Makro ile yapmaya çalışıyordum.
Çok teşekkür ederim.

 

[Murat OSMA]

Ömer Bey'in müsadesiyle...

İlgili alanların doldurulmasını zorunlu kılmak ve veri girildikçe sıralı bir şekilde boş hücreyi seçmek için bu kodları sayfanın kod sayfasına yazıp deneyin;

[FONT="Trebuchet MS"]Const Alan As String = "C2,E2,C4,E4,C6,E6"

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Ayır() As String, Hücre As Range, i%, a%
    Ayır = Split(Alan, ",")
    For i = LBound(Ayır) To UBound(Ayır)
        Set Hücre = Range(Ayır(i))
        With Hücre
            For a = 1 To .Cells.Count
                If Len(Trim(.Cells(a).Value)) = 0 Then
                    .Cells(a).Select
                    Exit Sub
                End If
            Next a
        End With
    Next i
    a = Empty: i = Empty: Set Hücre = Nothing: Erase Ayır
End Sub [/FONT]

 

[kemal turan]

Merhaba Murat bey,
İlgi ve emeğiniz için teşekkür ederim.
Selametle kalınız.

 

[Murat OSMA]

Rica ederim Kemal Bey, iyi akşamlar.