Excel (salvar escolhendo lugar)

[Netrox92]

Ola,

Eu tenho uma planilha onde ela é salva automaticamente. porém ela salva os arquivos sempre no mesmo lugar e com o mesmo nome.

Eu gostaria de saber se existe algum jeito de na hora de salvar o arquivo, eu possa escolher onde ele vai ser salvo, e se tem como eu escolher o nome dele.

OBS: Tem que ser através do VBA

Se tiver algum jeito que faça ter a mesma função do"SALVAR COMO"

Desde já agradeço

Abraços

[Visitante]

este comando abre a caixa de diálogo 'Salvar como'

Application.Dialogs(xlDialogSaveAs).Show

[Netrox92]

Ae osvaldomp valeu!

Só uma pergunta.

tem como fazer para que na hora de salvar, só salve uma das "abas"?

EX: "Plan1" / "Plan2" / "Plan3"

No caso salvar só a "Plan2"

valeu mesmo!

Abraços

[Netrox92]

Ae, espero conseguir ser mais claro

Na minha planilha existem várias "abas" (Plan1, Plan2, Plan3......)

Quando eu for salvar, preciso que salve apenas uma das abas.

e eu preciso escolher o nome e o lugar onde será salvo

Obrigado abraços

[Visitante]

Na minha planilha existem várias "abas" (Plan1, Plan2, Plan3......)

ou, dito de outra forma: no seu ARQUIVO existem várias PLANILHAS (Plan1, Plan2, Plan3, ...)

Quando eu for salvar, preciso que salve apenas uma das abas.

e eu preciso escolher o nome e o lugar onde será salvo

O código abaixo faz uma cópia da planilha ativa em um novo arquivo e abre a caixa de diálogo 'Salvar como'. Rode o código a partir da planilha que deseja salvar.

Sub NovoArq()
 ActiveSheet.Copy
 Application.Dialogs(xlDialogSaveAs).Show
End Sub

[Netrox92]

Ae osvaldomp,

valeu de novo!

agora funcionou certinho

abraços

[Édnei Rodrigues]

Conforme solicitado, estamos reabrindo este tópico!

[Netrox92]

Ola,

Solicitei que reabrissem meu tópico porque fiz algumas alterações na minha planilha e surgiu outra duvida referente a este mesmo assunto.

Antes eu precisava que fosse salva apenas uma das "abas", porém depois de algumas alterações na minha planilha, me vi na necessidade de salvar 2 "abas" em um mesmo arquivo

Ex:

"Plan1" / "Plan2" / "Plan3" / "Plan4" / "Plan5" ..................

Agora preciso salvar apenas as "Plan3" e "Plan4"

e eu continuo precisando escolher o nome e o lugar onde será salvo

OBS: a "Plan3" e "Plan4" TEM QUE SER SALVA no mesmo arquivo

obrigado mais uma vez

Abraços

[Visitante]

Selecione as planilhas que deseja salvar e rode o código.

Lembrando: para selecionar planilhas cujas guias não estejam em posições vizinhas utilize a tecla 'Ctrl'. Assim, para selecionar 2 planilhas >> selecione uma delas e mantenha 'Ctrl' apertada até clicar na guia da outra.

O código funciona para qualquer qtde de planilhas selecionadas.

Sub NovoArq2()
 ActiveWindow.SelectedSheets.Copy
 Application.Dialogs(xlDialogSaveAs).Show
End Sub