Hogyan lehet továbblépni a következő cellába az Excel bevitele után?

Ebben a cikkben bemutatom azokat a trükköket, amelyekkel a kurzor automatikusan áthelyezhető a következő cellába a sorszám megadásához anélkül, hogy megnyomnánk az Enter billentyűt az Excelben.

A 4-jegyű bevitel után automatikusan lépjen a következő jobb cellába anélkül, hogy nyomja meg az Enter billentyűt a VBA segítségével

4 számjegyű sorozat automatikus kitöltése a Kutools for Excel segítségével

A 4-jegyű bevitel után automatikusan lépjen a következő jobb cellába anélkül, hogy nyomja meg az Enter billentyűt a VBA segítségével

Itt van egy VBA-kód, amely segít az 4-jegyű bevitel után automatikusan a következő jobb cellába lépni az Enter billentyű lenyomása nélkül.

1. nyomja meg Alt + F11 gombokat a megnyitáshoz Microsoft Visual Basic for Applications ablak.

2. kettyenés betétlap > Modulok és illessze be a VBA kód alá a Modulok forgatókönyv. Lásd a képernyőképet:

VBA: 4-jegyű számbevitel után automatikusan átkerül a következő jobb cellába.

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. nyomja meg F5 kulcs a kód futtatásához, és a Kutools az Excel számára megjelenik a párbeszédpanel, elválasztó nélkül beírhatja a sorszámokat. Lásd a képernyőképet:

4. kettyenés OK. Most minden 4 számjegyet egy cellába helyezett balról jobbra.

típus: Ha 5-ös, 6-os ... -ot szeretne beírni a cellába, akkor 4-ről 5-re, 6-ra vagy másra módosíthatja a kódot.

4 számjegyű sorozat automatikus kitöltése a Kutools for Excel segítségével

A Kutools az Excel számára - praktikus eszköz, a sorozatszámok automatikus kitöltése egy tartományba anélkül, hogy az Enter billentyűt megnyomná Helyezze be a sorozatszámot hasznosság.

Után ingyenes telepítés Kutools for Excel, kérjük, tegye a következőket:

1. Válasszon ki egy oszlopot vagy sort, amelybe sorokat kíván kitölteni, majd kattintson a gombra Kutools > betétlap > Helyezze be a sorozatszámot. Lásd a képernyőképet:

2. Ban,-ben Helyezze be a sorozatszámot párbeszédpanelen kattintson a gombra Újszerű a párbeszéd kibontásához. Lásd a képernyőképet:

3. Ezután adja meg a kívánt sorozatot. Lásd a képernyőképet:

4. kettyenés hozzáad > Kitöltési tartomány, akkor a kiválasztott tartomány automatikusan kitöltésre került a sorszámokkal.

típus: Val vel Helyezze be a sorozatszámot segédprogramot, akkor ismételt sorozatokat is beilleszthet. Jelölje be Végszám opciót a párbeszédablakban írja be a kívánt befejező számot a jobb oldali szövegmezőbe, és akkor a sorozatszámokat 10 számonként ismételten kitöltjük. Lásd a képernyőképet: