Discussion :

[marc56]

Bonjour,
Est-il possible de saisir directement du texte en majuscule dans une cellule ?
La fonction MAJUSCULE() permet seulement de récupérer d'une autre cellule et de changer la casse. J'ai essayé par Données\Validation\Options\Personnalisé, sans succès.
A l'avance merci.

[ullan]

Bonjour,

Pour saisir directement du texte en majuscules il suffit d'activer la touche clavier Caps Lock, juste au-dessus de Maj.

[Commodore]

sinon tu peux toujours utiliser la fonction SendKeys(x)
avec x le code de la touche Verr.Maj.

(et le réutiliser à la fin pour désactiver la mise en majuscules)

[jfontaine]

Tu peux aussi utiliser l'évenement Change de la feuille
Ici un exemple qui met en majuscule la saisie de la cellule B2 des que l'on valide la saisie

Code :

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

1
2
3
4
5
6
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
If Target = Range("B2") Then Target.Value = UCase(Target.Value)
 
End Sub

[marc56]

Pour la touche MAJ c'est évident mais quand c'est un tiers rempli un formulaire, nous avons beau marquer "En majuscule", le plus souvent c'est n'importe quoi.
Avec les bases de données, appliquer un format de saisie est facile, mais avec Excel cela est limité. Pour les nombres c'est possible, exemple : # ##0,00\ _€;[Rouge]-# ##0,00\ _€, jj/mm/aaaa (pour des dates), hh:mm:ss (pour les heures),mais rien pour les textes.
La solution du code pourquoi pas, mais je le rentre où pour qu'il agisse automatiquement dès la fin de la saisie car dans la cellule ce n'est pas possible?
Marc