Bonjour,
Dans un classeur dans certainent cellules se trouve des=20
annotations. Ma questions:
Est-il possible d'afficher ces annotations en fonction de=20
la personne qui =E0 ouvert ce classeur. En fait par le=20
biais d'un userform coprenant son non et son mot de passe.
Merci pour votre aide.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Philippe.R
Bonjour Sten, Je te laisse fabriquer l'userform, pour le reste, ici avec une inputbox : Soit quelque part dans le classeur une plage nommée lesgens contenant la liste des personnes autorisées à jouer les voyeurs, une cellule nommée quidonc recevant le résultat de la question, le code suivant, collé dans un module ordinaire, le fait.
Sub montre_ou_pas() ' MPFE le 14/02/2004 par Philippe Raulet Dim qUiqUi As String, verif As Variant 'masque les indicateurs et les commentaires Application.DisplayCommentIndicator = 0 qUiqUi = InputBox("Bonjour, veuillez vous identifier ci dessous", "Qui c'est ?") [quidonc] = LCase(qUiqUi) verif = "=MATCH(quidonc,lesgens,0)" If verif > 0 Then 'montre les indicateurs Application.DisplayCommentIndicator = xlCommentIndicatorOnly Else Exit Sub End If End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"STEN" a écrit dans le message de news:fb0201c3f306$3fe65980$ Bonjour, Dans un classeur dans certainent cellules se trouve des annotations. Ma questions: Est-il possible d'afficher ces annotations en fonction de la personne qui à ouvert ce classeur. En fait par le biais d'un userform coprenant son non et son mot de passe. Merci pour votre aide.
Bonjour Sten,
Je te laisse fabriquer l'userform, pour le reste, ici avec une inputbox :
Soit quelque part dans le classeur une plage nommée lesgens contenant la liste des personnes autorisées
à jouer les voyeurs, une cellule nommée quidonc recevant le résultat de la question, le code suivant,
collé dans un module ordinaire, le fait.
Sub montre_ou_pas()
' MPFE le 14/02/2004 par Philippe Raulet
Dim qUiqUi As String, verif As Variant
'masque les indicateurs et les commentaires
Application.DisplayCommentIndicator = 0
qUiqUi = InputBox("Bonjour, veuillez vous identifier ci dessous", "Qui c'est ?")
[quidonc] = LCase(qUiqUi)
verif = "=MATCH(quidonc,lesgens,0)"
If verif > 0 Then
'montre les indicateurs
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Else
Exit Sub
End If
End Sub
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"STEN" <jsterjean@aol.com> a écrit dans le message de news:fb0201c3f306$3fe65980$a101280a@phx.gbl...
Bonjour,
Dans un classeur dans certainent cellules se trouve des
annotations. Ma questions:
Est-il possible d'afficher ces annotations en fonction de
la personne qui à ouvert ce classeur. En fait par le
biais d'un userform coprenant son non et son mot de passe.
Merci pour votre aide.
Bonjour Sten, Je te laisse fabriquer l'userform, pour le reste, ici avec une inputbox : Soit quelque part dans le classeur une plage nommée lesgens contenant la liste des personnes autorisées à jouer les voyeurs, une cellule nommée quidonc recevant le résultat de la question, le code suivant, collé dans un module ordinaire, le fait.
Sub montre_ou_pas() ' MPFE le 14/02/2004 par Philippe Raulet Dim qUiqUi As String, verif As Variant 'masque les indicateurs et les commentaires Application.DisplayCommentIndicator = 0 qUiqUi = InputBox("Bonjour, veuillez vous identifier ci dessous", "Qui c'est ?") [quidonc] = LCase(qUiqUi) verif = "=MATCH(quidonc,lesgens,0)" If verif > 0 Then 'montre les indicateurs Application.DisplayCommentIndicator = xlCommentIndicatorOnly Else Exit Sub End If End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"STEN" a écrit dans le message de news:fb0201c3f306$3fe65980$ Bonjour, Dans un classeur dans certainent cellules se trouve des annotations. Ma questions: Est-il possible d'afficher ces annotations en fonction de la personne qui à ouvert ce classeur. En fait par le biais d'un userform coprenant son non et son mot de passe. Merci pour votre aide.
STEN
-----Message d'origine----- Bonjour Sten, Je te laisse fabriquer l'userform, pour le reste, ici avec une inputbox :
Soit quelque part dans le classeur une plage nommée lesgens contenant la liste des personnes autorisées
à jouer les voyeurs, une cellule nommée quidonc recevant le résultat de la question, le code suivant,
collé dans un module ordinaire, le fait.
Sub montre_ou_pas() ' MPFE le 14/02/2004 par Philippe Raulet Dim qUiqUi As String, verif As Variant 'masque les indicateurs et les commentaires Application.DisplayCommentIndicator = 0 qUiqUi = InputBox("Bonjour, veuillez vous identifier ci dessous", "Qui c'est ?")
[quidonc] = LCase(qUiqUi) verif = "=MATCH(quidonc,lesgens,0)" If verif > 0 Then 'montre les indicateurs Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Else Exit Sub End If End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"STEN" a écrit dans le message de news:fb0201c3f306$3fe65980$
Bonjour, Dans un classeur dans certainent cellules se trouve des annotations. Ma questions: Est-il possible d'afficher ces annotations en fonction de la personne qui à ouvert ce classeur. En fait par le biais d'un userform coprenant son non et son mot de passe.
Merci pour votre aide.
.Salut, j'ai essayer le code mais cela ne fonctionne pas j'ai bien une liste d'utilisateurs, mais en mettant
n'importe quoi il m'affiche quand même les commentaires, pourquoi? Merci pour ton aide
-----Message d'origine-----
Bonjour Sten,
Je te laisse fabriquer l'userform, pour le reste, ici
avec une inputbox :
Soit quelque part dans le classeur une plage nommée
lesgens contenant la liste des personnes autorisées
à jouer les voyeurs, une cellule nommée quidonc recevant
le résultat de la question, le code suivant,
collé dans un module ordinaire, le fait.
Sub montre_ou_pas()
' MPFE le 14/02/2004 par Philippe Raulet
Dim qUiqUi As String, verif As Variant
'masque les indicateurs et les commentaires
Application.DisplayCommentIndicator = 0
qUiqUi = InputBox("Bonjour, veuillez vous identifier ci
dessous", "Qui c'est ?")
[quidonc] = LCase(qUiqUi)
verif = "=MATCH(quidonc,lesgens,0)"
If verif > 0 Then
'montre les indicateurs
Application.DisplayCommentIndicator =
xlCommentIndicatorOnly
Else
Exit Sub
End If
End Sub
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"STEN" <jsterjean@aol.com> a écrit dans le message de
news:fb0201c3f306$3fe65980$a101280a@phx.gbl...
Bonjour,
Dans un classeur dans certainent cellules se trouve des
annotations. Ma questions:
Est-il possible d'afficher ces annotations en fonction de
la personne qui à ouvert ce classeur. En fait par le
biais d'un userform coprenant son non et son mot de
passe.
Merci pour votre aide.
.Salut, j'ai essayer le code mais cela ne fonctionne pas
j'ai bien une liste d'utilisateurs, mais en mettant
n'importe quoi il m'affiche quand même les commentaires,
pourquoi?
Merci pour ton aide
-----Message d'origine----- Bonjour Sten, Je te laisse fabriquer l'userform, pour le reste, ici avec une inputbox :
Soit quelque part dans le classeur une plage nommée lesgens contenant la liste des personnes autorisées
à jouer les voyeurs, une cellule nommée quidonc recevant le résultat de la question, le code suivant,
collé dans un module ordinaire, le fait.
Sub montre_ou_pas() ' MPFE le 14/02/2004 par Philippe Raulet Dim qUiqUi As String, verif As Variant 'masque les indicateurs et les commentaires Application.DisplayCommentIndicator = 0 qUiqUi = InputBox("Bonjour, veuillez vous identifier ci dessous", "Qui c'est ?")
[quidonc] = LCase(qUiqUi) verif = "=MATCH(quidonc,lesgens,0)" If verif > 0 Then 'montre les indicateurs Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Else Exit Sub End If End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"STEN" a écrit dans le message de news:fb0201c3f306$3fe65980$
Bonjour, Dans un classeur dans certainent cellules se trouve des annotations. Ma questions: Est-il possible d'afficher ces annotations en fonction de la personne qui à ouvert ce classeur. En fait par le biais d'un userform coprenant son non et son mot de passe.
Merci pour votre aide.
.Salut, j'ai essayer le code mais cela ne fonctionne pas j'ai bien une liste d'utilisateurs, mais en mettant
n'importe quoi il m'affiche quand même les commentaires, pourquoi? Merci pour ton aide
Philippe.R
Bonsoir Sten, "en mettant n'importe quoi il m'affiche quand même les commentaires, pourquoi?" Pour moi, mystère et boule de gomme ! S'il n'y a pas de secret, tu peux m'envoyer copie de ton classeur en suivant la règle figurant dans ma signature et, sans garantie de rapidité, j'y jetterai un oeil. -- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"STEN" a écrit dans le message de news:1153001c3f57a$07cb6010$
-----Message d'origine----- Bonjour Sten, Je te laisse fabriquer l'userform, pour le reste, ici avec une inputbox :
Soit quelque part dans le classeur une plage nommée lesgens contenant la liste des personnes autorisées
à jouer les voyeurs, une cellule nommée quidonc recevant le résultat de la question, le code suivant,
collé dans un module ordinaire, le fait.
Sub montre_ou_pas() ' MPFE le 14/02/2004 par Philippe Raulet Dim qUiqUi As String, verif As Variant 'masque les indicateurs et les commentaires Application.DisplayCommentIndicator = 0 qUiqUi = InputBox("Bonjour, veuillez vous identifier ci dessous", "Qui c'est ?")
[quidonc] = LCase(qUiqUi) verif = "=MATCH(quidonc,lesgens,0)" If verif > 0 Then 'montre les indicateurs Application.DisplayCommentIndicator xlCommentIndicatorOnly Else Exit Sub End If End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"STEN" a écrit dans le message de news:fb0201c3f306$3fe65980$
Bonjour, Dans un classeur dans certainent cellules se trouve des annotations. Ma questions: Est-il possible d'afficher ces annotations en fonction de la personne qui à ouvert ce classeur. En fait par le biais d'un userform coprenant son non et son mot de passe.
Merci pour votre aide.
.Salut, j'ai essayer le code mais cela ne fonctionne pas j'ai bien une liste d'utilisateurs, mais en mettant
n'importe quoi il m'affiche quand même les commentaires, pourquoi? Merci pour ton aide
Bonsoir Sten,
"en mettant n'importe quoi il m'affiche quand même les commentaires,
pourquoi?"
Pour moi, mystère et boule de gomme !
S'il n'y a pas de secret, tu peux m'envoyer copie de ton classeur en suivant la règle figurant dans ma
signature et, sans garantie de rapidité, j'y jetterai un oeil.
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"STEN" <jsterjean@aol.com> a écrit dans le message de news:1153001c3f57a$07cb6010$a301280a@phx.gbl...
-----Message d'origine-----
Bonjour Sten,
Je te laisse fabriquer l'userform, pour le reste, ici
avec une inputbox :
Soit quelque part dans le classeur une plage nommée
lesgens contenant la liste des personnes autorisées
à jouer les voyeurs, une cellule nommée quidonc recevant
le résultat de la question, le code suivant,
collé dans un module ordinaire, le fait.
Sub montre_ou_pas()
' MPFE le 14/02/2004 par Philippe Raulet
Dim qUiqUi As String, verif As Variant
'masque les indicateurs et les commentaires
Application.DisplayCommentIndicator = 0
qUiqUi = InputBox("Bonjour, veuillez vous identifier ci
dessous", "Qui c'est ?")
[quidonc] = LCase(qUiqUi)
verif = "=MATCH(quidonc,lesgens,0)"
If verif > 0 Then
'montre les indicateurs
Application.DisplayCommentIndicator xlCommentIndicatorOnly
Else
Exit Sub
End If
End Sub
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"STEN" <jsterjean@aol.com> a écrit dans le message de
news:fb0201c3f306$3fe65980$a101280a@phx.gbl...
Bonjour,
Dans un classeur dans certainent cellules se trouve des
annotations. Ma questions:
Est-il possible d'afficher ces annotations en fonction de
la personne qui à ouvert ce classeur. En fait par le
biais d'un userform coprenant son non et son mot de
passe.
Merci pour votre aide.
.Salut, j'ai essayer le code mais cela ne fonctionne pas
j'ai bien une liste d'utilisateurs, mais en mettant
n'importe quoi il m'affiche quand même les commentaires,
pourquoi?
Merci pour ton aide
Bonsoir Sten, "en mettant n'importe quoi il m'affiche quand même les commentaires, pourquoi?" Pour moi, mystère et boule de gomme ! S'il n'y a pas de secret, tu peux m'envoyer copie de ton classeur en suivant la règle figurant dans ma signature et, sans garantie de rapidité, j'y jetterai un oeil. -- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"STEN" a écrit dans le message de news:1153001c3f57a$07cb6010$
-----Message d'origine----- Bonjour Sten, Je te laisse fabriquer l'userform, pour le reste, ici avec une inputbox :
Soit quelque part dans le classeur une plage nommée lesgens contenant la liste des personnes autorisées
à jouer les voyeurs, une cellule nommée quidonc recevant le résultat de la question, le code suivant,
collé dans un module ordinaire, le fait.
Sub montre_ou_pas() ' MPFE le 14/02/2004 par Philippe Raulet Dim qUiqUi As String, verif As Variant 'masque les indicateurs et les commentaires Application.DisplayCommentIndicator = 0 qUiqUi = InputBox("Bonjour, veuillez vous identifier ci dessous", "Qui c'est ?")
[quidonc] = LCase(qUiqUi) verif = "=MATCH(quidonc,lesgens,0)" If verif > 0 Then 'montre les indicateurs Application.DisplayCommentIndicator xlCommentIndicatorOnly Else Exit Sub End If End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"STEN" a écrit dans le message de news:fb0201c3f306$3fe65980$
Bonjour, Dans un classeur dans certainent cellules se trouve des annotations. Ma questions: Est-il possible d'afficher ces annotations en fonction de la personne qui à ouvert ce classeur. En fait par le biais d'un userform coprenant son non et son mot de passe.
Merci pour votre aide.
.Salut, j'ai essayer le code mais cela ne fonctionne pas j'ai bien une liste d'utilisateurs, mais en mettant
n'importe quoi il m'affiche quand même les commentaires, pourquoi? Merci pour ton aide
