JerCaz
XLDnaute Occasionnel
Bonjour le Forum,
je viens vers vous afin d'avoir une petite aide. Je cherche depuis quelques temps le moyen d'afficher dans un msgbox, ou éventuellement dans un listbox d'un formulaire, la liste des ordinateurs actuellement connectés à un fichier partagé. En gros, je cherche le moyen d'afficher la liste des 'environ("computername")' actuellement connectés.
En glanant sur le forum, puis, plus largement sur le net, j'ai trouvé ce bout de code :
mais le soucis de ce code est qu'il ne m'affiche que le nom des utilisateurs connectés, et la date et heure de connexion...
Et la création d'un fichier journal en txt n'est pas ce que je cherche.
Selon vous, est-ce possible en VBA?
Si oui, avez-vous une idée du "comment faire"?
Vous remerciant par avance de l'aide ou des suggestions que vous pourrez m'apporter...
je viens vers vous afin d'avoir une petite aide. Je cherche depuis quelques temps le moyen d'afficher dans un msgbox, ou éventuellement dans un listbox d'un formulaire, la liste des ordinateurs actuellement connectés à un fichier partagé. En gros, je cherche le moyen d'afficher la liste des 'environ("computername")' actuellement connectés.
En glanant sur le forum, puis, plus largement sur le net, j'ai trouvé ce bout de code :
Code:
Sub QuiEstConnecté()
Dim boucle As byte
Users = ActiveWorkbook.UserStatus
For boucle = 1 To UBound(Users)
affiche = affiche & Users(boucle, 1) & vbTab & CDate(Users(boucle, 2)) & vbCrLf
Next boucle
MsgBox affiche, vbInformation, "Utilisateurs connectés :"
End Sub
mais le soucis de ce code est qu'il ne m'affiche que le nom des utilisateurs connectés, et la date et heure de connexion...
Et la création d'un fichier journal en txt n'est pas ce que je cherche.
Selon vous, est-ce possible en VBA?
Si oui, avez-vous une idée du "comment faire"?
Vous remerciant par avance de l'aide ou des suggestions que vous pourrez m'apporter...
Dernière édition: