Notifications
Clear all

Substituir parte de um Link por outro.

8 Posts
3 Usuários
0 Reactions
1,831 Visualizações
(@itzmeshaka)
Posts: 10
Active Member
Topic starter
 

Olá, gostaria de saber se há como sustituir automaticamente um link de uma determinada sequencia de linhas no excel..

Exemplo:
Data: 17/06/0013 http://sorteie.me/facebook/compartilhar.php?id=198484
Data: 17/06/0013 http://sorteie.me/facebook/compartilhar.php?id=214306
Data: 17/06/2012 http://sorteie.me/facebook/compartilhar.php?id=204577

Gostaria que ficasse como estes:
226) 17/06/2013 https://www.sorteiefb.com.br/tab/promocao/214733 Rifa-se Pulseiras confecionadas à mão, mande uma mensagem para nossa página para saber como efetuar o pagamento.
227) 17/06/2013 https://www.sorteiefb.com.br/tab/promocao/214834 CÓDIGO PENAL MILITAR
228) 30/06/2013 https://www.sorteiefb.com.br/tab/promocao/214662 AGUARDEM... SEGUNDA FEIRA 17/06/2013 UM SUPER PREMIO PRA GALERA DA FAN PAGE

Ou seja..
O que eu gostaria, seria substituir os http://sorteie.me/facebook/compartilhar.php?id= por https://www.sorteiefb.com.br/tab/promocao/

É possível?

Eu sei que há uma forma Manual de fazer, através do Localizar e Substituir..
Mas há alguma forma automática de fazer isto?

 
Postado : 16/06/2013 1:05 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

porque vc não grava uma macro com esse comando?

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 17/06/2013 7:22 am
(@itzmeshaka)
Posts: 10
Active Member
Topic starter
 

porque vc não grava uma macro com esse comando?

A Macro é meio "Louca" no meu PC.. Mas pode me explicar o procedimento para eu fazer a macro para realizar esta substituição?
Ou terei que fazer manualmente mesmo.. :X

 
Postado : 18/06/2013 6:19 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Não seria a mesma questão ?

[DÚVIDA] Excluir Links com Final Iguais..
Mensagem por iTzMeShaKa » 01 Abr 2013, 14:00

viewtopic.php?f=10&t=7545

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 18/06/2013 7:19 am
(@itzmeshaka)
Posts: 10
Active Member
Topic starter
 

Não seria a mesma questão ?

[DÚVIDA] Excluir Links com Final Iguais..
Mensagem por iTzMeShaKa » 01 Abr 2013, 14:00

viewtopic.php?f=10&t=7545

[]s

Não.. :) Este foi outra questão que foi resolvida..
A que eu gostaria de resolver é algo simples.. Que pode ser resolvido manualmente com o Localizar e Substituir..
Só gostaria de saber se há alguma forma de automatizar isto, ou seja, assim que eu colar uns links no Excel, ele já alterar as palavras deste link...

Assim:
O que eu gostaria, seria substituir esta parte do Link http://sorteie.me/facebook/compartilhar.php?id= por esta www.sorteiefb.com.br/tab/compartilhar.php?id=

 
Postado : 18/06/2013 6:06 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

porque vc não grava uma macro com esse comando?

A Macro é meio "Louca" no meu PC.. Mas pode me explicar o procedimento para eu fazer a macro para realizar esta substituição?
Ou terei que fazer manualmente mesmo.. :X

Da uma olhada nesses links:

http://office.microsoft.com/pt-br/excel ... 04711.aspx
http://office.microsoft.com/pt-br/excel ... 70613.aspx

http://www.cavalcanteassociados.com.br/ ... php?id=157

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 19/06/2013 7:01 am
(@itzmeshaka)
Posts: 10
Active Member
Topic starter
 

porque vc não grava uma macro com esse comando?

A Macro é meio "Louca" no meu PC.. Mas pode me explicar o procedimento para eu fazer a macro para realizar esta substituição?
Ou terei que fazer manualmente mesmo.. :X

Da uma olhada nesses links:

http://office.microsoft.com/pt-br/excel ... 04711.aspx
http://office.microsoft.com/pt-br/excel ... 70613.aspx

http://www.cavalcanteassociados.com.br/ ... php?id=157

Opa, vlw!! xD
Já criei algumas macros antes..
Mas sobre este comando de substituir palavras, como faço?

Dei uma fuçada no Google e achei este Macro:

Sub removerUnderline()
Range("A2") = Replace(Range("A1"), "_", " ")
End Sub

Então, eu poderia fazer mais ou menos desta forma?
Sub AlterarLink()
Range("A2") = Replace(Range("A1"), " http://sorteie.me/facebook/compartilhar.php?id=", "www.sorteiefb.com.br/tab/compartilhar.php?id=")
End Sub

 
Postado : 19/06/2013 7:10 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

Ué, é só vc acionar a gravação da macro e fazer o que já está fazendo:

Ctrl + L (aba substituir,

substituir http://sorteie.me/facebook/compartilhar.php?id=
por www.sorteiefb.com.br/tab/compartilhar.php?id=

Substituir tudo

Para a gravação da macro.

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 20/06/2013 5:56 am