MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Abrir e Salvar um arquivo em uma determinada pasta

    Compartilhe

    elderson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 10/07/2014

    [Resolvido]Abrir e Salvar um arquivo em uma determinada pasta

    Mensagem  elderson em 28/3/2015, 13:41

    Bom dia,

    Estou precisando de um código  vba que ao clicar no botão abra a pasta de arquivos e ao selecionar o arquivo e salve a em um local especifico.

    Agradeço se alguém tiver algum exemplo;

    Desde já agradeço a atenção de todos

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 48
    Registrado : 25/06/2014

    Re: [Resolvido]Abrir e Salvar um arquivo em uma determinada pasta

    Mensagem  serbarbosaportugal em 29/3/2015, 21:06

    Boas

    Dê uma olhadela neste tópico e adapte para o tipo de arquivo...

    [Você precisa estar registrado e conectado para ver este link.]

    elderson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 10/07/2014

    Abrir e Salvar um arquivo em uma determinada

    Mensagem  elderson em 30/3/2015, 14:21

    Bom dia serbarbosaportugal

    Obrigado pela dica vou verificar e estudar o tópico.

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 48
    Registrado : 25/06/2014

    Re: [Resolvido]Abrir e Salvar um arquivo em uma determinada pasta

    Mensagem  serbarbosaportugal em 31/3/2015, 20:50

    De nada!!!

    Abraço

    elderson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 10/07/2014

    Re: [Resolvido]Abrir e Salvar um arquivo em uma determinada pasta

    Mensagem  elderson em 24/9/2015, 20:38

    Boa tarde a todos,

    Para finalizar este topico, segue abaixo como consegui resolver um dos meus prolemas.

    Private Sub Comando4_Click()

    Dim SourceFile, DestinationFile
    SourceFile = Me.txt_filelocation
    DestinationFile = Application.CurrentProject.Path & "\" & "Despesas\" & Form_F_Despesas.[Txt_NumEntrada] & ".pdf" ' Definir o nome do arquivo de destino.

    If Dir(DestinationFile) <> "" Then ' the file already exists. ask to overwrite
               If MsgBox("File already exists. Overwrite it?", vbYesNo) = vbNo Then
                   Exit Sub
               End If
           End If

    FileCopy SourceFile, DestinationFile
         

    End Sub

    Muito Obrigado serbarbosaportugal pelo interesse em tentar me ajudar, baseado no link que vc  me enviado consegui aprender um pouco.

    Também agradeço a todos que colaboram com Forum, pois através dele estou aprendendo muito!!!

    elderson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 10/07/2014

    Re: [Resolvido]Abrir e Salvar um arquivo em uma determinada pasta

    Mensagem  elderson em 24/9/2015, 20:39

    Resolvido!!!!!!!!!

      Data/hora atual: 24/6/2018, 21:20