pb avec Shapes("ZoneDeTexte").Characters.Text

Bonsoir Sony,

Si tu as retranscrit exactement dans ton message, la séquence que tu as codée, il est normal que tu bloques sur :

'Worksheets("reporting").Shapes("ZoneDeTexte").Characters.Text =
LeContenuDeLaZone

'WoskSheet .... est un commentaire
LeContenuDeLaZone n'a pas été mis en commentair (pas de quote) et ne correspond pas à une instruction exécutable -> plantage

Si tu écris
'Le contenuDe La Zone
cette ligne sera considérée comme un commentaire et ne provoquera plus d'erreur

Tu peux aussi écrire directement :
=====================================================
LeContenuDeLaZone = "Le commentaire : azertyuiop."
Worksheets("reporting").Shapes("ZoneDeTexte").Select
Selection.Characters.Text = LeContenuDeLaZone
=====================================================

Celà marchera...

Cordialement.

Omicron