Como criar backup de planilha com timestamp no nome?

Perder dados importantes por não ter um backup atualizado é um problema comum, mas facilmente evitável. Criar backups automáticos de planilhas com timestamp no nome é a forma mais confiável e eficiente de garantir que você sempre tenha uma cópia segura e identificável de seus dados, sem risco de sobrescrever versões anteriores.

Pré-requisitos

• Ter o Microsoft Excel instalado (versão 2010 ou superior)
• Conhecimento básico de macros do VBA
• Permissão para editar macros no Excel

Criando o código VBA para backup automático

O código VBA abaixo cria uma cópia da planilha ativa em uma pasta de backups, adicionando um timestamp (data e hora) ao nome do arquivo. Isso garante que cada backup seja único e facilmente identificável.

Sub CriarBackupComTimestamp()
    Dim caminhoPasta As String
    Dim nomeArquivo As String
    Dim caminhoCompleto As String
    
    ' Definir pasta de destino (altere o caminho conforme necessário)
    caminhoPasta = "C:\BackupsPlanilhas\"
    
    ' Criar a pasta se não existir
    If Dir(caminhoPasta, vbDirectory) = "" Then
        MkDir caminhoPasta
    End If
    
    ' Gerar nome do arquivo com timestamp
    nomeArquivo = "Backup_" & Format(Now, "yyyy-mm-dd_HH-MM-ss") & ".xlsx"
    
    ' Caminho completo do backup
    caminhoCompleto = caminhoPasta & nomeArquivo
    
    ' Salvar uma cópia da planilha ativa
    ActiveWorkbook.SaveCopyAs caminhoCompleto
    
    ' Mensagem de confirmação
    MsgBox "Backup criado com sucesso!" & vbCrLf & caminhoCompleto, vbInformation
End Sub

Configurando o botão para execução

Para facilitar o uso, adicione um botão na planilha que execute o código automaticamente.

1. Abra a planilha no Excel e pressione Alt + F11 para abrir o editor VBA.
2. No menu, selecione Inserir > Módulo e cole o código acima.
3. Feche o editor VBA e retorne à planilha.
4. Vá para a aba Desenvolvedor (se não aparecer, ative em Arquivo > Opções > Faixa de Opções Personalizada).
5. Clique em Inserir > Botão (Form Control) e desenhe o botão na planilha.
6. Atribua a macro CriarBackupComTimestamp ao botão.

Exemplo Prático

Conclusão

Com este método, você automatiza o processo de backup em segundos, garantindo que cada versão da sua planilha seja preservada com um timestamp único. Isso não só evita perda de dados, mas também facilita o rastreamento de alterações e a recuperação de informações específicas de qualquer momento.