What's the value of intRigaEnd? What is the value of area? Does this line
work:

Sheets(strFoglio).Range(area).Select

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
Peltier Technical Services, Inc. - http://PeltierTech.com
_______


wrote in message
...
Hi to all,
I have a problem which raise this morming.
Till this morming the vba code woked without problems... I didn't
change anything.
This is the code:

Static area As String

area = "I15:K15,M15:P15," & "I" & intRigaEnd & ":K" & intRigaEnd &
",M" & intRigaEnd & ":P" & intRigaEnd

ActiveChart.SetSourceData Source:=Sheets(strFoglio).Range(area),
PlotBy:=xlRows

I don't know why it doesn't work anymore :(

Thanks in advance to whom will help me.

Bye Denis