MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

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 : 13
    Registrado : 10/07/2014

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

    Mensagem  elderson em Sab 28 Mar 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 : 47
    Registrado : 25/06/2014

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

    Mensagem  serbarbosaportugal em Dom 29 Mar 2015, 20: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 : 13
    Registrado : 10/07/2014

    Abrir e Salvar um arquivo em uma determinada

    Mensagem  elderson em Seg 30 Mar 2015, 13: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 : 47
    Registrado : 25/06/2014

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

    Mensagem  serbarbosaportugal em Ter 31 Mar 2015, 19:50

    De nada!!!

    Abraço

    elderson
    Novato
    Novato

    Respeito às Regras 100%

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

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

    Mensagem  elderson em Qui 24 Set 2015, 19: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 : 13
    Registrado : 10/07/2014

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

    Mensagem  elderson em Qui 24 Set 2015, 19:39

    Resolvido!!!!!!!!!

      Data/hora atual: Qua 07 Dez 2016, 18:19