ement
Philippe
-Message d'origine-
De : Laurent Godard [mailto:[EMAIL PROTECTED]
Envoyé : vendredi 20 janvier 2006 15:19
À : prog@fr.openoffice.org
Objet : Re: [prog] Concersion de macros > écrire en fin de tableau
Re,
n'etant pas sous windows actuellement, je ne peux tester
ma
Re,
n'etant pas sous windows actuellement, je ne peux tester
mais je pense que ceci devarit etre assez adaptable
Declare Function GetUserName Lib "advapi32.dll" Alias _
"GetUserNameA" (ByVal lpBuffer As String, ByRef nSize As Integer) As Integer
Function GetUser()
Dim RetVal As Integer
Dim
Re
Donc pas moyen de récupérer les valeurs données d'identités de OOO ?
heuu
ce n'est pas ce que j'ai dit
tu peux depuis OOo utiliser l'api win32
regarde l'instruction Declare
Laurent
--
Laurent Godard <[EMAIL PROTECTED]> - Ingénierie OpenOffice.org
Indesko >> http://www.indesko.com
Nuxeo
Merci Laurent
Donc pas moyen de récupérer les valeurs données d'identités de OOO ?
Merci
-Message d'origine-
De : Laurent Godard [mailto:[EMAIL PROTECTED]
Envoyé : vendredi 20 janvier 2006 14:46
À : prog@fr.openoffice.org
Objet : Re: [prog] Concersion de macros > écr
d sub
-Message d'origine-
De : Jovial [mailto:[EMAIL PROTECTED]
Envoyé : vendredi 20 janvier 2006 11:04
À : prog@fr.openoffice.org
Objet : Re: [prog] Concersion de macros > écrire en fin de tableau
Bonjour Philippe
>
> 1/ incrémentation automatqiue du numéro d'enregistrem
Bonjour
Par contre MonDoc.DocumentInfo.Author renvoie le nom de l'auteur, moi je
voudrais le nom de l'utilisateur (utilisation en réseau)
hum, je dirait que c'est du ressort de l'os
Si tu es sous windows, tu peux utiliser l'api win32 je pense
Laurent
--
Laurent Godard <[EMAIL PROTECTED]> -
Bonjour Philippe
1/ incrémentation automatqiue du numéro d'enregistrement
2/ automatisation du nom de la personne qui demande un numéro (récupération
du nom (application .username sous excel))
Et celle là elle est comment ?
Sub AllerDer
MonDoc = ThisComponent 'Sélectionne le document en
age d'origine-
De : Jovial [mailto:[EMAIL PROTECTED]
Envoyé : mercredi 18 janvier 2006 00:22
À : prog@fr.openoffice.org
Objet : Re: [prog] Concersion de macros > écrire en fin de tableau
Bonjour
Essaye cela
MonDoc = ThisComponent 'Sélectionne le document en cours
MaFeuille = MonDoc
Bonjour
Essaye cela
MonDoc = ThisComponent 'Sélectionne le document en cours
MaFeuille = MonDoc.CurrentController.ActiveSheet 'Attribue la feuille en
cours à la variable
oCurseur = MaFeuille.createCursor
oCurseur.GotoEndOfUsedArea(True)
NumDerligne = oCurseur.getRangeAddress.EndRow
MaFeuille.get
