![]() |
![]() |
|
|||||||
| Excel Questions All Excel/VBA questions - formulas, macros, pivot tables, general help, etc. Please post to this forum in English only. |
![]() |
|
|
Thread Tools | Display Modes |
|
|
#1 |
|
New Member
Join Date: May 2002
Location: Chantilly, VA
Posts: 9
|
I have been lurking on the board for awhile and finally have a question that I just cannot seem to get around.
I have a need to add multiple ranges to my chart. Sounds easy enough but I am also drawing them from different worksheets in the same file and they are in format Range("C3,E3,G3,I3")vs. 04102002 Portsmouth'!R3C121,'04102002 Portsmouth'!R3C123, format because I am skipping every other cell. I am going to add the rest of my code in an effort to make this a bit (?)easier to understand. For n = 1 To m Sheets(WorkSheetName(CurrentWorksheet)).Select If CurrentWorksheet = 1 Then Range(strRangeData).Select Charts.Add Set Cht = Charts.Add With Cht .Name = strDate & "Composite " & intTime & " Second" .ChartType = xlLineMarkers .SizeWithWindow = True .HasTitle = True .ChartTitle.Caption = intTime & " Second ORD" With ActiveChart.Axes(xlValue) .HasTitle = True With .AxisTitle .Caption = "Time(Seconds)" .Font.Size = 10 End With End With With ActiveChart.Axes(xlCategory) .HasTitle = True With .AxisTitle .Caption = "Function Names" .Font.Size = 10 End With End With End With CurrentWorksheet = CurrentWorksheet + 1 Else 'Need to add others here.... End If Next n [ This Message was edited by: Marcus_Neto on 2002-05-20 13:06 ] [ This Message was edited by: Marcus_Neto on 2002-05-20 13:07 ] |
|
|
|
|
|
#2 |
|
New Member
Join Date: May 2002
Location: Chantilly, VA
Posts: 9
|
MAN this website gets some traffic. I posted this 10 minutes ago and already am on the 2nd page....
Bump. |
|
|
|
|
|
#3 |
|
New Member
Join Date: May 2002
Location: Chantilly, VA
Posts: 9
|
I find it hard to believe that no one has a fix for this one....
Bump. |
|
|
|
![]() |
| Bookmarks |
| Thread Tools | |
| Display Modes | |
|
|