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.