majuscules

Bonjour,
Une 'tite macro à coller dans le module de la feuille concernée :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = Range('I8') Then Target.Value = UCase(Target.Value)
End Sub

Cliquez pour agrandir...

Si tu ne sais pas utiliser VBA, il suffit de :
Cliquer (ClicDroit) sur l'onglet de la feuille concernée + Visualiser le Code.
Y coller le texte précédent.
Appuyer sur Alt +F11 pour revenir a Excel.
Ok ?

merci beaucoup Galopin, ça marche. Pourquoi donc c'est si simple et rapide avec toi et que
moi je ne trouve jamais la bonne macro ??? A bientot