Views

...

Important:

Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog podem ser tratados como consultoria freelance.

E-mails

Deixe seu e-mail para receber atualizações...

eBook Promo

VBA Tips - Como verificar um caractere de tabulação no VBA




Mais dia, menos dia se deparará com arquivos onde precisará identificar ou verificar se existem caracteres de tabulação ao usar o Visual Basic for Applications (VBA).

Com o VBA isso fica simples porque podemos usar a função "Chr" com um código de caractere ANSI para determinar se é um caracter de tabulação ou não.

O código para isso não é nada mais do que um IF para identificar o caracter como tabulação. Também podemos usar vbTab no VB para inserir tabulações entre campos de um arquivo texto.

Exemplo:

1 - Crie quatro variáveis que usará para verificar um caractere de tabulação através do seguinte código VBA:

Dim tabString As String

Dim char As String

Dim length As Integer

Dim xCntr As Integer

2 - Insira uma string com tabulação na variável "tabString" inserindo o código abaixo:

Let tabString = "Olá" & vbTab & "Bernardes!"

3 - Obtenha o tamanho da variável string com o seguinte código:

Let length = Len (tabString)

4 - Faça um laço que percorra cada caractere na variável string e busque pelo caractere de tabulação através da função "Chr(9)" inserindo o código VBA abaixo:

Let char = Left(tabString, 1)

For xCntr = 0 To length - 1

Let tabString = Right(tabString, Len(tabString) - 1)

If char = Chr(9) Then
MsgBox "Número de índice " & xCntr & " é uma tabulação na variável String."
End If

Let char = Left(tabString, 1)

Next xCntr

Tags: Tips, VBA, vbTab, ANSI, VB, Chr,


eBooks VBA na AMAZOM.com.br

LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...

Vitrine