Toutes les lignes en majuscule

[eliot raymond]

Bonjour a toutes et tous, forum,

j'ai commencer un code pour faire une petite présentation et il me manque

comment mettre tout en majuscule.

Voir svp le fichier infos supplementaires a l'intérieur

Si quelqu'un veut bien svp complèter le code afin que ca fonctionne comme souhaiter

merci a vous et de votre temps

Raymond

 

[gilbert_RGI]

Re : Toutes les lignes en majuscule

Bonjour

avez- vous tester Ucase() ?

c'est magique

UCase (Target.Value) 🙂🙂

 

[eliot raymond]

Re : Toutes les lignes en majuscule

Salut gilbert,

Merci de la réponse,

OUI j'ai essayer mais je n'arrive pas a placer correctement le code pour obtenir le résultat souhaiter.

Raymond

 

[haonv]

Re : Toutes les lignes en majuscule

Bonjour Raymond ,Gilbert,

Un essai avec :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C8:C18")) Is Nothing Then
If Target.Count <> 1 Then Exit Sub

Application.EnableEvents = False

With Target
.Font.ColorIndex = 1
.Font.Bold = True
.Characters.Text = UCase(Target.Characters.Text)
End With
With Target.Characters(1, 1)
.Font.ColorIndex = 3
End With

Application.EnableEvents = True
End If
End Sub

Amicalement

 

[Paritec]

Re : Toutes les lignes en majuscule

Bonjour Eliot Gilbert😱 le forum
voilà ton fichier en retour à l'ouverture comme tu as demandé tu as la mise à jour des cellule C8 à C18

et Bonne Année 2012
a+
Papou😱

EDIT: j'ai oublié Haonv

 

[eliot raymond]

Re : Toutes les lignes en majuscule

Salut haonv,

merci pour ta réponse et le petit code

ca fonctionne mais ca passe en majuscule qu'après avoir valider par "enter" le texte
je souhaiterai svp que dès l'ouverture du fichier ca passe directement toute la liste en majuscule
la ce ne sont que quelques lignes, la liste va s'allonger bien sur (LOL)

merci a plus tard
Raymond

 

[eliot raymond]

Re : Toutes les lignes en majuscule

Merci a vous 3 haonv, gilbert, paritec

c'est bon ca fonctionne comme souhaiter avec la modif de paritec.

encore merci je vous souhaite a tous un excellent réveillon 2011 - 2012

ainsi qu'au forum

Amicalement Raymond meilleurs voeux a tous le monde