Bonjour
A l'ouverture du classeur j'arrive à récupérer le login de l'utilisateur par
une fonction GetUserName
(par exemple je récupère 625)
J'ai sur une feuille une liste déroulante "ChoixRessource".
Cette liste comporte deux colonnes (nom + login)
J'initialise cette liste déroulante avec la procédure Private Sub
Init_Click() ci dessous
la colonne liée est la deuxième colonne (colonne masquée 0 en largeur)
J'aimerai que la la liste s'initialise et inscrive le nom de l'utlisateur
corresponde au login trouvé
Private Sub Init_Click()
Dim TabRessources(3, 2) '3 lignes 2 colonnes
TabRessources(1, 1) = "Pierre"
TabRessources(1, 2) = 625
TabRessources(2, 1) = "Isabelle"
TabRessources(2, 2) = 222
TabRessources(3, 1) = "Marion"
TabRessources(3, 2) = 111
Me.ChoixRessource.ColumnCount = 2
Me.ChoixRessource.BoundColumn = 2
Me.ChoixRessource.ColumnWidths = "70;0"
Me.ChoixRessource.List() = TabRessources
'la ligne suivante me génère une erreur
Me.ChoixRessource=GetUserName 'j'ai pourtant un 625 dans GetUserName
End Sub
en fait, il faudrait qu'il m'ecrive le nom de l'utilisateur correspondant au
GetUserName
merci de vos conseil
Pierre
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
isabelle
bonjour Pierre,
c'est peut être une erreur causée par le type string ou integer,
essaie comme ça :
Me.ChoixRessource = "" & GetUserName
isabelle
Bonjour A l'ouverture du classeur j'arrive à récupérer le login de l'utilisateur par une fonction GetUserName (par exemple je récupère 625) J'ai sur une feuille une liste déroulante "ChoixRessource". Cette liste comporte deux colonnes (nom + login) J'initialise cette liste déroulante avec la procédure Private Sub Init_Click() ci dessous la colonne liée est la deuxième colonne (colonne masquée 0 en largeur) J'aimerai que la la liste s'initialise et inscrive le nom de l'utlisateur corresponde au login trouvé
Private Sub Init_Click() Dim TabRessources(3, 2) '3 lignes 2 colonnes TabRessources(1, 1) = "Pierre" TabRessources(1, 2) = 625 TabRessources(2, 1) = "Isabelle" TabRessources(2, 2) = 222 TabRessources(3, 1) = "Marion" TabRessources(3, 2) = 111 Me.ChoixRessource.ColumnCount = 2 Me.ChoixRessource.BoundColumn = 2 Me.ChoixRessource.ColumnWidths = "70;0" Me.ChoixRessource.List() = TabRessources 'la ligne suivante me génère une erreur Me.ChoixRessource=GetUserName 'j'ai pourtant un 625 dans GetUserName End Sub
en fait, il faudrait qu'il m'ecrive le nom de l'utilisateur correspondant au GetUserName merci de vos conseil Pierre
bonjour Pierre,
c'est peut être une erreur causée par le type string ou integer,
essaie comme ça :
Me.ChoixRessource = "" & GetUserName
isabelle
Bonjour
A l'ouverture du classeur j'arrive à récupérer le login de l'utilisateur par
une fonction GetUserName
(par exemple je récupère 625)
J'ai sur une feuille une liste déroulante "ChoixRessource".
Cette liste comporte deux colonnes (nom + login)
J'initialise cette liste déroulante avec la procédure Private Sub
Init_Click() ci dessous
la colonne liée est la deuxième colonne (colonne masquée 0 en largeur)
J'aimerai que la la liste s'initialise et inscrive le nom de l'utlisateur
corresponde au login trouvé
Private Sub Init_Click()
Dim TabRessources(3, 2) '3 lignes 2 colonnes
TabRessources(1, 1) = "Pierre"
TabRessources(1, 2) = 625
TabRessources(2, 1) = "Isabelle"
TabRessources(2, 2) = 222
TabRessources(3, 1) = "Marion"
TabRessources(3, 2) = 111
Me.ChoixRessource.ColumnCount = 2
Me.ChoixRessource.BoundColumn = 2
Me.ChoixRessource.ColumnWidths = "70;0"
Me.ChoixRessource.List() = TabRessources
'la ligne suivante me génère une erreur
Me.ChoixRessource=GetUserName 'j'ai pourtant un 625 dans GetUserName
End Sub
en fait, il faudrait qu'il m'ecrive le nom de l'utilisateur correspondant au
GetUserName
merci de vos conseil
Pierre
c'est peut être une erreur causée par le type string ou integer,
essaie comme ça :
Me.ChoixRessource = "" & GetUserName
isabelle
Bonjour A l'ouverture du classeur j'arrive à récupérer le login de l'utilisateur par une fonction GetUserName (par exemple je récupère 625) J'ai sur une feuille une liste déroulante "ChoixRessource". Cette liste comporte deux colonnes (nom + login) J'initialise cette liste déroulante avec la procédure Private Sub Init_Click() ci dessous la colonne liée est la deuxième colonne (colonne masquée 0 en largeur) J'aimerai que la la liste s'initialise et inscrive le nom de l'utlisateur corresponde au login trouvé
Private Sub Init_Click() Dim TabRessources(3, 2) '3 lignes 2 colonnes TabRessources(1, 1) = "Pierre" TabRessources(1, 2) = 625 TabRessources(2, 1) = "Isabelle" TabRessources(2, 2) = 222 TabRessources(3, 1) = "Marion" TabRessources(3, 2) = 111 Me.ChoixRessource.ColumnCount = 2 Me.ChoixRessource.BoundColumn = 2 Me.ChoixRessource.ColumnWidths = "70;0" Me.ChoixRessource.List() = TabRessources 'la ligne suivante me génère une erreur Me.ChoixRessource=GetUserName 'j'ai pourtant un 625 dans GetUserName End Sub
en fait, il faudrait qu'il m'ecrive le nom de l'utilisateur correspondant au GetUserName merci de vos conseil Pierre
PS:Environ("Username") donne le nom utilisateur réseau
Bonjour A l'ouverture du classeur j'arrive à récupérer le login de l'utilis ateur par une fonction GetUserName (par exemple je récupère 625) J'ai sur une feuille une liste déroulante "ChoixRessource". Cette liste comporte deux colonnes (nom + login) J'initialise cette liste déroulante avec la procédure Private Sub Init_Click() ci dessous la colonne liée est la deuxième colonne (colonne masquée 0 en large ur) J'aimerai que la la liste s'initialise et inscrive le nom de l'utlisateur corresponde au login trouvé
Private Sub Init_Click() Dim TabRessources(3, 2) '3 lignes 2 colonnes TabRessources(1, 1) = "Pierre" TabRessources(1, 2) = 625 TabRessources(2, 1) = "Isabelle" TabRessources(2, 2) = 222 TabRessources(3, 1) = "Marion" TabRessources(3, 2) = 111 Me.ChoixRessource.ColumnCount = 2 Me.ChoixRessource.BoundColumn = 2 Me.ChoixRessource.ColumnWidths = "70;0" Me.ChoixRessource.List() = TabRessources 'la ligne suivante me génère une erreur Me.ChoixRessource=GetUserName 'j'ai pourtant un 625 dans GetUserName End Sub
en fait, il faudrait qu'il m'ecrive le nom de l'utilisateur correspondant au GetUserName merci de vos conseil Pierre
PS:Environ("Username") donne le nom utilisateur réseau
Bonjour
A l'ouverture du classeur j'arrive à récupérer le login de l'utilis ateur par
une fonction GetUserName
(par exemple je récupère 625)
J'ai sur une feuille une liste déroulante "ChoixRessource".
Cette liste comporte deux colonnes (nom + login)
J'initialise cette liste déroulante avec la procédure Private Sub
Init_Click() ci dessous
la colonne liée est la deuxième colonne (colonne masquée 0 en large ur)
J'aimerai que la la liste s'initialise et inscrive le nom de l'utlisateur
corresponde au login trouvé
Private Sub Init_Click()
Dim TabRessources(3, 2) '3 lignes 2 colonnes
TabRessources(1, 1) = "Pierre"
TabRessources(1, 2) = 625
TabRessources(2, 1) = "Isabelle"
TabRessources(2, 2) = 222
TabRessources(3, 1) = "Marion"
TabRessources(3, 2) = 111
Me.ChoixRessource.ColumnCount = 2
Me.ChoixRessource.BoundColumn = 2
Me.ChoixRessource.ColumnWidths = "70;0"
Me.ChoixRessource.List() = TabRessources
'la ligne suivante me génère une erreur
Me.ChoixRessource=GetUserName 'j'ai pourtant un 625 dans GetUserName
End Sub
en fait, il faudrait qu'il m'ecrive le nom de l'utilisateur correspondant au
GetUserName
merci de vos conseil
Pierre
PS:Environ("Username") donne le nom utilisateur réseau
Bonjour A l'ouverture du classeur j'arrive à récupérer le login de l'utilis ateur par une fonction GetUserName (par exemple je récupère 625) J'ai sur une feuille une liste déroulante "ChoixRessource". Cette liste comporte deux colonnes (nom + login) J'initialise cette liste déroulante avec la procédure Private Sub Init_Click() ci dessous la colonne liée est la deuxième colonne (colonne masquée 0 en large ur) J'aimerai que la la liste s'initialise et inscrive le nom de l'utlisateur corresponde au login trouvé
Private Sub Init_Click() Dim TabRessources(3, 2) '3 lignes 2 colonnes TabRessources(1, 1) = "Pierre" TabRessources(1, 2) = 625 TabRessources(2, 1) = "Isabelle" TabRessources(2, 2) = 222 TabRessources(3, 1) = "Marion" TabRessources(3, 2) = 111 Me.ChoixRessource.ColumnCount = 2 Me.ChoixRessource.BoundColumn = 2 Me.ChoixRessource.ColumnWidths = "70;0" Me.ChoixRessource.List() = TabRessources 'la ligne suivante me génère une erreur Me.ChoixRessource=GetUserName 'j'ai pourtant un 625 dans GetUserName End Sub
en fait, il faudrait qu'il m'ecrive le nom de l'utilisateur correspondant au GetUserName merci de vos conseil Pierre
