Obliger Majuscule ou minuscule cellule excel

Résolu/Fermé
Co_nexion Messages postés 328 Date d'inscription lundi 5 mars 2012 Statut Membre Dernière intervention 15 juillet 2015 - Modifié par Co_nexion le 24/07/2013 à 18:19
Co_nexion Messages postés 328 Date d'inscription lundi 5 mars 2012 Statut Membre Dernière intervention 15 juillet 2015 - 30 juil. 2013 à 11:08
Bonjour,

Je souhaiterai dans un tableur excel, faire en sorte que lorsque la personne écrit son texte le contenu s'inscrive soit forcément en majuscule soit en minuscule.

Par exemple que de la colonne D à la colonne M, les éléments saisis ne soient qu'en majuscule.
Que la colonne N soit uniquement en minuscule.
Et que la colonne O soit de nouveau en majuscule.

Par avance merci de votre temps
Cdt,

(Excel 2010)

1 réponse

f894009 Messages postés 16711 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 29 septembre 2022 1 655
24 juil. 2013 à 20:05
Bonjour,

VBA de la feuille:

Private Sub Worksheet_Change(ByVal Target As Range)
    'si pas delimite nombre de lignes
    If Not Application.Intersect(Target, Range("d:d,e:e,f:f,g:g,h:h,i:i,j:j,k:k,l:l,m:m,o:o")) Is Nothing Then      'passage MAJUSCULE
        Target = UCase(Target)
    ElseIf Not Application.Intersect(Target, Range("n:n")) Is Nothing Then  'passage minuscule
        Target = LCase(Target)
    End If
End Sub


Bonne suite
0
Co_nexion Messages postés 328 Date d'inscription lundi 5 mars 2012 Statut Membre Dernière intervention 15 juillet 2015
30 juil. 2013 à 11:08
Bonjour,

Merci pour ce code, je vais tester tout ça !
A tout à l'heure
0