dynamic range

G

geebee

hi,

i have the following:

Dim NewGraphSource As String
Dim testRange As Range
testRange = NewGraphSource
MsgBox "testrange: " & testRange
ActiveSheet.ChartObjects("Chart 7").Activate
ActiveChart.ChartArea.Select
ActiveChart.SetSourceData Source:=Sheets("Trending").Range(testRange) _
, PlotBy:=xlRows


lets just say that NewGraphSource = A14:G14

i am getting an error message:
"runtime error 91: object variable or With block variable not set"

i am not sure what to do.

thanks in advance,
geebee
 
G

Gary''s Student

You are very close:

Dim NewGraphSource As String
Dim testRange As Range
NewGraphSource = "A14:G14"
Set testRange=Range(NewGraphSource)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Run-Time Error 1004 on ActiveChart.SeriesCollection(1).Values = 4
Resize Table Range to exclude zero values and Input New Range into achart object 10
Trying to determine what cells within a Row have a 0 (zero) value 5
problem:Structure with Object reference (TYPE...END TYPE) 6
Need to get cell address next to current address 3
Dynamic Range for a Chart & Trendline 0
Unable to sum range variable 1
My macro doesn't work if sheet is protected but it works if not protected 2

Top