Sub ENTREGAS_Botão2_Clique()
For i = 3 To 200
If ("L" & i) <> "" Then
Range("A1").Value = Range("H" & i)
Range("M" & i) = Range("B1")
End If
Next
End Sub
Essa macro preenche dados nas celulas da coluna M porem
Preciso que ; se dentro da coluna M já houver alguma linha preenchida não alterar o valor da célula , tentei o while mas não deu certo.
desde já agradeço a ajuda!!
Postado : 05/05/2014 10:55 am