dataset to excel ?

Bonjour
si quelqu'un sait comment on peut exporter un dataset ou datagrid view vers un fichier  excel
merci en avance  je travail avec vb.net 2008

Bonjour.
Tiens

'Transfert du datagrid vers excel'
            Dim xl As New Object
            xl = CreateObject("Excel.application")
            xl.visible = True
            xl.workbooks.Add()
            For x As Integer = 0 To DataGridView2.Rows.Count - 1
                For y As Integer = 0 To DataGridView2.ColumnCount - 1
                    xl.cells(x + 1, y + 1) = DataGridView2.Rows(x).Cells.Item(y).Value.ToString
                Next y
            Next x
        End If