Bonjour,

J'essaye de mettre au point un tableau
il faut que les info saisie en B10 soit en MAJUSCULE
Car j'ai une fonction recherche
J'utilise dans la feuil1 :

 Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("B10: B30")) Is Nothing Then Target = UCase(Target)
End Sub

Quand je passe dans la MACRO Update01 tout va bien, mais quand je remet à blanc ma ligne B10:F10 je plante en Erreur d'éxécution. 
Comment faire je trouve pas l'astuce.

je met en piéce jointe mon appli

D'avance merci a tous pour votre concours.

Cordialement 

Bjr.

J'essaye de mettre ma piéce jointe ??..//.??N

excuses

Bjr,
Je retente ou je ferme le sujet, apparement je ne peux pas envoyer des fichiers.

Bonjour,

J'ai trouvé.
j'ai mis dans la macro.

Range("B10").Select
    ActiveCell.Value = StrConv(ActiveCell.Value, vbUpperCase)

Bonjour Ramarc,

Dans ton premier post tu parles du "fonction de recherche". Je voudrais bien savoir de quelle fonction de recherche tu parles, fonction Excel pure, ou utilisation du FIND dans VBA ?

Perso je ne connais pas de fonction "recherche" Excel qui fassent la différence entre des majuscules et minuscules.

En ce qui concerne le VBA, tu as une propriété MatchCas qui permet de respecter les minsucules et majuscules, Microsoft appelle "respecter la case". Cette option est accessible dans la boîte de dialogue après avoir cliqué sur le bouton "options>>".

@+Jean-Marie