Notifications
Clear all

Como tratar Texto no VBA - =PROCURAR()

3 Posts
2 Usuários
0 Reactions
1,081 Visualizações
(@necron)
Posts: 117
Estimable Member
Topic starter
 

Ola!

Eu gostaria de exibir um MsgBox apenas com o nome de uma das planilhas abertas, por isso eu precisaria tratar o texto contido em uma variavel. No Excel eu utilizaria uma formula de =PROCURAR("";A1) misturado com =DIREITA(), misturado com =NÚM.CARACT(). Como faço isso no VBA?

O que eu quero fazer:

E como esta saindo:

Quero trazer apenas o nome da planilha.

Obrigado

 
Postado : 12/11/2014 2:34 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

Existem diferentes formas. Como vc tem um texto com vários "", segue minha sugestão:

Sub test()

Dim msg() As String

msg() = Split("c:Usersf1600549DesktopVERIFICAÇÃO DE METAS.xlsm", "")

MsgBox msg(UBound(msg()))

End Sub

Abs

PS: as fórmulas que vc se referiu, em VBa:

PROCURAR() no VBA, use Instr

DIREITA() no VBA, use Right

NÚM.CARACT() no VBA, use Len

Como pode ver, não segui esta lógica.

 
Postado : 12/11/2014 2:52 pm
(@necron)
Posts: 117
Estimable Member
Topic starter
 

Obrigado!

Com sua explicação consegui fazer de 2 modos diferentes o que eu queria, mas é claro que seu código com Split pelo carácter "" é bem mais limpo e aceitável.

Abçs

 
Postado : 13/11/2014 5:16 am