VBA - renomear, mover o ficheiro e guardar caminho na BD

boa noite,

estou com imensas dificuldades em criar um código VBA para efetuar os seguintes passos:

renomear o ficheiro existente na seguinte pasta - d:\access\*.pdf
em que os critérios para renomear e que fazem parte do formulário é o valor do ID & Origem das Guias & a data atual
posteriormente terá de mover o ficheiro para outra pasta d:\access arquivo\*.pdf e guardar esta directoria de forma a permitir abrir o documento através de outro comando.

é possível ajudarem-me com este problema!
consigo utilizar algumas das opções apresentadas por vós no forum mas quando tento adaptar as minhas necessidades dá erros.

muito obrigado pela vossa colaboração.

estava a tentar anexar a BD... mas não consigo!

Olá, seja bem vindo ao fórum!

Já tentou as dicas da sala de códigos VBA? O colega JPaulo deixou umas linhas de código bem detalhadas sobre isso que precisas.

Sim, já tentei! Apenas consigo utilizar a função mover os ficheiros que foi apresentado pelo colega JPaulo!
Quando tento utilizar as várias funções em VBA dá erros.

Necessito mesmo de ajuda!
Relembro que não tenho muitos conhecimentos de VBA.
Utilizo pouco e em situações muito básicas.

Queria acrescentar que este forúm despertou em mim uma enorme curiosidade sobre BD em access. Não tenho nenhuma formação de access, mas tenho tentado ler e praticar ao máximo, tentando simplificar BD que utilizo no meu dia a dia.



abraço

Boa tarde, Mateus, e bem-vindo ao fórum
Utilize
Sub MudaNomeFicheiro(NomeFicheiroCompleto As String, NovoNomeCompleto As String)
'criada por Alexandre Neves www.esnips.com\web\alexandreneves
On Error GoTo MostraErro
Dim FSO As FileSystemObject
Dim F As file

Set FSO = New FileSystemObject

Set F = FSO.GetFile(NomeFicheiroCompleto)
FSO.CopyFile F, NovoNomeCompleto
FSO.DeleteFile F
Set FSO = Nothing
Sair:
Exit Sub
MostraErro:
If err.Number = 53 Then
MsgBox "O ficheiro " & NomeFicheiroCompleto & " não existe."
Else
MsgBox err.Number & vbCr & err.Description, , "Nome não alterado"
End If
GoTo Sair
End Sub

Olá Alexandre Neves, muito obrigado pela tua colaboração.

Infelizmente não entendo todos os códigos apresentados e não estou a conseguir utilizar o código VBA apresentado.

O objetivo é ao carregar no comando (MudaNomeFicheiro):
- ir à pasta "d:\access arquivo\.pdf" (o nome do ficheiro pdf é variável, por isso só existe um ficheiro de cada vez para tratar) e modificar o nome do ficheiro tendo em conta os dados existentes nos campos do formulário: ID & Origem da GT & data, mantendo a mesma extensão (pdf);
- deverá mover ou copiar (copiando o ficheiro, terá de eliminar da pasta d:\access arquivo\*.pdf);
- posteriormente, terá de guardar o caminho onde está arquivado o documento, de forma a permitir visualizar o documento através de outro comando.

Isto terá de ser automatizado porque atualmente é efetuado manualmente e existe imensos erros na associação dos documentos à base de dados.

Em anexo está a base de dados teste, para me ajudar por favor.
help.

Boa noite, Mateus
Não entendi o que pretende. Indique dados concrectos para que possam encaminhar ao que pretende.

Quero armazenar em um campo o caminho de um arquivo pdf que será armazenado em uma pasta definida pelo sistema e quando quiser quero poder abrir o arquivo...

Boa noite, Jack
vamos por partes:
1 - já tem o caminho do ficheiro?
2 - sabe guardar o valor na tabela?

Exemplo

Tenho um formulario de cadastramento de clientes, onde um belo dia este cliente me manda uma xerox de sua identidade, quero armazenar junto com o seu registro, este sistema roda em varias maquinas então qualquer maquina pode anexar o arquivo.
o Back end esta no servidor.

Exemplo scaneio o documento em uma pasta qualquer, entro no formulario Alterar Cliente, e clico em um botao qualquer que vai me perguntar que arquivo quero anexar, ai clico no pdf que vai ser salvo no servidor pasta 10.40.112.163\dados
e quero ter a opção de visualizar sempre que quiser este arquivo dentro do formulario cliente

se vc puder me ajudar eu agradeço de coração

Jack,
Não entendi bem a sua descrição
Tem um ficheiro pdf e qué-lo carregar no servidor?
Se for isto, não lhe sei ajudar mas veja aqui