Log In
Register
Home
December 12, 2016
Offline
I tried to write a procedure to update a chart source data specifying the correspondent worksheet as follows:
Sub ChartSource()
'
Dim ws As String
ws = ActiveSheet.Range("B16").Value
ActiveSheet.ChartObjects("Chart 5").Activate
ActiveChart.PlotArea.Select
ActiveChart.SetSourceData Source:=Sheets(ws).Range("A165:B365")
End Sub
Thanks in advance to guide me to fix the error "subscript out of range".
See Answer
November 8, 2013
Offline
Hi Julian,
The worksheet name seems to come from range B16 of the ACTIVE SHEET.
Make sure the correct sheet is ACTIVE before running the code and what you have in B16 is the name of an existing sheet.
Answers Post
December 12, 2016
Offline
Hi Catalin,
My value of B16 comes from a data validation referring to a previous list I didn't update. Thanks for your highlight. Take the chance could you please help me on another little problem:
I've changed the font size of the code on VBE through Tools > Options > Editor Format but failed to save it even after pressing the "OK" button. Why?
Sorry for bothering you so much!
Best regards,
Julian
November 8, 2013
Offline
On Tools>Options>Editor Format, you have to select from the left side list the TYPE of text you want to change: Normal Text, Selection Text, Comment Text, Breakpoint Text and so on. Each can be formatted as you want.
December 12, 2016
Offline
It seems a little tricky. The left side list is for code colors selection only not valid on font size. Although there are so many font types with limited size can be choosed from the right side drop down list but no English or U.S.A version found. That's my finding. Finally I choose Verdana (West Europe) to enhance my visibility.
1 Guest(s)
