[Macro] Grafiek maken uit geselecteerd gebied

[ChristianEvers]

Hallo,

Ik heb een macro opgenomen waarmee ik een grafiek maak van een bepaalde selectie cellen. Omdat de selectie echter steeds wijzigt wil ik de macro daarop aanpassen. Het probleem zit volgens mij in de volgende sectie van de macro:

ActiveChart.SetSourceData Source:=Sheets("ARData").Range("A6:B9"), PlotBy:= _
xlColumns

en dan met name de Range, die moet niet zijn A6:B9, maar gewoon de actieve selectie van dat moment.

Hopelijk kan iemand me helpen.

 

[Joske2000]

Dag Christian,

Ik heb een soortgelijk probleem.
Ik heb het opgelost door eerst het gebied te selecteren met de volgende lijn :

Selection.CurrentRegion.Select

Het is niet de ideale oplossing denk ik, maar bij mij werkt het wel.

Joske

 

[ChristianEvers]

Je oplossing gaat me iets te snel...

Hoe vervang ik met jouw suggestie de Range?

 

[ChristianEvers]

Kan iemand me het aub iets uitgebreider uitleggen?

 

[Wigi]

Hallo,

Ik heb een macro opgenomen waarmee ik een grafiek maak van een bepaalde selectie cellen. Omdat de selectie echter steeds wijzigt wil ik de macro daarop aanpassen. Het probleem zit volgens mij in de volgende sectie van de macro:

ActiveChart.SetSourceData Source:=Sheets("ARData").Range("A6:B9"), PlotBy:= _
xlColumns

en dan met name de Range, die moet niet zijn A6:B9, maar gewoon de actieve selectie van dat moment.

Hopelijk kan iemand me helpen.

Werkt dit?

ActiveChart.SetSourceData Source:=Selection, PlotBy:= xlColumns

Wigi