Prezados,
Boa tarde!
Sou iniciante em Vba e criei a seguinte macro:
Sub Teste()
Dim i As Integer
For i = 2 To 26
If Range("a" & i) = "a" Then
Range("a" & i).Interior.ColorIndex = 3
End If
If Range("a" & i) = "g" Then
Range("a" & i).Interior.ColorIndex = 6
End If
Next i
End Sub
Quando procuro "a" na primeira coluna a celula fica marca e tbm quando procuro "g", quero executar esta macro trabalhando com um intervalo maior de células e copiar o valor encontrado para a "plan 2", como é possivél realizar este trabalho?
Grato.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 19/09/2012 11:08 am