Combobox visible ou non

Bonjour a tous

Il faudrait voir ton cas mais

selon le user avec un

If user='toto'then
ComboBox1.visible=true
End if

If user='tata'then
ComboBox.Visible=false
End if

Toto le verra
Tata non
Enfin tu vois le principe...

Riddick

Bonjour

oui c'est possible

le code pour récupérer le username de celui qui se connecte

Public username As String


Declare Function GetUserName Lib 'advapi32.dll' Alias 'GetUserNameA' _
(ByVal lpBuffer As String, nSize As Long) As Long

Sub Get_User_Name()

Dim lpBuff As String * 25
Dim ret As Long
ret = GetUserName(lpBuff, 25)
username = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1)

End Sub

et ensuite le code de ton uf

Private Sub UserForm_Initialize()

Get_User_Name

if username='toto' then
me.combobox1.visible=false
endif

End sub

Si tu utilisateur est toto il ne verra pas le combo

Bon courage

Oups excuse Riddick

C'est vrai que moi par habitude je suis parti du username de conexion au réseau et que Pierre voulait peut-être plus simple

M'en fin il a les 2 comme cela

Cool
j'ai appris quelquechose tu vois tu as bien fait de le mettre surtout que j'avais pas penser a ca je pensais a un log a l'ouverture du fichier

Enfin j'apprend des tonnes de trucs tous les jours ici
C'est ENORME
Je copie ta macro.......

Riddick
Un petit Padawan XLD

Bonjour Riddick et Pascal

Merci à vous deux.

Je suis effectivement en local mais la solution réseau m'interresse aussi car le cas va bientôt se présenter.

Donc les 2 solutions me conviennent parfaitement

Encore merci et bon week end