Duvida Macro inserir dados

[Jgabrielbr]

Ola estou com o seguinte problema, eu estou tentando fazer o seguinte:

 

Tenho coluna A/B/C/D/ 

 

Queria fazer uma macro que quando eu colocasse um código na coluna D ele preenchesse automaticamente as colunas A/B/C.

 

Eu tentei fazer o seguinte: 

 

Function insereDados (cod As Range)

 

if cod = "M1" then

InsereDados = 12

 

End if

End Function

 

 

'Desse jeito ele insere na celula aonde está a função, mas se tento colocar em outras células (ex: Cells(xx) = 10) não da certo, seria porque é uma Function? como faria isso por macro? 

 

Obrigado desde já.

[Xflapc2]

Uma função não pode mudar o conteúdo das planilhas, ela apenas pode retornar valores.

voce precisara criar um codigo para monitorar a coluna D, e havendo a inserção do dado que voce quer na coluna D ela executará a macro.

Dá uma olhada neste post e vê se consegue adaptá-lo ao seu caso.

http://forum.clubedohardware.com.br/forums/topic/1073817-fun%C3%A7%C3%A3o-se-com-condi%C3%A7%C3%A3o-e-looping-vba/

[Basole]

Xflapc2, 

Pelo que eu entendi o que ele quer da pra fazer com formulas. Segue um exemplo: 

InserirDados.xlsx

[Frederico Koch]

Xflapc2, pode usar a função PROCV() como o Basole falou, mas se insistir numa macro utilize o VLookUp

 

=VLOOKUP(valor_procurado,matriz_tabela,número_índice_coluna,procurar_intervalo)

[Xflapc2]

... excluir