Galera procurei em pesquisa mais não encontrei o que queria.
É o seguinte: tenho um form com um botão de salvar, porém gostaria de salvá-lo em local específico (e.g.: D:/meus documentos/planilhas/*.xlsm).
Mesmo se alguém copiar a planilha para outro local ela sempre irá salvar no diretório acima.
Tem como?
Obrigado.
Ola Edilson,
Estou colocando abaixo uma rotina que voce pode incorporar de acordo com sua necessidade:
Sub SALVAR()
Dim MeuDir, MeuNome
MeuDir = TextBox1
MeuNome = "SUAPLANILHA.xlsm"
Workbooks("SUAPLANILHA.xlsm").SaveCopyAs Filename:=MeuDir & MeuNome
MsgBox "Arquivo salvo com sucesso"
End Sub
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Guima.
Testado e funcionando.
Valeu Obrigado pela Força.
Caso seja necessário reabrir o tópico, o autor poderá enviar uma MP para um dos moderadores solicitando o desbloqueio.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel