Olá amigos,
Como faço para adaptar o código abaixo para que exiba o grafico gerado na planilha "NovoGrafico" num userform.

Sub Grafico1()
'Cria um grafico Vazio'
Charts.Add
 
'Adiciona a fonte de dados ao grafico'
ActiveChart.SetSourceData Source:=Sheets("Dados").Range("A2:H42"), PlotBy:=xlColumns
 
'Cria o grafico numa nova planilha e o nomeia'
ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="NovoGrafico"

End Sub