Recuperer les initiales users dans une macro [Résolu]

Messages postés
11
Date d'inscription
lundi 30 décembre 2002
Dernière intervention
26 avril 2006
- - Dernière réponse : TOOCOOL
Messages postés
11
Date d'inscription
lundi 30 décembre 2002
Dernière intervention
26 avril 2006
- 26 avril 2006 à 12:18
Bonjour,

je cherche à faire une macro qui permet d'enregistrer un fichier excel avec le nom de fichier du type suivant :

date_initiales_compteur.xls

Le seul problème c'est que je ne sais pas comment récupérer les initiales de l'utilisateur office en vba ?
vous savez ce sont les initiales qu'on rentre à la première utilisation d'office (Excel en l'occurence ici)
savez vous comment je peux faire ?

sinon je me contenterais de pouvoir recuperer le nom de l'auteur dans les proprietes du fichier xls.
encore une fois je ne sais pas comment faire dans une macro... ???????????

merci d'avance !!! a vot' bon coeur m'sieurs dames !

A+ [;)] TOOCOOL
Afficher la suite 

5 réponses

Messages postés
4066
Date d'inscription
mardi 13 mai 2003
Dernière intervention
23 décembre 2008
0
Merci
Salut,



En ce qui concerne le nom d'utilisateur, il suffit de taper ceci dans ton code :



MsgBox "Vous vous appelez " & Environ$("username")



Pour les initiales, là, comme çà, à froid, je n'en sais rien, mais je vais me renseigner.


Manu
Avant de poster un message, n'oubliez pas de consulter le règlement.
Pensez également à valider une réponse quand celle-ci vous convient.
Attention ! Réponse validée = Question qui ne sera probablement plus visitée.
Messages postés
4066
Date d'inscription
mardi 13 mai 2003
Dernière intervention
23 décembre 2008
0
Merci
Les initiales de l'utilisateur courant
(entrées lors de l'installation d'Excel) doivent se trouver dans la clé
de registre suivante :



HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Common\UserInfo ,

variable UserInitials.



Elles sont codées en Hexadécimal, mais si tu double-cliques sur la variable, çà doit également apparaître en alphanumérique.



Vérifie que c'est bien le cas chez toi en tapant "regedit" dans le menu "Démarrer/Excéuter" de Windows.

Attention, le 11.0 peut varier, en fonction de la version d'Office qui est installée chez toi.





Si tout va bien, ensuite, il ne te reste à faire que de la manipulation
de registre. Tape "registre" dans le menu de recherche ci-dessus, et
laisse-toi guider.




Manu
Avant de poster un message, n'oubliez pas de consulter le règlement.
Pensez également à valider une réponse quand celle-ci vous convient.
Attention ! Réponse validée = Question qui ne sera probablement plus visitée.
Messages postés
11
Date d'inscription
lundi 30 décembre 2002
Dernière intervention
26 avril 2006
0
Merci
OK merci pour ton aide je teste tout ca des aujourd hui !



A+ [;)] TOOCOOL
Messages postés
40
Date d'inscription
samedi 6 novembre 2004
Dernière intervention
26 octobre 2007
0
Merci
Bonjour,



Si ce que tu veux récupérer est le nom de la personne qui a la licence :

toto=application.username

Cordialement
Messages postés
11
Date d'inscription
lundi 30 décembre 2002
Dernière intervention
26 avril 2006
-2
Merci
OK merci pour vos réponses, elles marchent à merveille !!!

A+ [;)] TOOCOOL

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.