Transfert de données VB.NET vers EXCEL

Bonjour,
je veux le code en VB.NET qui me permet de tranférer les données qui sont affichées dans le datagridview vers EXCEL.

merci de votre aide

Ramdane
Configuration: Windows XP
Internet Explorer 6.0

6 réponses

  1. il faut tout d'abors ajoutter la reference Microsoft Excel comme suivant :
    projet + ajouter une refenece +Menu COM +valider OK
    Code :

    imports Microsoft.Excel....

    Class Form1

    sub button1_Click()

    Dim c,n as inetger
    Dim xl as new Excel.application

    xl.visible=true
    xl.worckboxs.add

    for c=0 to Datagridview1.columns.count-1
    xl.cells(c+1,1)=Datagridview1.columns(c).name
    next

    for l as integer=0 to Datagridview1.rows.count-1
    for c=0 to Datagridview1.rows.count-1
    xl.cells(l+1,j+1)=Datagridview1.rows(l).cells(c).value
    next c
    next l

    end sub
    eh bonne chance
    next
    12
    1. Euh plusieurs questions :
      dans xl.cells(l+1,j+1)=Datagridview1.rows(l).cells(c).value c'est pas j mais c non?
      dans xl.cells(c+1,1)=Datagridview1.columns(c).name il met une erreur
      Merci d'avance des reponses
      0
    2. bonsoir,
      je veux le code VB.NET et ADO.NET sous vusial basic 2008 qui permet de transferer les données d'une base de donnée SQLServeur vers excel et l'inverse
      merci d'avance
      0
    3. IL y a des erreurs dans ton codes, mais j'ai compris le principe, merci
      0
  2. salut,

    je vous remerci pour votre reponse. je travaille avec le vb.net

    j'ai ajouté la référence Microsoft Excel 11.0 Object library,
    mais imports microsoft.excel n'existe pas, j'ai trouvé microsoft.office en installant la reference Microsoft Office.....

    mais le EXCEL.APPLICATION de la ligne DIM XL AS NEW EXCEL.APPLICATION est souligné donc erreure.

    svp aidez moi à resoudre ce probléme.

    Merci pour votre aide
    0
    1. et moi aussi . je travaille avec le vb.net

      j'ai ajouté la référence Microsoft Excel 11.0 Object library. dans vb.net
      et je veux transmetter des données dataset ou datagaridview vers excel

      svp aide moi
      0
    2. @lailasalut laila , une fois que tu a ajouter la bilbiotheque excel 11.0

      tu dois utilisé un import

      Imports Microsoft.Office.Interop.Excel

      la versions .microsoft.excel n'existe plus

      j'espere de t'avoir aidé
      0
    3. @gothmerci pq j ai régle le probleme
      0
    4. Salut Ramadan,

      Pr resoudre votre blem.

      Il faut ajouter la référence Microsoft Excel 11.0 Object library,
      puis : Imports Excel
      Et par rapport à l'érreur "mais le EXCEL.APPLICATION de la ligne DIM XL AS NEW EXCEL.APPLICATION est souligné donc erreure." Il faut importer Imports System.MissingMemberException

      Bonne Chance
      0
    5. Imports Microsoft.Office.Interop.Excel
      Imports Microsoft.Office.Interop

      Public Class Form1

      Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      Dim c, ligne As Integer
      Dim xl As New Excel.Application

      xl.Visible = True
      xl.Workbooks.Add()

      Try
      For ligne = 0 To DataGridView1.RowCount - 1
      For c = 0 To DataGridView1.ColumnCount - 1
      xl.Cells(1, c + 1) = DataGridView1.Columns(c).HeaderText
      xl.Cells(ligne + 2, c + 1) = DataGridView1.Rows(ligne).Cells(c).Value
      Next c
      Next ligne

      Catch ex As Exception
      MsgBox(ex.Message)
      End Try
      End Sub

      End Class

      'Bonne courage a tous
      0
  3. slt je veux le code de comment exporter les donnes de data grid view ado.net 2008 a un excel
    0
    1. bonjour je code sur vb.net et sql serveur 2000 je voulé en clicant sur un outon transferer le contenu de mon datagridview ver excel 2007
      j'ai besoin de votre aide svp
      0
      1. salam
        moi je ai import et exeport . et ca march avec office 2003
        mais pas avec les auter version
        0
        1. bonjour,

          je voudrais developper une petite application sous vb net 2008 qui servirait juste a remplir des cases dans un tableur excel et je n'ai aucune idee de la facon de procédé .
          j'ai etudiez les explications dessus mais je butes..

          merci
          0
          1. ca marche comme suit mais 2005, tu peux essayer

            Imports Microsoft.Office.Interop.Excel

            Public Class frm_menu

            Private Sub btn_1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_personnel.Click

            Dim c, n As Integer
            Dim xl As New Microsoft.Office.Interop.Excel.Application

            xl.Visible = True
            xl.Workbooks.Add()

            For c = 0 To 5 'Datagridview1.columns.count - 1
            xl.Cells(c + 1, 1) = "c" & c.ToString 'Datagridview1.columns(c).name
            Next

            'For l As Integer = 0 To Datagridview1.rows.count - 1
            ' For c = 0 To Datagridview1.rows.count - 1
            ' xl.Cells(l + 1, j + 1) = Datagridview1.rows(l).cells(c).value
            'Next c
            'Next l

            End Sub
            0