Via inputbox, comment ne saisir qu'un seul caractère
Fermé
BABUDROME
Messages postés
151
Date d'inscription
lundi 16 janvier 2006
Statut
Membre
Dernière intervention
19 avril 2016
-
3 juin 2015 à 23:24
BABUDROME Messages postés 151 Date d'inscription lundi 16 janvier 2006 Statut Membre Dernière intervention 19 avril 2016 - 16 juin 2015 à 08:37
BABUDROME Messages postés 151 Date d'inscription lundi 16 janvier 2006 Statut Membre Dernière intervention 19 avril 2016 - 16 juin 2015 à 08:37
A voir également:
- Via inputbox, comment ne saisir qu'un seul caractère
- Caractère ascii - Guide
- Rech. ou saisir l'url - Guide
- Caractere speciaux - Guide
- Caractère spéciaux - Guide
- Caractère spéciaux mac clavier - Guide
8 réponses
via55
Messages postés
14402
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 avril 2024
2 702
3 juin 2015 à 23:40
3 juin 2015 à 23:40
Bonsoir
Dans une inputbox je ne pense pas que ce soit possible,
par contre tu peux créer un userform avec un seul Textbox pour l'entrée de la donnée et un bouton Valider. Dans les Propriétés du Textbox tu mets 1 comme valeur à la propriété MaxLenght
Cdlmnt
Via
Dans une inputbox je ne pense pas que ce soit possible,
par contre tu peux créer un userform avec un seul Textbox pour l'entrée de la donnée et un bouton Valider. Dans les Propriétés du Textbox tu mets 1 comme valeur à la propriété MaxLenght
Cdlmnt
Via
Mike-31
Messages postés
18310
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
29 mars 2024
5 073
Modifié par Mike-31 le 4/06/2015 à 00:27
Modifié par Mike-31 le 4/06/2015 à 00:27
Bonsoir,
je pense que c'est en partie possible, si un seul caractère est saisi, l'inputbox renseigne la cellule A2 si nombre différent de 1 affichage msgbox et sortie de la procédure
à tester
Sub Un_Seul_Caractère()
If Len(reponse) <> 1 Then
reponse = InputBox("Saisissez 1 chiffres svp")
If Len(reponse) = 1 Then [A2] = reponse
If Len(reponse) <> 1 Then
MsgBox "le nombre de carractère est fixé à 1"
Exit Sub
End If
End If
End Sub
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
je pense que c'est en partie possible, si un seul caractère est saisi, l'inputbox renseigne la cellule A2 si nombre différent de 1 affichage msgbox et sortie de la procédure
à tester
Sub Un_Seul_Caractère()
If Len(reponse) <> 1 Then
reponse = InputBox("Saisissez 1 chiffres svp")
If Len(reponse) = 1 Then [A2] = reponse
If Len(reponse) <> 1 Then
MsgBox "le nombre de carractère est fixé à 1"
Exit Sub
End If
End If
End Sub
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
BABUDROME
Messages postés
151
Date d'inscription
lundi 16 janvier 2006
Statut
Membre
Dernière intervention
19 avril 2016
4 juin 2015 à 08:16
4 juin 2015 à 08:16
Salut et merci.
Ta solution nécessite toutefois la validation (OK) avec un appui de touche supplémentaire.
En fait, l'énoncé de mon Pb. était très mal exprimé.
Je veux introduire 1 seul chiffre (1 à 9) dans une cellule sélectionnée par la souris.
Je réserve quand même ta solution pour un besoin ultérieur (saisie d mot de passe avec longueur maximale, par exemple)
Ta solution nécessite toutefois la validation (OK) avec un appui de touche supplémentaire.
En fait, l'énoncé de mon Pb. était très mal exprimé.
Je veux introduire 1 seul chiffre (1 à 9) dans une cellule sélectionnée par la souris.
Je réserve quand même ta solution pour un besoin ultérieur (saisie d mot de passe avec longueur maximale, par exemple)
Mike-31
Messages postés
18310
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
29 mars 2024
5 073
4 juin 2015 à 08:24
4 juin 2015 à 08:24
Re,
effectivement et pourquoi as tu parlé d'inputbox
il suffit de sélectionner la plage concernée et Données/Validation des données/sélectionner Nombre entier, dans Minimum saisir la valeur minimale soit 1 et dans maximum saisir 9
ensuite il est possible d'agrémenter la boite de dialogue avec un message personnalisé
effectivement et pourquoi as tu parlé d'inputbox
il suffit de sélectionner la plage concernée et Données/Validation des données/sélectionner Nombre entier, dans Minimum saisir la valeur minimale soit 1 et dans maximum saisir 9
ensuite il est possible d'agrémenter la boite de dialogue avec un message personnalisé
BABUDROME
Messages postés
151
Date d'inscription
lundi 16 janvier 2006
Statut
Membre
Dernière intervention
19 avril 2016
4 juin 2015 à 09:27
4 juin 2015 à 09:27
Merci, je découvre cette fonctionnalité....
Toutefois, il faut sortir de la saisie (retour ou flèche pour se déplacer.
bab
Toutefois, il faut sortir de la saisie (retour ou flèche pour se déplacer.
bab
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Mike-31
Messages postés
18310
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
29 mars 2024
5 073
4 juin 2015 à 09:32
4 juin 2015 à 09:32
Re,
que veux tu dire par "Toutefois, il faut sortir de la saisie (retour ou flèche pour se déplacer "
que veux tu dire par "Toutefois, il faut sortir de la saisie (retour ou flèche pour se déplacer "
BABUDROME
Messages postés
151
Date d'inscription
lundi 16 janvier 2006
Statut
Membre
Dernière intervention
19 avril 2016
4 juin 2015 à 10:58
4 juin 2015 à 10:58
Cela implique un appui sur Return pour valider la saisie de la cellule
ou Flèche à droite ou à gauche pour valider la sortie de la cellule.
soit un second appui de touche
ou Flèche à droite ou à gauche pour valider la sortie de la cellule.
soit un second appui de touche
Mike-31
Messages postés
18310
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
29 mars 2024
5 073
4 juin 2015 à 11:32
4 juin 2015 à 11:32
Re,
si cliquer sur un bouton est encore trop compliqué, reste le VBA si tu as quelques notions, mais pourquoi faire simple quand on peut faire compliqué
si cliquer sur un bouton est encore trop compliqué, reste le VBA si tu as quelques notions, mais pourquoi faire simple quand on peut faire compliqué
BABUDROME
Messages postés
151
Date d'inscription
lundi 16 janvier 2006
Statut
Membre
Dernière intervention
19 avril 2016
16 juin 2015 à 08:37
16 juin 2015 à 08:37
Bonjour.
Je souhaitais diviser par 2 les saisies au clavier lors d'un garnissage d'un tableau.
J'abandonne...
Merci quand même de ton attention.
Je souhaitais diviser par 2 les saisies au clavier lors d'un garnissage d'un tableau.
J'abandonne...
Merci quand même de ton attention.
4 juin 2015 à 08:22
Ta solution est très intéressante, Je la réserve quand même pour un besoin ultérieur (saisie d'un mot de passe avec longueur maximale, par exemple)
En fait, mon Pb. était très mal énoncé.
Je veux introduire 1 seul chiffre (1 à 9) dans une cellule sélectionnée par la souris, sans avoir à faire Return.
bab