Change sheet name fro the source data in a diagram using Excel VBA : I have a diagram on a worksheet in Excel. The source data is located  another sheet. I would like to redirect the source data reference in the digram to another worksheet which is identical to the first worksheet except for the actual data.

How can I get the current sheetname from the sourcedata reference in the diagram and replace that with the name of the other worksheet? I need to accomplish this using VBA.

Thanks!