Solución 10.4 Crear un gráfico incrustado en una hoja de cálculo

Sub GraficoIncrustado()  
    Dim Grafico As Chart 
    Dim rngRango As Range 
    Set rngRango = Worksheets("Hoja1").Range("A2:C5") 
   ...