Suite,
C'est possible. Sur la ligne de code débutant par If il faut rajouter après activate ceci
: ActiveSheet.shapes(Form2).select
Et laisser ensuite les : puis le Exit sub
Je te réponds de mon phone. Donc c'est un peu moins pratique. Mais tu devrais réussir.