Page 1 sur 1

Enregistrer sur le bureau

MessagePublié: 26 Avr 2011 à 15:26
par clementbp
Bonjour,

J'ai un agent qui extrait une vue et je voudrais déposer mon fichier sur le Bureau de l'ordinateur.

Le problème est que je ne sais pas comment faire pour que l'agent fonctionne quelque soit l'utiisateur.

Pour etre plus claire, comment faire pour remplacer NOMUTILISATEUR par un nom générique

C:\Users\NOMUTILISATEUR\Desktop

Merci

MessagePublié: 26 Avr 2011 à 15:29
par Michael DELIQUE
salut

tu peut récupérer la variable username de windows ou le path du dektop s'il est en variable

sinon regarde dans les api ici , tu y trouvera peut être ton bonheur => http://forum.dominoarea.org/api-f30.html

MessagePublié: 26 Avr 2011 à 16:00
par Michael DELIQUE

MessagePublié: 26 Avr 2011 à 16:35
par roubech
sinon, tu peux demander au user de choisir notesUIWorkspace.SaveFileDialog

MessagePublié: 26 Avr 2011 à 16:57
par Bidouille
Salut,

un truc dans ce genre la

C:\Documents and Settings\%username%\Desktop\

MessagePublié: 03 Mai 2011 à 16:41
par clementbp
Désolé je ne trouve pas mon bonheur dans ce que vous m'avez indiqué.

J'ai essayé cela mais sans succès :

Code : Tout sélectionner
'Enregistre le fichier sur le bureau
      XlApp.ActiveWorkBook.SaveAs "C:\Documents and Settings\%username%\Desktop\test.xls"

MessagePublié: 03 Mai 2011 à 17:20
par Michael DELIQUE
salut

normale "%username%" n'est pas evalué par excel ou lotus faut le convertire avant...

MessagePublié: 04 Mai 2011 à 08:18
par clementbp
La solution est la suivante

Code : Tout sélectionner
'Enregistre le fichier sur le bureau
NomUtilisateur = Environ("UserName")
XlApp.ActiveWorkBook.SaveAs "C:\Users\" & NomUtilisateur & "\Desktop\Nom du fichier.xls"