Graphe avec plage variable

Bonjour

Débutant, je vous appelle à l’aide

J’essaye de faire une macro qui lancer automatiquement un graphe sur une plage de cellules qui est calculée par ailleurs

Lorsque que j’execute le code ci-dessous, la macro plante...😪

Dim debut_plage_ligne As Integer

Dim fin_plage_ligne As Integer

Dim debut_plage_colonne As Integer

Dim fin_plage_colonne As Integer

' Graphes ETP PROD

debut_plage_ligne = 4

debut_plage_colonne = 2 + 4 * (2 + nb_catégories)

fin_plage_ligne = 4 + nb_mois_rapport1

fin_plage_colonne = debut_plage_colonne + nb_catégories

Sheets("Pointages ETP PROD").Activate

ActiveSheet.Shapes.AddChart2(297, xlColumnStacked).Select

ActiveChart.SetSourceData Source:=Sheets("Pointages par Catégorie").Range( _

Cells(debut_plage_ligne, debut_plage_colonne), Cells(fin_plage_ligne, fin_plage_colonne))

Par contre, quand je remplace cette plage variable par des valeurs fixes (ex : «A10:L22 »), cela fonctionne

Des idées pour m’aider ?

Merci par avance

bonjour,

essaie ceci

with  Sheets("Pointages par Catégorie")
ActiveChart.SetSourceData Source:=.Range(.Cells(debut_plage_ligne, debut_plage_colonne), .Cells(fin_plage_ligne, fin_plage_colonne))
end with

si tu ne qualifies pas cells ou range, par défaut vba ira les chercher sur la feuille active (si dans un module) ou sur la feuille dans la quelle se trouve ta macro (si ta macro se trouve dans un module de feuille). Tu l'as fait pour range, mais pas pour les cells à l'intérieur de ton instruction range.

Merci beaucoup pour la rapidité de ta réponse

Malheureusement, la macro continue à s’arrêter sur cette ligne quand elle s’execute

bonsoir,

dans ce cas, pour t'aider, ton fichier est nécessaire.