AJUDA COM REPLACE POR FAVOR?

MESTRE 07/07/2014 11:13:40
#439376
Alguem poderia me ajudar, preciso fazer um Do While que conte 100 itens..

possuo os itens divididos por uma [Ô] | [Ô].. no caso vou exemplificar:

1.1 | Abacaxi
1.2 | Manga
10929 | Laranja

preciso apenas de por ex: Abacaxi,Manga,Laranja.. do que vem escrito após a | que separa..

No caso preciso usar um Replace e pegar o texto apenas após o [Ô]|[Ô] que é o que me interessa, só que nao posso simplesmente alterar para nao vir o item anterior a |...

estou com dificuldade pra desconsiderar os items e pegar apenas o texto, lembrando que alguns itens vái texto tbm por ex: 123ABC | Abacate..
RO.DRIGOSG 07/07/2014 11:58:42
#439379 Resposta escolhida
Bom dia,

Use a instrução InStr para verificar em qual posição está a barra [Ô]|[Ô] e dai fazer o seu Loop.

MESTRE 07/07/2014 13:29:26
#439388
poderia dar um exemplo de como usar a funçao ?
MESTRE 07/07/2014 14:16:44
#439392
Consegui de outro jeito.

vlw

     ww = [Ô]1.23 | ABCDEFG[Ô]
   
   i = Len(ww)
   W = 1
   Do While W <> i
    If Mid(ww, W, 1) = [Ô]|[Ô] Then
      wCod = Mid(ww, 1, W - 2)
      WDES = Mid(ww, W + 2, i)
      Exit Do
   End If
   W = W + 1
   Loop
Tópico encerrado , respostas não são mais permitidas
Voltar