Manipulation Excel avec VB.NET

Question

Bonjour à tous,

j'ai créé un petit programme en VB.Net 2008 (environnement VB express).
Dans une de mes Forms, j'ai un Datagridview qui s'affiche (plusieurs colonnes (variable) et 500 lignes + 1 lignes pour le nom des colonnes).

Grâce à vous j'ai pu exporter les valeurs de mon Datagridview vers une nouvelle feuille de calcul Excel, de la manière suivante:

'----------------------------------------------------------------------
Imports Microsoft.Office.Interop.Excel  
Imports System.MissingMemberException

Private Sub Vers_Excel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Vers_Excel.Click

        Dim c, l As Integer
        Dim xl As New Microsoft.Office.Interop.Excel.Application

' Pour info: mon Datagridview se nomme "result".

        xl.Visible = True
        xl.Workbooks.Add()
        xl.Cells.Columns(1).ColumnWidth = 10  'je fixe la largeur de la 1ere colonne
                 
        For c = 0 To result.Columns.Count - 1
            ' j'affiche sur la 1ere ligne, les noms des colonnes du Datagridview
            xl.Cells(1, c + 1) = result.Columns(c).HeaderText  
        Next

        ' je remplis les cellules du fichiers excel avec les valeurs de result:     
        For l = 0 To result.Rows.Count - 1
            For c = 0 To result.Columns.Count - 1
                ' je fixe la largeur des colonnes:
                xl.Cells.Columns(c + 2).ColumnWidth = 21                 
                xl.Cells(l + 2, c + 1) = result.Rows(l).Cells(c).Value   
            Next
        Next

    End Sub
' ----------------------------------------------------------------------


Voilà ma question: je souhaiterai centrer le contenu des cellules du fichier excel généré.
Comment faire également pour faire des bordures autour des cellules, ecrire en gras pour le nom des colonnes, etc... ?

J'ai effectué de nombreuses recherches sur le forum, les tutos et les sources, en vain. 
Si quelqu'un peut m'aider, c'est avec grand plaisir

masterunivers · Answer

Salut,

ton code m'a bien aidé, je savais pas comment générer un xls avec vb.
je cherche à faire un mise en page mais sais pas par où commencer! lol
Please help!!!

cs_JLuc01 · Answer

Salut,

Pourquoi ne pas utiliser VBA avec une macro pour trouver le code dont tu as besoin?

Voila ce que j'ai obtenu rapidement quand je "run" une macro:


Sub Macro1()
'
' Macro1 Macro
' Macro recorded 24/12/2010 by Me
'
    Range("C7").Select
    ActiveCell.FormulaR1C1 = "Bold"
    Range("C7").Select
    Selection.Font.Bold = True
End Sub


Surement a arranger en fonction de tes besoin:
xLCells(x,x).Font.Bold = True ou quelquechose comme cela...

A+
JLuc01

cs_Le Pivert · Answer

Bonjour,
Regardez ce tuto, je pense qu'il peut être d'actualité en l'adaptant :

http://www.vbfrance.com/tutoriaux/IMPRIMER-CONTENU-LISTVIEW_609.aspx

@+ Le Pivert

Manipulation Excel avec VB.NET

3 réponses

Votre réponse

Discussions similaires