Bom dia,

Estou com um problema e gostaria da ajuda de vcs, sou novo em macros no excel mas preciso automatizar uma planilha, preciso criar uma planilha que tenha um botão que salve a pasta de trabalho e acrescente a versão, por exemplo:

c:vbrelatorio1
c:vbrelatorio2

e assim por diante quantas vezes o botão for acionado, preciso tambem antes de a pasta de trabalho seja salva a macro mude de planilha para a planilha de nome menu.

pesquisei alguns codigos mas nenhum conseguiu me atender, para solucionar o problema da versão eu criei uma celula que inicia com valor 1, cada vez que o botao eh acionado, adiciono +1, no nome do arquivo ponho relatorio+celula, deu certo mas nao consigo por o diretorio onde desejo salvar, segue o abaixo o codigo:

Private Sub CommandButton1_Click()
On Error Resume Next
Dim Caminho As String 'declaracao da variável caminho
Caminho = ThisWorkbook.Path & "c:vb"
ActiveWorkbook.SaveAs Filename:=Caminho & [b1].Value & "_" & [A1].Value & ".xlsm"
MsgBox ("Planilha Salva Como : ") & [b1].Value & "_" & [A1].Value & ".xlsm"

    
    
End Sub

Grato Matheus Marcondes.