Afficher dans une cellule le nom de l'utilisateur

Bonjour

Tout est dans le titre et dans le fichier ci-joint

Merci pour votre aide

Bonjour,

Essayez ceci:

Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Count > 1 Then Exit Sub
     On Error GoTo Sortie
     Application.EnableEvents = False
     If Not Intersect(Target, Range("A2:H1000")) Is Nothing Then
        Cells(Target.Row, "M") = Date & " " & Time
        Cells(Target.Row, "N") = Application.UserName
     End If
Sortie:
     Application.EnableEvents = True
End Sub

Cdlt

Bonjour Arturo 83

merci pour ton aide

Ce que tu as envoyé comme code vba correspond presque à la demande

Tu verras dans la photo ci-joint que dans la colonne N c'est un pseudo qui figure

il faudrait que ce soit le nom qu'il y a en haut à droite (entouré en rouge)

je ne sais pas si cela est possible

Où est la photo?

elle arrive sur le post précedent

Bonjour,

Regarde du côté de :

Environ("Username")

Peut-être?

Bonne soirée

Ǐa, je ne pense pas pouvoir le faire, il faudrait que je sache comment il est aller se loger là haut, peut-être une nouvelle possibilité d'une version plus récente d'excel, si c'est le cas, ma version de 2007 ne le permet pas, ou bien je l'ignore.

Bonjour cousinhub

Ce que tu me propose est pratiquement bon le hic ça ne prend en compte que le prénom .

Le nom qui suit n'est pas pris en compte exemple (jean dupont ) jean apparait mais pas dupont

peut être n'est ce pas possible

@Arturo83 donc c'est normal j'ai office 2016 je te remercie pour la piste évoquée

Re-,

Ce que je t'ai proposé te ramène l'identifiant de connexion...

Et si je me souviens du fil source de ta demande, c'est ce qu'il voulait, il me semble...

Sur un PC perso, on n'a que notre identifiant,(C/Users/Ton nom) mais sur un PC en réseau, c'est ce qu'il faut...

Et ce qui apparaît dans ton image, c'est ton identifiant de connexion µSoft..

Salut,

Normalement Application.UserName te renvoie bien le nom de celui qui c'est loggé sur Office.

Re-,

Modifiable à souhait...

Merci à tous pour votre aide

Bonne soirée