Croix dans cellule
Le
Nangoustine
Bonjour à tous,
Sur un classeur excel (un questionnaire), je voudrais que les utilisateurs
puisse inscrire une croix dans la cellule de leur choix uniquement par
l'utilsation de la souris. J'avais donc mis une validation des cellules
concernées par liste déroulante où l'on sélectionner la croix. Problème :
aprés test, certains utilsateurs novices de Excel n'ont pas le réflexe de
cliquer sur la croix dans le menu déroulant pour qu'elle soit sélectionnée.
Comment pourrais je donc faire pour qu'une croix apparaisse dans la cellule
par simple clique.
PS: toutes les cellules comportant une croix sont ensuite comptabilisées
grâce à une formule, je ne peut donc utiliser de useforms. Je voudrais
également éviter les macros car le message d'avertissement à l'ouverture de
macro pourrait effrayer des utilisateurs.
Si vous avez une idée.
Merci. Nangoustine
--
Nangoustine
Sur un classeur excel (un questionnaire), je voudrais que les utilisateurs
puisse inscrire une croix dans la cellule de leur choix uniquement par
l'utilsation de la souris. J'avais donc mis une validation des cellules
concernées par liste déroulante où l'on sélectionner la croix. Problème :
aprés test, certains utilsateurs novices de Excel n'ont pas le réflexe de
cliquer sur la croix dans le menu déroulant pour qu'elle soit sélectionnée.
Comment pourrais je donc faire pour qu'une croix apparaisse dans la cellule
par simple clique.
PS: toutes les cellules comportant une croix sont ensuite comptabilisées
grâce à une formule, je ne peut donc utiliser de useforms. Je voudrais
également éviter les macros car le message d'avertissement à l'ouverture de
macro pourrait effrayer des utilisateurs.
Si vous avez une idée.
Merci. Nangoustine
--
Nangoustine
Poser une question
tu peux mettre ce code dans la feuille de code de ThisWorkbook :
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)
ActiveCell.Value = "X"
End Sub
Dès qu'ils vont cliquer sur une cellule, elle contiendra un X...
Ca marche ?
CAP2
Une Croix ??
Un X ou x
Tous dans la même colonne ??
Précise stp
JJ
"Nangoustine" message de news:
sécurité à "Faible" (Barre d'outils Visual basic, bouton sécurité).
CAP2
Données > Validation >
Autoriser : Personnalisé Ignorer si vide
formule : ="X"¡
x ou X seront seuls autorisés....
@+
Selectionner les cellules faisant offiice de case à cocher et nommer la
sélection Croix dans mon exemple
Dans le module VB de la feuille , coller la procédure ci-dessous
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set isect = Intersect(Target, Range("Croix"))
If isect Is Nothing Then Exit Sub
If Target = "X" Then
Target = ""
Else
Target = "X"
End If
End Sub
Nota : cela marche comme une bascule, mais il faut avoir changé de cellule
entre deux
Est-ce OK ?
CT
"Nangoustine" message de news: