VBA y graficos

Tengo una hoja modelo, que voy copiando y cambiando unos datos. La hoja
modelo tiene unos graficos, pero al copiarlos me deja la referencia a la
hoja origen.

Para solucionarlo pense en hacer una macro para que analize el origen de
los datos y sustituya la hoja anterior por la hoja nueva.

Para ello uso

Nombre1=ActiveChart.SeriesCollection(1).XValues
Nombre2=ActiveChart.SeriesCollection(1).Values
Nombre3=ActiveChart.SeriesCollection(1).Name

Pero lo que pasa es que cuando se ejecuta, las dos primeras no me devuelven
ni la serie ni el valor sino que devuelven una cosa rara.
En cambio el tercero si devuelve el nombre, aunque no la referencia que
figura en el grafico (devería devolverme una celda).

Alguien me puede ayudar y decirme que codigo debo tipear para que me
devuelva algo similar a hoja1!a1:a3, para luego yo poder cambiar eso por
hoja3!a1:a3

Gracias.