Este fórum está sendo desativado

[McthheusP]

Boa tarde a todos!!
Preciso de uma ajuda...
Ao executar a macro, através de um botão na aba Itens do Contrato, preciso que a aba Medição 1 seja copiada e inserida uma nova aba na planilha renomeada como Medição 2 e a célula BT5 dessa aba seja preenchida como 02.
Isso está acontecendo na macro inserida na planilha em anexo, porém eu não estou conseguindo resolver a situação de, ao executar a macro novamente no mês seguinte, ela insira uma nova aba renomeada como Medição 3 e a célula BT5 dessa aba seja preenchida como 03.

Apenas consegui uma macro que inserisse várias abas ao mesmo tempo, porém gostaria que fosse inserida apenas uma a cada vez que a macro fosse executada.

Obrigado a todos

[osvaldomp]

Olá, @McthheusP .

O código abaixo faz uma cópia da última planilha, adiciona 1 ao valor de BT5 e renomeia. Tente fazer o que falta.

Código: Selecionar todos

Sub NovaMedição_TESTE()
 Sheets(Sheets.Count).Copy After:=Sheets(Sheets.Count)
 [BT5] = Format([BT5] + 1, "0#")
 ActiveSheet.Name = "Medição " & [BT5]
End Sub

[McthheusP]

Caro @osvaldomp , bom dia!!

Obrigado pela ajuda, a macro é exatamente para o que eu precisava, funcionou certinho...
Muito obrigado e boa semana!!!