6 messages in org.openoffice.fr.progRe: [prog] creer un feuille a un endr...
FromSent OnAttachments
Didier Dorange-PattoretJan 19, 2005 2:53 pm 
J-Marc GervaisJan 19, 2005 3:38 pm 
Guillaume LELARGEJan 19, 2005 11:48 pm 
Didier Dorange-PattoretJan 20, 2005 12:23 am 
M.sebJan 21, 2005 12:53 pm 
Bernard MarcellyJan 23, 2005 7:21 am 
Actions with this message:
Paste this link in email or IM:
Paste this link in email or IM:
Atom feed for this thread
Paste this URL into your reader:
Subject:Re: [prog] creer un feuille a un endroit, y coller qqchose et la sauvegarderActions...
From:Bernard Marcelly (marc@club-internet.fr)
Date:Jan 23, 2005 7:21:38 am
List:org.openoffice.fr.prog

Le 2005-01-21 21:53, M.seb a écrit :

ci joint un debut de macro que j'ai " ecris" a partir d'uen doc mais elel ne fonctionne pas

merci d'avance

Sub genereretsauver

Dim MonDocument As Object Dim AdresseDoc As String Dim PropFich() Dim NomduFichier As String

AdresseDoc = "private:factory/scalc" MonDocument = StarDesktop.LoadComponentFromURL(AdresseDoc,"facture",0, PropFich)

NomduFichier = convertToURL("file:///C:\tmp\facture.sxw") MonDocument.storeAsURL(NomduFichier, PropFich) End Sub

Il faut mettre une adresse à la windows dans l'argument de convertToURL: NomduFichier = convertToURL("C:\tmp\facture.sxw")

Prière de créer un nouveau message pour un nouveau sujet au lieu de répondre à un mail, cela perturbe les fils de discussion.

Bernard