Connexion

Lire les noms des feuilles excel sans les connaitre

Niveau requis pour utiliser/comprendre cette source : 2 ( Initié )
Créé le 12/01/2011 07:22:18 et initié par jvuillaume [Liste]
Vue : 2194
Catégorie(s) : Algorithme
Langages dispo pour ce code :
- VB 2008

Proposer ce code dans un autre langage

Ajouter aux favoris Code Snippet pour Visual Studio 2005

Snippet VS 2005 (VB)

Langage : VB 2008
Date ajout : 12/01/2011
Posté par jvuillaume [Liste]

Imports Xl = Microsoft.Office.Interop  
Private Sub ChargeComboFeuilles() 
Dim CheminFichierExel as string=’mettre le chemin du fichier excel’ 
        Dim AppExcel As Xl.Excel.Application 
        Dim WbExcel As Xl.Excel.Workbook 
        AppExcel = New Xl.Excel.Application 
        WbExcel = appExcel.Workbooks.Open(CheminFichierExel) 
        For i = 1 To WbExcel.Worksheets.Count 
            Me.ComboFeuilles.Items.Add(WbExcel.Worksheets(i).name) 
        Next 
 
    End Sub

Les Snippets

Rechercher :

Par langages :

Par Catégorie

Compteurs

Lire les noms des feuilles excel sans les connaitre