Please help with this chart

A

alvin Kuiper

Hi
HAve seen a answer from Bob Phillips and try this
Sheets("Ark1").Select
cLastRow = Cells(Rows.Count, "B").End(xlUp).Row

Range("A1:B" & cLastRwo).Select
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Sheets("Ark1").Range("A1:B" &
cLastRwo), PlotBy:= _
xlRows
ActiveChart.Location Where:=xlLocationAsNewSheet
With ActiveChart
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
But get an error in
Range("A1:B" & cLastRwo).Select

CAn someone help here ?

Alvin
 

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

Similar Threads

Changing Input to code that creates a chart 2
About chart with a macro 1
How to change the row number in macro code? 1
Floating Chart? 2
Delete a chart 4
Charts in Multiple Sheet in Excel 1
Date values not appearing correclty in the x-axis 1
Putting the series 1 and series 2 titles from a worksheet 0

Top