Macro limiter un bouton à 2 utilisateurs

Fermé
mounapo Messages postés 70 Statut Membre -  
georges97 Messages postés 14611 Date d'inscription   Statut Contributeur Dernière intervention   -

Bonjour,

J'ai un tableau excel que seules 2 personnes peuvent modifier en utilisant 2 boutons pour ajouter ou supprimer des lignes. Je voudrai donc limiter l'utilisation de ces 2 boutons uniquement à ces 2 personnes. J'ai trouvé une macro pour limiter ces boutons à "Ingrid" mais je ne trouve pas comment les limiter à "Ingrid" et "Brigitte" :

If Environ$("username") <> "Ingrid" Then
MsgBox "Vous n'êtes pas autorisé à utiliser ce bouton!"
Exit Sub
End If

Merci pour votre aide ;)


Windows / Chrome 119.0.0.0

2 réponses

  1. The_boss_68 Messages postés 959 Date d'inscription   Statut Membre Dernière intervention   182
     

    Bonsoir,

    Peut-être un truc comme ça?

    Sub Bouton1_Click()
        Dim utilisateur As String
        utilisateur = Environ("USERNAME")
        
        If utilisateur = "Utilisateur1" Or utilisateur = "Utilisateur2" Then
            ' Mettez le code que vous souhaitez exécuter ici
            MsgBox "Accès autorisé pour " & utilisateur
        Else
            MsgBox "Accès refusé pour " & utilisateur
        End If
    End Sub

    Cordialement

    1