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.
denisw,
Boa Tarde!
Assim:
Range("M" & i).FormulaLocal = "=PROCV(A" & i & ";desp!A6:C390;3;FALSO)"
Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel
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)?
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
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel