By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
438,646 Members | 2,098 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 438,646 IT Pros & Developers. It's quick & easy.

Creating Multiple charts in Excel

P: 1
Hi all,

i am trying to automate multiple charts by manipulating macros.

i have data on 17 different sheets and wish to create a chart for the same data range in each sheet.

Problem is i keep getting run time error - 438, 'object dosen't support this property or method'

Any ideas?



here is my code

Sub Macro1()
' Macro1 Macro

Dim i As Integer
For i = 1 To 17

ActiveChart.ChartType = xlXYScatterSmoothNoMarkers
ActiveChart.SetSourceData Source:=Sheets(i).Range("B1:G673"), PlotBy:= _
ActiveChart.Location Where:=xlLocationAsNewSheet
With ActiveChart
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
Next i

End Sub
Nov 1 '06 #1
Share this question for a faster answer!
Share on Google+

Post your reply

Sign in to post your reply or Sign up for a free account.