W
WayneK
Hi. I am using Excel 2003.
I used the macro recorder and modied some of the code in the hopes tha
the
VBA I wrote work work. Instead, it produces errors. I have a Char
object on
a Sheet that I wish to "feed" a range to chart. Since the number o
rows for the
needed range changes from time to time, I included a variable calle
amtrows.
Then I try to "assign" a range to variable XTemp. Then I try to fee
that XTemp
range into the Chart object.
My modified code errors at this line --
Set XTemp = Range("C1").Resize(x, 0)
And at this line as well --
ActiveChart.SetSourceData Source:=Sheets("Sheet5").Range(XTemp), PlotB
_
:=xlColumns
Could you please review my code below and tell me what to change ?
would be most
grateful for your help.
WayneK
Dim amtrows As Long
Dim XTemp As Range
amtrows = Range("A8").Value
Set XTemp = Range("C1").Resize(x, 0)
ActiveSheet.ChartObjects("Chart 2").Activate
ActiveChart.ChartArea.Select
ActiveChart.SetSourceData Source:=Sheets("Sheet5").Range(XTemp), PlotB
_
:=xlColumns
ActiveWindow.Visible = Fals
I used the macro recorder and modied some of the code in the hopes tha
the
VBA I wrote work work. Instead, it produces errors. I have a Char
object on
a Sheet that I wish to "feed" a range to chart. Since the number o
rows for the
needed range changes from time to time, I included a variable calle
amtrows.
Then I try to "assign" a range to variable XTemp. Then I try to fee
that XTemp
range into the Chart object.
My modified code errors at this line --
Set XTemp = Range("C1").Resize(x, 0)
And at this line as well --
ActiveChart.SetSourceData Source:=Sheets("Sheet5").Range(XTemp), PlotB
_
:=xlColumns
Could you please review my code below and tell me what to change ?
would be most
grateful for your help.
WayneK
Dim amtrows As Long
Dim XTemp As Range
amtrows = Range("A8").Value
Set XTemp = Range("C1").Resize(x, 0)
ActiveSheet.ChartObjects("Chart 2").Activate
ActiveChart.ChartArea.Select
ActiveChart.SetSourceData Source:=Sheets("Sheet5").Range(XTemp), PlotB
_
:=xlColumns
ActiveWindow.Visible = Fals