RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  49466 - AYUDA CONTROL GRAPH
Autor:  Francisco V
tengo un grafico prediseñado y un conjunto de celdas como origen de datos.
coloque un boton en la hoja 1, que contiene el siguiente codigo en el :

Private Sub CommandButton1_Click()
Dim graf As Chart
Dim chartsTemp As ChartObjects 'contador de charts (gráficos) para eliminar el anterior
' -------------------------------------------------------------------------
'. . . codigo que rellena las celdas de origen de d tos del grafico
'-----------------------------------------------------------------
datos = Range(Cells(6, 1), Cells(6 + n, 2)).Address 'rango a graficar
Set graf = Charts.Add 'gráfico y sus caraterísticas

With graf
.Name = "Gráfico"
.ChartType = xlXYScatterSmoothNoMarkers
.SetSourceData Source:=Sheets("Hoja1").Range(datos), PlotBy:=xlColumns
.Location Where:=xlLocationAsObject, Name:="Hoja1"
End With
'---------------------------------------------------------------
End Sub

cuando hago clic en el boton se genera un nuevo grafico que no tiene las caracteristicas como el que cree en tiempo de diseño. (color, tipo de letra,color de lineas etc).

este codigo hace parte de lo q deseo es decir cargar los datos de un rango de celdas
pero lo que deseo es utilizar el grafico que ya diseñe y alli enviar los datos del rango de celdas.
Esta parte de codigo: Set graf = Charts.Add 'gráfico y sus caraterísticas
me crea un nuevo grafico que no es lo q deseo sino utilizar el q tengo.
Como hago para indicarle que me use el grafico que diseñe?
Agradeceria su ayuda.


Nombre
Apellidos
Correo
Comentarios