Exporter un datagridview vers excel

Soyez le premier à donner votre avis sur cette source.

Vue 32 015 fois - Téléchargée 5 163 fois

Description

le code exporte un DataGridView dans un fichier Excel

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

YuneSh
Messages postés
22
Date d'inscription
lundi 3 janvier 2011
Statut
Membre
Dernière intervention
5 août 2011

merci :)
yourisparrow
Messages postés
7
Date d'inscription
mardi 14 avril 2009
Statut
Membre
Dernière intervention
21 avril 2010

c faisable avec un streamwriter.
sourourbe
Messages postés
3
Date d'inscription
mercredi 31 décembre 2008
Statut
Membre
Dernière intervention
16 mars 2009

Bonjour,

Merci beaucoup pour ce code. Est ce que quelqu'un peut m'expliquer comme exporter un DataGridView vers un fichier Word?
Jomba
Messages postés
58
Date d'inscription
mercredi 2 novembre 2005
Statut
Membre
Dernière intervention
22 juillet 2010

ce ne serait pas plus simple comme ça?

Public Sub ExporterVersExcel(ByRef Dgv As DataGridView)

Dim objXL As Excel.Application
Dim objClasseur As Excel.Workbook
Dim objFeuille As Excel.Worksheet

Try
' Lancer Excel
objXL = New Excel.Application
objXL.DisplayAlerts = False
objClasseur = objXL.Workbooks.Add(1)
objFeuille = objClasseur.Sheets(1)

Dim iLigne As Integer
' Récupérer l'élément actuellement sélectionné
iLigne = Dgv.Rows.GetFirstRow(DataGridViewElementStates.Selected)
' Tout sélectionner
Dgv.SelectAll()
' Le mettre en mémoire ClipBoard
Clipboard.SetDataObject(Dgv.GetClipboardContent())
' Remettre la sélection précédente
While Dgv.Rows.GetFirstRow(DataGridViewElementStates.Selected) > -1
Dgv.Rows(Dgv.Rows.GetFirstRow(DataGridViewElementStates.Selected)).Selected = False
End While
Dgv.Rows(iLigne).Selected = True

' Coller le datagrid dans Excel
objFeuille.Cells.PasteSpecial(Excel.XlPasteType.xlPasteAll, Excel.XlPasteSpecialOperation.xlPasteSpecialOperationAdd)

' Rendre visible Excel
objXL.Visible = True
objXL.UserControl = True
Catch ex As Exception
MessageBox.Show(ex.ToString())
End Try
End Sub
cs_yasmina28
Messages postés
1
Date d'inscription
samedi 12 septembre 2009
Statut
Membre
Dernière intervention
14 septembre 2009

Bonjour
j'ai essaé ce code mais j'ai un petit problème je crois que j'ai oublié de rajouter un dll mais je sais pas laquelle
le problème est: quand j'éxécute il ne reconnait pas la méthode SaveAs

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (rudhf)