C'est encore moi, je voudrai relié un système d'identification à un système de session. Je m'explique, j'ai le code suivant fonctionnel: Private Sub CBOK_Click() Dim ouvrirsession As Boolean ouvrirsession = chkpass(TBUser.Text, TBPass.Text) If ouvrirsession = True Then >>>>>>>>Dim utilisateur As String utilisateur = TBUuser<<<<<<<<<<<<<< Call Securite Unload Me End If End Sub Je voudrais lié cette fonction à un système simple de feuille visible ou pas, j'ai essayé de le faire avec les deux ligne entouré de fleches: If utilisateur = admin Then Worksheet("feuil11").Visible = True Else: utilisateur = ATMBM Worksheet("feuil11").Visible = False End If Néanmoins cela ne fonctionne pas, excel m'affiche un message d'erreur. Pouvait vous m'aiguiller. merci! Cdlt MAX...

Lier un système d'identification à un système simple

Bonjour!

c'est encore moi, je voudrai relié un système d'identification à un système de session. Je m'explique, j'ai le code suivant fonctionnel:

Private Sub CBOK_Click()

Dim ouvrirsession As Boolean

ouvrirsession = chkpass(TBUser.Text, TBPass.Text)

If ouvrirsession = True Then

>>>>>>>>Dim utilisateur As String

utilisateur = TBUuser<<<<<<<<<<<<<<

Call Securite

Unload Me

End If

End Sub

Je voudrais lié cette fonction à un système simple de feuille visible ou pas, j'ai essayé de le faire avec les deux ligne entouré de fleches:

If utilisateur = admin Then

Worksheet("feuil11").Visible = True

Else: utilisateur = ATMBM

Worksheet("feuil11").Visible = False

End If

Néanmoins cela ne fonctionne pas, excel m'affiche un message d'erreur. Pouvait vous m'aiguiller.

merci!

Cdlt

MAX

A toutes fins utiles !

Coool! ça a l'air interessant, he regarde ça ce soir et je te dis si ça m'a aide demain

C'est excellent merci! c'est exactement ce qu'il me fallait et c'est moins compliqué que mon code!

Nouvelle petite question, le code detecte t-il le nom apparent des feuille ou leur nom dans VBA? name ou (name)

merci encore