VBA Substring – Como Substringar em Macro Excel

Substring é uma das funções mais populares em qualquer linguagem de programação. Ela facilita as suas tarefas enquanto lida com strings. Como o nome sugere, uma função substring divide uma string em diferentes partes com base em critérios particulares.

Existem múltiplas funções de substring VBA. Em situações práticas, estas funções de substring podem ser bastante úteis na extração de uma parte de uma string.

Hoje neste post vou explicar todas as funções de substring VBA que você pode usar nas macros do Excel:

Função Substring LEFT:

A função ESQUERDA no Excel VBA é usada para buscar um número especificado de caracteres desde o início da string. A sintaxe da função ESQUERDA é a seguinte:

Esquerda (text_string, comprimento)

• Aqui ‘text_string’ refere-se a uma string de entrada que deve ser separada.
• E ‘comprimento’ refere-se ao número de caracteres a serem extraídos.

Exemplos:

Esquerda ("Exceltrick", 5) 'dá uma saída "Excel"
Esquerda ("SomeText", 4) 'dá o resultado "Some"

Note: Ao invés de usar uma string codificada no primeiro argumento, você também pode buscar ‘text_string’ na sua planilha do Excel como ActiveSheet.Range(“A1”).

Função Substring Direita:

A função DIREITA no Excel VBA é exatamente oposta à função ESQUERDA. Ela retorna um número especificado de caracteres a partir do final da cadeia de texto. A sintaxe da função DIREITA é a seguinte:

Direita (text_string, comprimento)

• Aqui ‘text_string’ refere-se a uma string de entrada que deve ser separada.
• E ‘comprimento’ refere-se ao número de caracteres a serem extraídos, mas a extração começa do lado direito.

Exemplo:

Direito ("Exceltrick", 5) 'dá um "truque"
Direito ("SomeText", 4) 'dá o resultado "Texto"

Nota: Em vez de usar uma string codificada no primeiro argumento, você também pode buscar ‘text_string’ na sua planilha Excel como ActiveSheet.Range(“A1”).

função MID Substring:

MID é uma função muito melhor do que as duas primeiras, ela lhe dá a capacidade de especificar as posições inicial e final da string extraída. A sintaxe da função MID VBA Substring é como em:

Mid(text_string, start_position, Length)

• Aqui ‘text_string’ refere-se a uma string de entrada que deve ser separada.
• ‘start_position’ refere-se à posição numérica de onde a extração deve ser iniciada.
• E ‘length’ refere-se ao número de caracteres a serem extraídos.

Exemplo:

MID ("Exceltrick", 2,4) 'dá uma saída "celt"
MID ("SomeText", 4,4) 'dá o resultado "Text"

Note: Ao invés de usar uma string codificada no primeiro argumento, você também pode pegar ‘text_string’ da sua planilha Excel como ActiveSheet.Range(“A1”).

função SPLIT Substring:

A função SPLIT é outra função VBA que pode ser usada para substring ou divisão de uma string. A função SPLIT pode ser muito útil quando você está dividindo uma cadeia de texto em mais de uma parte com base em um delimitador. A sintaxe de uma função de divisão é como em:

Dividir (text_string, Delimiter, limit, Compare)

• Aqui, ‘text_string’ refere-se a uma string de entrada que deve ser separada.
• ‘Delimiter’ refere-se ao caractere delimitador que separa a string em partes. Este é um argumento opcional, se for deixado em branco então, o caractere de espaço ” ” é assumido como sendo o delimitador padrão.
• ‘limit’ refere-se ao número máximo de partes de substring nas quais a string deve ser dividida. É também um argumento opcional, o valor padrão é (-1) o que significa que a substring deve acontecer em cada posição onde o delimitador é encontrado.
• ‘compare’ é um valor numérico opcional que especifica a comparação a ser usada ao avaliar substrings.

Exemplo:

Por exemplo, você tem uma cadeia de texto como “Isto é uma cadeia de texto” e agora você tem que quebrar esta cadeia em palavras individuais, então neste caso, você usará o espaço ” ” como um delimitador. A função split será usada como:

Split ("Isto é uma string de texto", " " ")

O resultado desta função split é um conjunto de palavras: “This” “is” “a” “text” “string”.

Leitura recomendada: VBA Split Function

VBA Substring Macro Example:

Below Eu criei uma macro que ilustra todas as técnicas de substring disponíveis na programação VBA. Esta é uma macro simples e auto-explicativa, nesta eu simplesmente dividi uma cadeia de texto com os 4 métodos que descrevi acima.

Below é o código que eu usei para esta macro:

Sub BreakStrings()
'Função esquerda
a = Esquerda("Texto de Truque do Excel", 5)
'Função direita
b = Direita("Texto de Truque do Excel", 11)
'Função média
c = Média("Texto de Truque do Excel", 1, 11)
'Função Split
d = Split("Excel Trick Text", " " ")
Para Cada wrd In d
strg = strg & wrd & ", "
Next
'Exibir os resultados em uma caixa de mensagem
MsgBox "Left: " & a & vbNewLine & "Direita: " & b & vbNewLine & "Média: " & c & vbNewLine & "Split": " & strg
End Sub

Então, isto era tudo sobre funções de substring VBA. Partilhe a sua visão relacionada com o tópico.