How can I put the information written in the cell D15 of the "sheet1" into
the chart 1 created as new sheet (chart1). I want to put this nformation as a
label on the top of the chart.

Thanks in advance.
Maperalia

Place the following in your code:
With ActiveChart
.HasTitle = True
'''substitute the following range for the range that
'''contains the label for the chart
.ChartTitle.Characters.Text = Sheets("Sheet1").Range("A1").Value
end with

Hope that helps
JNW

"maperalia" wrote:

How can I put the information written in the cell D15 of the "sheet1" into
the chart 1 created as new sheet (chart1). I want to put this nformation as a
label on the top of the chart.

Thanks in advance.
Maperalia