Genereren van Unique, Sequential Namen

Steven is het testen van een aantal software en hij nodig heeft om te voeden in het programma een stelletje "fake" namen. Hij zou deze namen worden gevormd als Nameaaa, Nameaab, Nameaac, en zo verder Namezzz. Dit zou vereisen creëren 17.576 namen (26 x 26 x 26). Hij vraagt ​​zich af of er een eenvoudige manier om al deze namen in Excel te genereren.

Dit soort repetitieve taak schreeuwt gewoon uit voor een macro. (Ze zijn geweldig voor het doen van saaie, saaie, repetitieve taken die u niet handmatig wilt doen.) Hier is een eenvoudige macro dat de benodigde zware werk kan doen:

Sub CreateNames ()
Dim i As Integer
Dim x As Integer
Dim y As Integer
Dim z As Integer

i = 1
Voor x = 97 tot 122
Voor y = 97 tot 122
Voor z = 97 tot 122
Cells (i, 1) = "Naam" & Chr (x) _
& Chr (y) & Chr (z)
i = i + 1
Volgende
Volgende
Volgende
End Sub

De macro maakt gebruik van drie teller variabelen (x, y en z) om te dienen als "teller variabelen" die bepalen welke letter van het alfabet wordt toegevoegd aan de "naam" gevuld in een cel. Merk op dat de FOR ... NEXT lussen variëren 97-122, die de ASCII-codes voor de kleine letters a tot z zijn.

Als u niet wilt dat een macro gebruiken om wat voor reden, typt u de volgende formule in cel A1 van een leeg werkblad:

= "Naam" & CHAR ((RIJ () - 1) / 676 + 97) & CHAR (MOD (
(RIJ () - 1) / 26,26) 97) & CHAR (MOD (ROW () - 1,26) 97)

Dit is een formule, en het resulteert in "Nameaaa" wordt weergegeven. Kopieer de formule naar beneden door rij 17.576 en u zult uw valse namen te hebben.

ExcelTips is uw bron voor kosteneffectieve Microsoft Excel training. Deze tip (12.128) is van toepassing op Microsoft Excel 97, 2000, 2002 en 2003. U kunt een versie van deze tip voor de ribbon-interface van Excel (Excel 2007 en later) vinden hier: Generating Uniek, Sequential Namen.


© 2020 Quilcedacarvers.com | Contact us: webmaster# quilcedacarvers.com