graph excel sous vb6

Question

Bonsoir,

 je
voudrais ouvrir un graphique excel dans mon application vb6. J'ai
trouv&#233; une petite aide qui m'explique comment faire, mais &#224; la fin vb
me sort une erreur.

Il me dit run time error: '424' Object required ,  et lorsque je
fait debug, il me dit que c'est cette ligne en jaune :
      

                   .Cols = Plage.Columns.Count

 Merci d'avance pour votre aide.

 
 code : 

 Private Sub Chart1_GotFocus()

     Dim xlapp As Excel.Application

     Dim classeur As Excel.Workbook, feuille As Excel.Worksheet, Plage As Excel.Range

     

     Set xlapp = New Excel.Application

     xlapp.DisplayAlerts = False

     Set classeur = xlapp.Workbooks.Open("C:\Analyseur_PC\relever_polluants.xls")

     Set feuille = xlapp.ActiveSheet

     Set Plage = feuille.Range("A1").CurrentRegion

     

     With flexgrid

         .Cols = Plage.Columns.Count

         .Rows = Plage.Rows.Count

         .Col = 0

         .Row = 0

         .ColSel = .Cols - 1

         .RowSel = .Rows - 1

         Plage.Copy

         .Clip = Replace(Clipboard.GetText, vbCrLf, vbCr)

     End With

     

     Set Plage = Nothing

     Set feuille = Nothing

     classeur.Close False

     Set classeur = Nothing

     Set xlapp = Nothing

 End Sub

S4ngo · Answer

personne ne sait d'ou vient mon probl&#232;me ? :s

Graph excel sous vb6

1 réponse

Discussions similaires