de Excel Join en SplitExcel functies zijn zeer nuttige functie. De split-functie wordt gebruikt om een gescheiden tekenreeks te nemen en de waarden te ontleden in een array. De join-functie wordt gebruikt om de waarden uit de array te extraheren en ze samen te voegen in een gescheiden tekenreeks., StringToProcess, Scheidingsteken , Het aantal Snaren te Verwerken , Vergelijken Optie )
StringToProcess = De string die zal worden proccessed
Delimiter = Het scheidingsteken dat u wilt gebruiken
Het aantal Snaren te Verwerken = hoeveel snaren wil je proces
Optie Vergelijken = wilt u het scheidingsteken rekening wordt gehouden met hoofdletters of niet
laten we Nu eens aannemen dat ik de string waarde in cel A2, proces in een matrix, een schrijven van de array de waarden in kolom B en vervolgens het verwerken van de array de waarden terug in een gescheiden tekenreeks opgeven van onze eigen scheidings-waarde te gebruiken.,
Code
Dim A As Long ‘De teller zullen we met behulp van het proces van onze records
Dim ArrayValues() As String ‘het Declareren van een array-variabele
Dim StringToProcess As String ‘Dit is de string die zal worden uitgevoerd.
Dim Teller As Long ‘Deze variabele wordt houd de rij-variabele om de controle van de uitvoer, waarbij we willen schrijven de uitgang
StringToProcess = ActiveSheet.Cellen (2, 1).,Value ‘Assign the value in cell A2 to our string variable
ArrayValues() = Split(StringToProcess,”,”) ‘The split function parsed the comma delimited values
‘ into the array starting at position 0., De array waarden
‘worden dynamisch ingevuld afhankelijk van het aantal waarden
‘er zijn
Counter = 2 ‘We zetten de teller op 2 als we willen beginnen met het schrijven van de uitvoer van rij 2
‘laten we nu de matrixwaarden nemen en de matrixwaarden naar cellen B2 via B8 schrijven.
For a = LBound(ArrayValues) To Ulbound(ArrayValues) ‘dit zal ons toelaten om door de array waarden te stappen met behulp van de voor volgende functie
ActiveSheet.,Cellen (Teller, 2).Value = ArrayValues (A)