0 Replies Latest reply: May 9, 2017 10:36 AM by Bruno Ducatti RSS

    Nome personalizado em macro

    Bruno Ducatti

      Bom dia, utilizo a macro abaixo para gerar um arquivo .qvd a partir de um objeto.

      Gostaria de gerar o arquivo "Dados_Veiculos" com o ano e mês atual no nome do arquivo.

       

      Tem como tratar?

       

       

      sub Exportar_Dados_Objeto

      ActiveDocument.Fields("anotransa").Select year(now())

      ActiveDocument.Fields("mestransa").Select month(now())

       

          set obj = ActiveDocument.GetSheetObject("CH371")

          obj.Restore

          ActiveDocument.GetApplication.Refresh

       

        obj.ExportEx "c:\Temp\Dados_Veiculos.qvd", 4      

       

             ActiveDocument.GetApplication.Refresh

         

      end sub