Universal file export

Ce sujet contient 2 réponses, 2 participants et a été mis à jour pour la dernière fois par Charles Hertz, le il y a 11 années et 3 mois.

Voir les messages de 3 - 1 à 3 (sur un total de 3)

Auteur

Messages
05.02.2014 à 09:24 #34519

Charles Hertz
Participant

Hi,

I am looking for a way to create a universal export. Whatever the current path where is located the .fpd, I would like to export a 2D curve on the current user desktop.

For the moment my VBA macro works but only for my personnal dasktop path :

ActiveDatabase.Objects(Array(“pathname.2D”)).Export _
fpExportFormatEMF, “C:UsersXXXDesktopname.emf”

Does there exist a function which finds automatically the current user? Or a function which exports a .emf 2D curve on the current desktop used?

Thanks in advance.

05.02.2014 à 09:24 #34521

Charles Hertz
Participant

Hi,

I am looking for a way to create a universal export. Whatever the current path where is located the .fpd, I would like to export a 2D curve on the current user desktop.

For the moment my VBA macro works but only for my personnal dasktop path :

ActiveDatabase.Objects(Array(“pathname.2D”)).Export _
fpExportFormatEMF, “C:UsersXXXDesktopname.emf”

Does there exist a function which finds automatically the current user? Or a function which exports a .emf 2D curve on the current desktop used?

Thanks in advance.

06.02.2014 à 08:34 #34520

Bernhard Kantz
Participant

The Application object has a property UserName that you can use to build your desired Desktop path like [i]”C:Users” & Application.UserName & “Desktopname.emf”[/i].
The ActiveDatabase.Selection may be helpful for your general export task to let the user select the desired diagrams and export them to his desktop using a user-defined button associated with your macro.
Auteur

Messages

Voir les messages de 3 - 1 à 3 (sur un total de 3)

Vous devez être connecté pour répondre à ce sujet.