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
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
-
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
-
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-
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
-
-
salam
moi je ai import et exeport . et ca march avec office 2003
mais pas avec les auter version -
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 -
slt je veux le code de comment exporter les donnes de data grid view ado.net 2008 a un excel
-
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-
-
@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é -
@gothmerci pq j ai régle le probleme
-
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 -
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
-
