Sujet Précédent Sujet Suivant

Inclure directement un nom d'utilisateur lors de l'ouverture de mon fichier

Fermé
Juju - 13 oct. 2021 à 12:11
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 - 13 oct. 2021 à 15:53
Bonjour à tous,

Je dois réaliser un fichier excel qui sera utilisé par plusieurs personnes.
Je souhaite faire en sorte que lors de l'ouverture du fichier une box apparaisse où il faut indiquer son nom d'utilisateur, sans quoi le fichier ne s'ouvrira pas. Et derrière faire en sorte que cette case soit verrouillée et non modifiable. L'idéal pour moi serait que la case où le nom de la personne doit être renseignée s'incrémente automatiquement en fonction du user de la session windows mais je ne sais pas si c'est réalisable...
Merci à tous pour vos conseils!




Configuration: Windows / Chrome 94.0.4606.81
A voir également:

1 réponse

Réponse 1 / 1
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729
Modifié le 13 oct. 2021 à 14:27
Bonjour,

une manière toute simple:

Faire Alt F11 pour accéder à l'éditeur

Allez dans ThisWorkbook en haut à gauche et mettre ce code: 

Option Explicit
Private Sub Workbook_Open()
Dim mdp As String
mdp = InputBox("Entrez votre UserName: ", "Utilisateur")
If mdp = Application.UserName Then
 Sheets("Feuil1").Activate
Else
ThisWorkbook.Close savechanges:=False
End If
End Sub


avec Excel on peut facilement contourner les mots de passe!

Voilà


0
Juju
13 oct. 2021 à 15:10
Merci beaucoup pour ce conseil!

Lorsque j'insère ce code dans ma macro, une box apparaît à l'ouverture avec une demande de mot de passe, cependant peu importe le mdp que je rentre la page se ferme automatiquement, j'ai dû rater une étape...
0
Juju > Juju
13 oct. 2021 à 15:12
pardon je voulais dire nom et pas mdp
0
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729 > Juju
13 oct. 2021 à 15:53
Il faut rentrer l'UserName: 

Sub test()
MsgBox Application.UserName
End Sub


si tu veux un mot de passe pour chaque utilisateur, c'est une autre approche!

@+
0

Discussions similaires

"Nom de l'adresse" lors d'une inscription sur une site
ScarexStupid -
Rossignol -

9 réponses
comment donner les droits sur fichier partage
ch'ti du 57 -
fil1958 -

2 réponses
Chemin Logo du site de la Cité de l'espace
Keiios -
blux -

11 réponses
Annuaire portable gratuit à partir d'un nom
dani26 -
Authority -

9 réponses
Comment trouver un numéro à partir du nom et prénom
papillon -
guyguy -

10 réponses