Página 1 de 1

Macro para copias formula e criar nova guia

Enviado: 23 Out 2018 às 14:17
por 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.

Re: Macro para copias formula e criar nova guia

Enviado: 24 Out 2018 às 12:27
por 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

Macro para copias formula e criar nova guia

Enviado: 24 Out 2018 às 12:33
por rfmfoz
Funcionou perfeitamente!
Obrigado.