Discussion :

[younesssoleil]

Bonjour,
Je développe avec Vb 2010 express
J'importe un fichier excel dans un datagrideview ( =DGV dans mon cas), j'arrive bien avec le code ci-dessous
Mais j'arrive juste a utiliser la première feuille active : NomFeuille = "code" dans mon cas
Ma question est comment je peux pointer vers une autre feuille du même fichier et récupérer des données de celulle ?
Merci d'avance de votre aide.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Private Sub Button5_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click  '' importer
        Dim OpenFileDialog2 As New OpenFileDialog
        DGV.Visible = True
        Dim dt As New System.Data.DataTable
 
 
 
        If OpenFileDialog2.ShowDialog = System.Windows.Forms.DialogResult.OK Then
 
            Dim FileName As String = OpenFileDialog2.FileName.ToUpper
            Dim Builder As New OleDbConnectionStringBuilder With {.DataSource = FileName}
            Dim NomFeuille As String
 
 
            NomFeuille = "code"
 
            ' Setup the properties for our connection dependent on which file was open.
 
 
 
            Using cn As New System.Data.OleDb.OleDbConnection With {.ConnectionString = Builder.ConnectionString}
                Dim cmd As New OleDbCommand With _
                { _
                    .CommandText = "SELECT * FROM [" & NomFeuille & "$]", _
                    .Connection = cn _
                }
 
                cn.Open()
 
                dt.Load(cmd.ExecuteReader)
                DGV.DataSource = dt
 
                DGV.Columns.RemoveAt(0)
 
 
            End Using
 
 
    End Sub

[younesssoleil]

Bonjour

Merci de me faire une réponse... je suis bloqué....

[clementmarcotte]

Si le C aiguisé est comme je pense,

tu remplaces NomFeuille par autre chose

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.CommandText = "SELECT * FROM [" & NomFeuille & "$]", _

[younesssoleil]

Merci pour ta réponse..je peux te rassurer que j'ai essayer plusieurs fois sans sucés.. tout simplement car il y 'avait un espace dans le nom de mes feuille
xlworkbook.ActiveSheet.Name = " " & nom

Merci encore de ton aide