Dunque "MSChartEC" è l'oggetto MSChart con nome EC e si tratta di un grafico ottenuto con il predetto oggetto.
Se tu non lo usi il codice sopra descritto non funziona.
Al suo posto usa:Così funziona e l'oggetto Image si chiama "Lavagna"codice:Private Sub Command1_Click() Form1.ImageLavagna.Refresh Clipboard.SetData ImageLavagna, vbCFBitmap Form1.ImageLavagna.Picture = Clipboard.GetData SavePicture ImageLavagna.Picture, App.Path & "\ImageLavagna.bmp" End Sub
Già che ci sono ti posto anche il codice per aprire l'immagine:
codice:Private Sub CmdCarica_Click() On Error Resume Next 'Cancella il controllo Image: ImageLavagna.Picture = LoadPicture() ImageLavagna.Stretch = True 'Imposta l'altezza e la larghezza dell'immagine: With ImageLavagna .Height = 3000 .Width = 6000 End With 'Carica l'immagine: Set ImageLavagna.Picture = _ LoadPicture(App.Path & "\ImageLavagna.bmp") End Sub![]()

