Excel'de giriş yaptıktan sonra imleci otomatik olarak bir sonraki hücreye nasıl taşıyabilirim?
Bu makalede, Excel'de Enter tuşuna basmadan veri girişi yaparken imlecin otomatik olarak bir sonraki Dizi Numarası hücresine geçmesini sağlayacak bazı püf noktalarını paylaşacağım.
4 haneli seri doldurma işlemi Kutools for Excel ile 
VBA ile Enter tuşuna basmadan 4 haneli giriş yaptıktan sonra bir sonraki Sağdaki hücre hücreye otomatik geçiş
Aşağıdaki VBA kodu, Enter tuşuna basmadan 4 haneli bir sayı girdikten sonra imleci otomatik olarak sağdaki hücreye taşımanıza yardımcı olur.
1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.
2. Ekle > Modül seçeneğine 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: Dört haneli bir sayı girildikten sonra imleç otomatik olarak sağındaki hücreye geçer.
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; ardından Kutools for Excel iletişim kutusu açılacak ve ayırıcı kullanmadan içine Ardışık Numaralar girebilirsiniz. Ekran görüntüsüne bakın:
4. Tamam'a tıklayın. Artık her 4 rakam, soldan sağa tek bir hücreye yerleştirildi.
İpucu: Hücreye 5 haneli, 6 haneli… sayılar girmek istiyorsanız, koddaki 4 değerini 5, 6 veya istediğiniz başka bir değere değiştirebilirsiniz.
4 haneli seri doldurma işlemi Kutools for Excel ile
Kutools for Excel adlı kullanışlı araçla, Enter tuşuna basmadan bir aralığa seri numaraları otomatik olarak doldurabilirsiniz; bunu Dizi Numarası Ekle aracıyla yapabilirsiniz.
ücretsiz olarak yükledikten sonraKutools for Excel, aşağıdaki adımları uygulayın:
1. Seri doldurmak istediğiniz bir sütun veya satırı seçin ve Kutools > Ekle > Dizi Numarası Ekle seçeneğine tıklayın. Ekran görüntüsüne bakın:
2. Dizi Numarası Ekle iletişim kutusunda, Yeni'ye tıklayarak iletişim kutusunu genişletin. Ekran görüntüsüne bakın:
3. Ardından ihtiyacınıza uygun seriyi belirleyin. Ekran görüntüsüne göz atın:
4. Ekle > Aralığı Doldur'a tıklayın; böylece seçili aralık, ardışık numaralarla otomatik olarak doldurulacaktır.
İpucu: Dizi Numarası Ekle aracını kullanarak tekrarlanan seriler de ekleyebilirsiniz. İletişim kutusundaki Bitiş Numarası seçeneğini işaretleyin ve sağdaki metin kutusuna istediğiniz Bitiş Numarası değerini girin; böylece seri numaraları her 10 sayıda bir tekrarlanarak doldurulacaktır. Ekran görüntüsüne bakın:
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar