Saberexcel - site das macros

Esta macro do Aplicativo Microsoft Excel VBA(Visual Basic Application),  faz um Backup na pasta BK, com nome no formato yyyy_mmdd ( ano,mês,dia), isto é, faz uma cópia de segurança (Backup   na pasta B, nos formatos definidos pela macro  Ano_Mes_dia. Cuidado para usar os separadores para formação do nome da planilha porque senão resulta em simbolos de funcao do aplicativo como (  /, $,&, etc...)

Sub backup_b_nome_data_atual()
    Dim vNome As String, strCaminho As String
    vNome = "C:\Meu_Backup\B" & Format(Now(), "dd_mmm_yyyyy_")
    strCaminho = Dir(vNome, vbDirectory)
    If (strCaminho= "") Then MkDir (vNome)
    ActiveWorkbook.SaveCopyAs vNome & "\BK_" & ActiveWorkbook.Name
    ActiveWorkbook.Save    'salva o arquivo ativo
  End Sub




Aprenda tudo sobre o Aplicativo Microsoft Excel VBA (Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos SaberExcel