Este fórum está sendo desativado

[TarcisioSSA]

Prezados,

Boa Tarde

Gostaria de criar uma macro que fosse possível contar a quantidade de linhas na coluna A e aplicar a partir de uma determinada célula (k2) uma formula e a aplicar nas demais células abaixo ( da K2) dela pela quantidade de linhas encontradas na coluna A.

Desde já agradeço.

[osvaldomp]

Experimente:

Código: Selecionar todos

Sub InsereFórmulas()
 Columns(11) = ""
 Range("K2:K" & Cells(Rows.Count, 1).End(3).Row).FormulaLocal = "=ABS(SUBSTITUIR(A2;""."";""""))"
 'Range("K2:K" & Cells(Rows.Count, 11).End(3).Row).Value = Range("K2:K" & Cells(Rows.Count, 11).End(3).Row).Value
End Sub

obs. se você quiser substituir as fórmulas inseridas pelos seus respectivos valores então remova o apóstrofo do início da penúltima linha do código.