Multiple range selection issue

S

SPV

I was trying to plot the Scatter graph for a specified range in
different columns. I have 3 columns with specified ranges Col 1 X axis
and the col2 and 3 plotted on Y axis . I have generated a record macro
for the same and it look like the same below.

Range("A2:A14,E2:E14,H2:H14").Select
Range("H2").Activate
Charts.Add
ActiveChart.ChartType = xlXYScatterSmooth
ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range( _
"A2:A14,E2:E14,H2:H14"), PlotBy:=xlColumns
ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = "ARM Load"
.Axes(xlCategory, xlPrimary).HasTitle = True
.Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "Time
in Sec"
.Axes(xlValue, xlPrimary).HasTitle = True
.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "Load in
%"
End With
End Sub

I have already defined ranges for
A2:A14 => Range 1
E2:E14 => Range 2
H2:H14 => Range 3 by declaring them as range...

Now when I gave Range("Range1,Range2,Range3").Select => didn't work
for me...
I tried Range("Range1","Range2","Range3).Select also.. didn't give me
result...

Now I tried Union(Range(X_axis), Range(NULL_Thread_activity),
Range(NULL_Thread_activity)).Select

Please throw some light on how to program the same in VBA with
specified ranges and not taking explicit cell references...

Thanks in advance for helping me....


Regards,
SPV
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top