Discussion :

[Cadenwarr]

Slt, je voudrais creer des loggin sur un fichier que j'ai creer en vba.

Je fais une mission industrielle et je souhaite qu'on puisse ouvrir qu'une partie du fichier selon l'identifiant..

Merci de m'aider!!

J'utilise excel pour faire une base de donnée

[ouskel'n'or]

Bonjour Cadenwarr, bienvenue sur le forum.
Qu'appelles-tu "partie du fichier" ? Certaines feuilles seulement ?
Si oui, propose la saisie du nom de l'utilisateur et crées une collection des noms de tes feuilles afin de les associer au nom de l'utilisateur. Soit un truc comme ça... mais on peut utiliser un tableau...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub test()
Dim Feuille As Worksheet, UseNom As String
 Dim MaColect  As New Collection
    UserNom = InputBox("Saisir votre nom", "LOGIN", Application.UserName)
    ' Remplir la collection
    MaColect.Add "Feuil1", "Martin"
    MaColect.Add "Feuil2", "Dupont"
    MaColect.Add "Feuil3", "Dupond"
    MaColect.Add "Feuil4", "Dumont"
    MaColect.Add "Feuil5", "Durant"
    MaColect.Add "Feuil6", "Durang"
    MaColect.Add "Feuil6", "je"
    '...
    For Each Feuille In ActiveWorkbook.Worksheets
        If MaColect(UserNom) <> Feuille.Name Then
            Feuille.Visible = False
            Else
            Feuille.Visible = True
        End If
    Next Feuille
 
End Sub

Tu dis
A+

PS - pour tester, ajoute ton nom (!)