Discussion :

[Sylvie_076]

Bonjour à Toutes et Tous,

Je cherche un moyen de remplacer n'importe quel caractère saisi par un caractère unique X majuscule ou par deux lettres OK.
J'ai testé et lu les fonctions SUBSTITUE, REMPLACER, etc... Je ne trouve pas.

La formule sera placée dans le menu Validation de données.

Cela permettra à l'utilisateur d'avoir un X dans une case en saisissant n'importe quel caractère ou chaine de caractère.

C'est à dire : en saisissant DDEOLZJFD ou DjlndskDJID dans une cellule on obtient X ou OK.

Est-ce possible ?

Je vous remercie pour votre aide.

Sylvie

[piotr76]

Bonjour

Et pourquoi ne pas limiter la saisie dans la cellule?

Dans l'onglet Données/Outilde données/Validation des données, en limitant la saisie à X et en faisant afficher la liste déroulante, XL n'autorise que le X (ou rien)

Cordialement

[rjamin]

Bonjour,
Il faudrait quand même que vous précisiez dans quelles cellules de la feuille cela doit être appliqué car je suppose que ce n'est pas dans toute la feuille.
La version d'Office utilisée ?

[Supermichou]

Bonjour,

je vois 2 solutions,

1
passer par une colonne intermédiaire où l'on saisit qdsfhrzght ou sdfokjJJ et la seconde colonne prend X ou OK si la colonne de gauche est vide ou non. une protection de la colonne avec la formule est obligatoire.
2
Une macro évènement qui déclance X ou OK dès que la valeur de la cellule dans une colonne donnée diffère de vide.

La première est plus simple pour la maintenance, la seconde est plus discrète et plus radicale, mais sans connaissance en VBA, la maintenance est plus ardue.

SM

[Sylvie_076]

Bonjour à Toutes et Tous,

Merci pour vos réponses. La version Office utilisée est 2007.
Je vous joins un fichier (Validation). Existe-t-il un moyen pour éviter d'avoir un menu déroulant ou de passer par une macro ?
Je pensais à une formule du type =SI(C5="";"";X) dans le menu validation de données ou ailleurs.
Mais ce n'est pas si simple pour moi.
Merci de votre lecture et votre aide.

Sylvie

[Supermichou]

Bonjour,

le plus simple est de faire une macro qui ferait le boulot, visible avec Alt+F111

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub Worksheet_Change(ByVal Target As Range)
'la macro se déclenche quand une valeur chaneg sur la feuille 1
 
'si la colonne où la valeur change n'est pas la colonne C, il ne se passe rien
If Target.Column <> 3 Then Exit Sub
'si la valeur la valeur change passe à vide, il ne se passe rien, pour permettre la suppression du X
If Target.Value = "" Then Exit Sub
'Donne la valeur X à la cellule
Target.Value = "X"
End Sub

le fichier en pièce jointe.

SM

[mortad123]

Bonsoir;
pour le faire tu dois obligatoirement utiliser une macro VBA suivante dans ta feuille "Validation" (click droit sur la feuille-- visualiser le code et tu colles le code):

Code :

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

1
2
3
4
5
6
7
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
For I = 5 To 15
If Cells(I, 3).Value <> "" Then
Cells(I, 3) = "X"
End If
Next I
End Sub

bn chance

[Philippe Tulliez]

Bonjour,
Si j'ai bien compris ta demande, tu souhaites voir apparaître un X dans une cellule de la colonne C si l'on tape n'importe quel caractère dans celle-ci ?
Si c'est bien cela et que tu acceptes que le ou les caractères introduits restent présents dans la cellule mais que ce soit le X qui soit visible
Tu vas dans le formatage de cellule où tu sélectionnes Personnalisée et tu tapes X;X;X;X

[Sylvie_076]

Bonjour ou Bonsoir à Tous,

Je tiens à vous remercier pour toutes les solutions proposées.
Mention spécial pour Monsieur Philippe Tulliez.
Cela m'évite de passer par les macros.
C'est transparent pour les utilisateurs qui n'auront pas à se soucier d'en activer le contenu.
Grâce à vos réponses, j'ai également suivi et compris la lecture de la macro.

Encore MERCI pour votre disponibilité.

Sylvie