Macro Salvar planilha
Enviado: 18 Jan 2016 às 15:58
por lucianolopes
Tenho uma planilha para Pedido de Compra.
Essa planilha a numeração dela é sequencial. Então, para cada pedido de compra terei uma numeração diferente, consequentemente um arquivo diferente.
Preciso desenvolver uma macro que altere o nome do arquivo, de forma a garantir que eu não tenha gravado o mesmo arquivo para mais de um Pedido.
Que essa macro além de gravar com o nome correto (atualizado) grave num diretório específico, uma vez que trabalho em rede.
Não sei se fui claro e se consegue me ajudar.
Att.
Luciano
Re: Macro Salvar planilha
Enviado: 18 Jan 2016 às 17:02
por daniexcel
Boa tarde
Postei algo no topico abaixo.. acredito que pode ajudar
http://gurudoexcel.com/forum/viewtopic.php?f=12&t=1189
segue o codigo de qualquer jeito
Código: Selecionar todosSub Save_File()
' salva o arquivo na pasta
On Error Resume Next
Dim Caminho As String 'declaracao da variável caminho
' aqui voce pode por exemplo, inserir o caminho do arquivo original, para que o arquivo seja salvo na mesma pasta ou definir uma pasta, em alguma celula ou inserindo o caminho da rede
Caminho = [Main!j2].Value & "\"
ActiveWorkbook.SaveAs Filename:=Caminho & [Main!j3].Value & ".xls"
MsgBox ("Planilha Salva Como : ") & [Main!j3].Value & ".xls na pasta " & [Main!j2].Value & " " _
, vbInformation, "GURU DO EXCEL"
End Sub
ai tem que ver como que voce vai arrumar o esquema da sequencia... voce tem que começar com um numero x, certo?
o que voce pode fazer é um incremento no seu proprio arquivo, na celula (main!j3 neste caso) que vai determinar o nome que seu arquivo será salvo
Espero ter ajudado
Re: Macro Salvar planilha
Enviado: 19 Jan 2016 às 18:38
por lucianolopes
Ola Dani!
infelizmente não consegui fazer a macro funcionar. Devo ter errado algum passo no processo, devido minha pouca experiência em elaboração de macros.
Se puder me auxiliar, segue arquivo anexo.
No rodapé da planilha tem o caminho onde eu quero salvar o arquivo.xls.
Porém, a partir dessa planilha, vou gerar um arquivo em PDF. A macro está funcionando para gerar, porém, eu preciso salvar esse arquivo pdf em um local diferente da pasta onde vou gravar o arquivo excel, entende? Um arquivo excel em uma pasta e o mesmo arquivo, só que em PDF em outra pasta (chamada "Pedidos em PDF").
No rodapé da planilha também tem o caminho para arquivar o arquivo em formato PDF.
Se puder me auxiliar, ficarei muito grato.
Att.
Luciano