Este fórum está sendo desativado

Depois de 9 anos, este fórum será desativado. Mas calma.... estamos migrando para uma comunidade no DISCORD. Junte-se a nós.

ENTRAR PARA DISCORD

Tópicos relacionados a códigos VBA, gravação de macros, etc.
Por lucianolopes
Posts
#6539
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
Por daniexcel
Posts
#6543
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 todos
Sub 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
Por lucianolopes
Posts
#6593
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
Você não está autorizado a ver ou baixar esse anexo.
long long title how many chars? lets see 123 ok more? yes 60

We have created lots of YouTube videos just so you can achieve [...]

Another post test yes yes yes or no, maybe ni? :-/

The best flat phpBB theme around. Period. Fine craftmanship and [...]

Do you need a super MOD? Well here it is. chew on this

All you need is right here. Content tag, SEO, listing, Pizza and spaghetti [...]

Lasagna on me this time ok? I got plenty of cash

this should be fantastic. but what about links,images, bbcodes etc etc? [...]

Estamos migrando para uma comunidade no Discord