View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.charting
Greg Snidow Greg Snidow is offline
external usenet poster
 
Posts: 153
Default Change chart range with macro

Greetings. I am trying to name a variable that is the last row of data in a
range, then use that variable in a chart's range. I tried inserting it where
the last row would be, but it is not working, like this "A20:A & LstRow,...
Anyone have any ideas?

LstRow = [B51].End(xlUp).Row

MsgBox (LstRow)

Charts.Add
ActiveChart.ChartType = xlLine
ActiveChart.SetSourceData Source:=Sheets("Mar").Range( _
"A20:A & LstRow,C20:C46,E20:E46,G20:G46,I20:I46,K20:K46,M20 :M46"),
PlotBy:=xlColumns
ActiveChart.Location Whe=xlLocationAsObject, Name:="Mar"
ActiveChart.HasLegend = True
ActiveChart.Legend.Select
Selection.Position = xlRight