Discussion :

[casefayere]

Bonjour,

...C'est ce genre de message d'erreur qui faisait en sorte que j'utilise les Select et Activate.

Pas d'accord, j'ai testé ton code en partant d'une autre feuille (j'ai selectionné auparavant "Feuil2", nommé la feuille concernée "Feuille" et n'ai eu aucun problème

Bonne journée

[Kutoh]

En fait je viens de trouver le soucis.
En fait dans ma macro j'ai écris ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
With Classeur.Sheets(SFeuille).MaPlage.Interior
' où: Classeur = ThisWorkbook, SFeuille = "Feuille" et 
'MaPlage = ThisWorkbook.Sheets("Feuille").Range("A20:D30")

Donc étant donné que j'avais déjà défini MaPlage, je me devais de mettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

With MaPlage.Interior

Désolé, j'ai pas encore assimilé le fonctionnement des Objets Range, Sheets et Workbook

[Philippe Tulliez]

Bonjour,
Il y a sans doute des lignes de code que tu n'as pas publiées au-dessus de cette ligne et qui sont à l'origine de la cause de l'erreur.
Peut-être as-tu un autre bloc With ou un IF non fermé.
[EDIT]
Et bien voilà interrompu par un appel j'ai envoyé ma réponse avec retard et confirme sans doute ce que je pensais.

[Invité]

Désolé, j'ai pas encore assimilé le fonctionnement des Objets Range, Sheets et Workbook