Boa tarde leandroxtr,
Uma forma de você realizar um ação em todas as abas(planilhas) de seu arquivo é com o uso do For Each:
Sub RepetirAcaoEmTodasAsAbas()
Dim Ws As Worksheet
For Each Ws In Worksheets
'--Seu Código aqui
Next Ws
End Sub
Para facilitar a ajuda, disponibilize um arquivo de exemplo (umas 3 abas é mais do que suficiente para teste).
Obs: Não precisa ser com os valores originais.
att,
Postado : 10/01/2017 3:51 pm