message d'erreur Erreur d'execution 13 |
Titre du sujet : message d'erreur Erreur d'execution 13 par ramarc le 06/03/2012 13:54:41 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 |
Forums