Este fórum está sendo desativado

[rfmfoz]

Boa tarde.
Todo dia eu faço alguns lançamentos em uma planilha e no outro dia começo ela do zero.
Tentei criar um macro pra ao clicar no botão "NOVO", ele me criaria uma nova guia e com os dados em branco, porém o macro ele está saindo em forma de "Picture", bem estranho.

Segue a planilha em anexo.

[babdallas]

Veja se ajuda

Código: Selecionar todos

Sub NOVO()
    Application.ScreenUpdating = False
    
    With ActiveSheet
        .Copy After:=ActiveSheet
    End With
    
    With ActiveSheet
        .Range("D2:D6").ClearContents
        .Calculate
    End With
    
    Application.ScreenUpdating = True
End Sub

[rfmfoz]

Funcionou perfeitamente!
Obrigado.