Excel Joinand SplitExcel funkce jsou velmi užitečné funkce. Funkce split se používá k odebrání odděleného řetězce a analýze hodnot do pole. Funkce join se používá k extrahování hodnot z pole a jejich zřetězení zpět do vymezeného řetězce., StringToProcess, Oddělovač , Počet Nitek, aby Proces , Porovnat Možnosti )
StringToProcess = řetězec, který bude proccessed
Delimiter = oddělovač, který chcete použít
Počet Řetězců Proces = Jak mnoho řetězců chcete proces
Porovnat Option = chcete oddělovač se malá a velká písmena, nebo ne
Nyní předpokládejme, že chci vzít tento řetězec, hodnota v buňce A2, zpracovat do pole, zapsat pole hodnot ve sloupci B a pak zpracování pole hodnot zpět do oddělovači řetězec určující naše vlastní oddělovač hodnotu k použití.,
Kód
Dim A, Jak Dlouho pult budeme používat proces našich záznamů
Dim ArrayValues() As String ‚Deklarovat proměnné pole
Dim StringToProcess As String ‚Toto je řetězec, který bude zpracován
Dim Counter Jak Dlouho Tato proměnná bude držet řádek proměnné pro ovládání výstupního kde chceme zapíše výstup do
StringToProcess = ActiveSheet.Buňky(2, 1).,Hodnota ‚Přiřadit hodnotu v buňce A2 naší řetězcové proměnné
ArrayValues() = Split(StringToProcess, „,“) ‚split funkce analyzován čárkou oddělené hodnoty
‚ do pole začíná na pozici 0., Pole hodnoty,
‚jsou dynamicky naplněna v závislosti na tom, jak mnoho hodnot,
‚
Counter = 2 ‚nastavíme čítač na 2, jak chceme začít psát výstup z řádku 2
Teď pojďme vzít pole hodnot a zapsat pole hodnot z buněk B2 až B8.
= LBound(ArrayValues) UBound(ArrayValues) ‚To nám umožní krok přes pole hodnot pomocí pro další funkci
ActiveSheet.,Buňky (Čítač, 2).Value = ArrayValues (a)