Excel'de giriş yaptıktan sonra bir sonraki hücreye nasıl otomatik olarak geçilir?

Bu makalede, Excel'de Enter tuşuna basmadan otomatik olarak imleci bir sonraki hücreye taşıyarak sıra numarası girmek için ipuçlarını tanıtacağım.

VBA ile 4 haneli girişten sonra sağdaki bir sonraki hücreye otomatik geçiş yapın, Enter tuşuna basmadan

Kutools for Excel ile 4 haneli seri otomatik doldurma

VBA ile 4 haneli girişten sonra sağdaki bir sonraki hücreye otomatik geçiş yapın, Enter tuşuna basmadan

İşte size, 4 haneli bir sayı girdikten sonra Enter tuşuna basmadan otomatik olarak sağdaki bir sonraki hücreye geçmenize yardımcı olabilecek VBA kodu.

1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

2. Ekle > Modül'e tıklayın ve aşağıdaki VBA kodunu Modül betiğine yapıştırın. Ekran görüntüsüne bakın:

VBA: 4 haneli sayı girişi sonrası otomatik olarak sağdaki bir sonraki hücreye geçiş yapma.

Sub FourCharEntry1()
'UpdatebyExtendoffice20160614
    Dim xStr As String
    Dim I As Integer
    Dim K As Integer
    xStr = Application.InputBox("Enter string", "Kutools for Excel", , , , , , 2)
    K = 0
    Application.ScreenUpdating = False
    For I = 1 To Len(xStr) Step 4
        ActiveCell.Offset(0, K) = "'" & Mid(xStr, I, 4)
        K = K + 1
    Next
    Application.ScreenUpdating = True
End Sub

3. Kodu çalıştırmak için F5 tuşuna basın ve bir Kutools for Excel iletişim kutusu açılacak, ayırıcı olmadan sıra numaralarını buraya girebilirsiniz. Ekran görüntüsüne bakın:

4. Tıklayın Tamam. Şimdi her 4 rakam soldan sağa doğru bir hücreye yerleştirildi.

İpucu: Eğer 5 haneli, 6 haneli… bir sayı girmek isterseniz, kodda 4'ü 5, 6 veya başka bir sayıya değiştirebilirsiniz.

Kutools for Excel ile 4 haneli seri otomatik doldurma

Kutools for Excel – kullanışlı bir araç ile, Insert Sequence Number (Sıra Numarası Ekle) özelliği sayesinde Enter tuşuna basmadan bir aralığa otomatik olarak sıra numaraları ekleyebilirsiniz.

Ücretsiz olarak Kutools for Excel'i yükledikten sonra lütfen aşağıdaki adımları izleyin:

1. Seriyi doldurmak istediğiniz bir sütun veya satırı seçin ve tıklayın Kutools > Ekle > Insert Sequence Number. Ekran görüntüsüne bakın:

2. İçindeki Insert Sequence Number diyalog kutusunda tıklayın Yeni diyalog kutusunu genişletmek için. Ekran görüntüsüne bakın:

3. Daha sonra ihtiyacınız olan seriyi belirtin. Ekran görüntüsüne bakın:

4. Tıklayın Ekle > Aralığı Doldur, ardından seçilen aralık sıra numaralarıyla otomatik olarak doldurulacaktır.

İpucu: Insert Sequence Number özelliğiyle tekrarlanan seriler de ekleyebilirsiniz. Kontrol edin Bitiş numarası seçeneğini diyalog kutusunda işaretleyin, sağdaki metin kutusuna istediğiniz bitiş numarasını girin ve ardından sıra numaraları her 10 sayıda bir tekrarlanarak doldurulacaktır. Ekran görüntüsüne bakın: