Notifications
Clear all

procv com loop

4 Posts
3 Usuários
0 Reactions
1,518 Visualizações
(@denisw)
Posts: 64
Estimable Member
Topic starter
 

Public Sub Atualizar_Controle()
For i = 3 To 1000
If Range("M" & i) = "" Then
If ("L" & i) <> "" Then
Range("A1").Value = Range("H" & i)' ele pega o dado da linha da coluna a H ecola na range A1'
Range("M" & i) = Range("B1") a range B1 tem um procv assim (=PROCV(A1;desp!A6:C390;3;FALSO) e o resultado vai pra linha da coluna M e depois segue pra próxima linha
End If
End If
Next
QUERO COLOCAR ESSE PROCV NO VBA porque quero eliminar as formulas da planilha. Mas não consegui. preciso de uma luz.

 
Postado : 27/08/2014 10:17 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

denisw,

Boa Tarde!

Assim:

Range("M" & i).FormulaLocal = "=PROCV(A" & i & ";desp!A6:C390;3;FALSO)"
 
Postado : 27/08/2014 12:30 pm
(@denisw)
Posts: 64
Estimable Member
Topic starter
 

diz da forma q estava antes, pq elimina a formula nas linhas, se eu fizer da forma q vc sugeriu , o resultado é uma formula, e tem q ser apena so valor, aacho q terei de usar o find do vb , acredito q ele retornará valor ou "". tem como fazer O find com Range( A & i)?

 
Postado : 11/09/2014 10:42 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Você quer inserir o resultado de uma formula em uma coluna?

Eu tenho algumas postagens próxima disso..
http://www.google.com.br/cse?cx=partner ... gsc.page=1

Att

 
Postado : 11/09/2014 10:47 am