as funções do Excel Join e SplitExcel são muito úteis. A função split é usada para pegar uma string delimitada e processar os valores em um array. A função de junção é usada para extrair os valores do array e concatená-los de volta em uma cadeia delimitada., StringToProcess, Delimitador , O Conjunto de Cadeias de caracteres para o Processo , Opção de Comparar )
StringToProcess = A string que será proccessed
Delimitador = O delimitador que você deseja usar
O Número de Cadeias de Processo = quantas seqüências você deseja processar
Comparar Option = você quer o delimitador a ser sensível a maiúsculas e minúsculas ou não
Agora, vamos supor que eu quero tirar o valor de seqüência de caracteres na célula A2, processo-lo em uma matriz, escrever a matriz de valores na coluna B e, em seguida, processar os valores da matriz de volta em uma seqüência de caracteres delimitada especificando o nosso próprio delimitador de valor de uso.,
Código
Dim Como Um Longa ‘O contador de nós estará usando o processo de nossos registros
Dim ArrayValues() Como a String ‘Declarar uma variável de matriz
Dim StringToProcess Como String ‘Esta é a string que será processado
Dim Contador desde ‘Esta variável irá armazenar a linha variável para controlar a saída para onde queremos escrever a saída para
StringToProcess = ActiveSheet.Cells (2, 1).,Valor de ‘Atribuir o valor na célula A2 para a nossa variável de seqüência de caracteres
ArrayValues() = Split(StringToProcess, “,”) ‘A função split analisado delimitada por vírgula valores
‘ para a matriz de partida na posição 0., A matriz de valores
‘dinamicamente preenchidos dependendo de quantos valores
‘não existem
Contador = 2 ‘Vamos definir o contador de 2 como queremos começar a escrever a saída da linha 2
“Agora vamos tirar a matriz de valores e escrever a matriz de valores para as células B2 a B8.
For a = LBound(ArrayValues) To UBound(ArrayValues) ‘This will us to step through the array values using the for next function
ActiveSheet.,Células (Contador, 2).Valor = ArrayValues (a)