Voorloopnullen
zijn nullen die komen voor een aantal , zoals de twee nullen " 001234 . " Deze nullen hebben geen waarde , uiteraard , zodat ze niet het nummer in een echte manier te veranderen , ze hebben alleen het uiterlijk van het nummer te wijzigen . Voorloopnullen in Excel kan handig zijn als u een lange reeks getallen die bevatten allemaal hetzelfde aantal cijfers , ongeacht hun werkelijke waarde , omdat een formule ergens op het werkblad maakt gebruik van een bepaald cijfer om een functie uit te voeren .
< br >
VBA Code eisen

Wanneer u een macro in VBA , zoals een tot nullen op een reeks nummers toe te voegen , zijn er slechts een paar eisen die je moet krijgen rechts . Open eerst de VBA- editor door op " Alt " en " F11 ", klik met de rechtermuisknop op uw werkblad en plaats een module . VBA-macro's worden altijd opgenomen in de modules . Klik op de module en klik op de witte ruimte aan de rechterkant van het scherm . Typ de volgende code :

Sub LZero
( )

Change " LZero " aan welke naam u wilt dat uw macro te hebben
. Druk op "Enter " en Excel automatisch " End Sub " onder deze regel toe te voegen . Je hebt nu alle voor uw VBA- code eisen .
Rechterfunctieknop en Concatenate

nullen aan een cel toe te voegen , kunt u gebruik maken van de juiste functie , samen met een eenvoudige samenvoeging . Deze formule toevoegen aan een nieuwe kolom kan een eenvoudig proces in Excel zijn , maar wanneer u het nodig om het te doen in VBA , wordt het een beetje ingewikkelder . Voer de volgende code tussen de " Sub Lzero ( ) " en " End Sub " lijnen :

Dim x As Integer

Dim y As Integer

Voor x = 1 To 10

y = Cells ( x , 1 ) . Value

Cells
( x , 1 ) . FormulaR1C1 = " = RECHTS ( " " 00000 " " & " & y & " , 6 ) "

Volgende

Verander de getallen in " 1 tot 10 " aan die gelijk is aan de rijen die u wilt beginnen en eindigen uw formule op te zijn . Dus als je wilt beginnen op cel " A5 " en eindigt op " A15 ", zou je dit veranderen in " 5 tot 15 " :

Voor x = 5 Voor 15

Verander de " 1 " in beide gevallen van " Cells ( x , 1 ) "om gelijk aan het nummer van de kolom waarop u wilt de leidende nullen toe te voegen . Kolom " A" is gelijk aan " 1 " en elke kolom verder naar rechts voegt nog het nummer .

Tenslotte verandert de "6 " aan het einde van de code gelijk aan de te totale aantal cijfers dat u wilt het nummer te hebben , en verander de " 00000 " om een ​​minder nul dan de totale cijfers hebben . Sluit de VBA- editor met behulp van de " X " aan de bovenkant van het venster . Run uw code door te klikken op de knop " Macro " onder het tabblad Ontwikkelaars .
Selection.NumberFormat

U kunt ook het aantal wijzigen in voorloopnullen weergeven. Dit werkt net zoals het zou doen als je met de rechtermuisknop klikken op de cel , selecteert u " Cellen opmaken " en maak een aangepaste getalnotatie . Voer de volgende code tussen de " Sub Lzero " en " End Sub " lijnen :

Selection.NumberFormat
= " 000000 "

Wijzig het aantal nullen dat gelijk is aan het totale aantal cijfers te zijn je wilt de nummers te hebben . Aangezien dit proces zal de opmaak van de cel , en niet alleen het nummer te wijzigen , zal elke nieuwe nummer dat u typt in deze cellen hebt je nullen . Voordat u deze macro uitvoert , moet u de cellen die door de macro gewijzigd moet worden .