Notifications
Clear all

Explicação macro.

3 Posts
2 Usuários
0 Reactions
984 Visualizações
(@w_silva)
Posts: 8
Active Member
Topic starter
 

Galera, estou montando uma macro para analisar erros de digitação nos e-mails (domínio) mas surgiu a seguinte duvida segue abaixo:

Range("E1").Select ' entendido'
ActiveCell.FormulaR1C1 = "=IF(RC[-1]=""hotmail.com.br"",""@hotmail.com"")" ' não entendi'
Range("E2").Select 'entendido'

Fico grato se alguém tem alguma sugestão para essa macro também aceito.

 
Postado : 03/06/2014 7:50 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Apos selecionar a celula E1, essa passa a ser a celula ativa (ActiveCell).
Nessa celula ativa e colocada a formula se(D1="Hotmail....;"@hotmail...")
Formula R1C1 significa colocar a formula indicando a linha (Row -R) e coluna (Column -C); no caso RC[-1] "traduz-se" como mesma linha (R) uma coluna à esquerda [-1]
Seleciona a celula seguinte

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

 
Postado : 03/06/2014 7:55 am
(@w_silva)
Posts: 8
Active Member
Topic starter
 

Muito obrigado meu caro mas tive uma excelente ideia
vou criar uma formula assim
=se(D1<>"hotmail.com";"@hotmail.com"

Vlw :D

 
Postado : 03/06/2014 7:58 am