Como limpar uma corda em vba

Como Visual Basic for Applications programador, você deve ser capaz de remover números ou caracteres em strings para exibir informações corretas para o usuário. No VBA, você pode usar a função "Trim" para remover quaisquer espaços no início e no final de uma cadeia. A "esquerda" e "direita" funções são usados ​​para retornar um número especificado de caracteres a partir do lado esquerdo ou direito de uma string. A função "Substituir" retorna uma string em que uma substring especificada foi substituída por outra.

  • Comece digitando o seguinte para criar um novo procedimento Sub VBA:

    Private Sub cleanString ()

  • Criar e definir uma variável com uma string:

    Dim strVar As String

    StrVar = "números 2Remove e personagens 432 *% deste string.33"

  • Digite o seguinte para remover os espaços no início e no final da string:

    StrVar = Trim (strVar)

    Digite o seguinte para remover "33" a partir do final da string:

    StrVar = Esquerda (strVar, Len (strVar) - 2)

  • Digite o seguinte para remover "2" a partir do início da cadeia:

    StrVar = Right (strVar, Len (strVar) - 1)

  • Digite o seguinte para remover "432 *%" da string:

    StrVar = Replace (strVar, "432 *%", "")

  • Digite o seguinte para substituir um caractere de espaço em dupla com um único espaço na string:

    StrVar = Replace (strVar, "", "")

  • Exibir uma caixa de mensagem com a cadeia final, escrevendo a seguinte:

    MsgBox strVar

  • Digite "End Sub" para acabar com o seu procedimento e pressione "F5" para executar o código VBA.

De esta maneira? Compartilhar em redes sociais:

LiveInternet