VBA - Mid

A função Mid retorna um número especificado de caracteres de uma determinada string de entrada.

Sintaxe

Mid(String,start[,Length])

Descrição do Parâmetro

  • String- Um parâmetro obrigatório. String de entrada a partir da qual o número especificado de caracteres a ser retornado.

  • Start- Um parâmetro obrigatório. Um número inteiro, que especifica a posição inicial da string.

  • Length- Um parâmetro opcional. Um número inteiro, que especifica o número de caracteres a serem retornados.

Adicione um botão e adicione a seguinte função.

Private Sub Constant_demo_Click()
   Dim var as Variant
   var = "Microsoft VBScript"
   msgbox("Line 1 : " & Mid(var,2))
   msgbox("Line 2 : " & Mid(var,2,5))
   msgbox("Line 3 : " & Mid(var,5,7))
End Sub

Quando você executa a função acima, ela produz a seguinte saída.

Line 1 : icrosoft VBScript
Line 2 : icros
Line 3 : osoft V