Lire un fichier excel en VBA excel

Fermé
sirine - 24 sept. 2017 à 21:15
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 - 25 sept. 2017 à 06:45
bonsoir ,
j'ai un petit problème j'ai pas trouver le code spécifique pour
j'ai fait un interface en VBA excel qui importe des fichiers excel et l'exporter dans un seul fichier externe fermer .xls donc je veux terminer mon code de faire
la lecture de ce fichier fermer .xls et l'afficher sur notre page actuel excel


voila le code mais n'est pas complet




Dim ligne_debut As Integer: Dim ligne_fin As Integer
Dim clonne_debut As Integer: Dim colonne_fin As Integer
Dim ligne_enCours As Integer: Dim colonne_enCours As Integer



Private Sub fermer_Click()

End Sub


Private Sub exporter_Click()
Dim nom_fichier As String
ligne_debut = 1: colonne_debut = 1
ligne_enCours = ligne_debut: colonne_enCours = colonne_debut
For i = 0 To liste_fichiers.ListCount - 1

lecture (liste_fichiers.List(i))
Next i
traitement
nom_fichier = Application.GetSaveAsFilename(fileFilter:="Text Files (*.xls), *.xls")
sortie.Value = nom_fichier

lecture (nom_fichier)



End Sub

Private Sub importer_Click()
Dim fichier_choisi As String
fichier_choisi = Application.GetOpenFilename("Text Files (*.xls), *.xls", , "selectionner un fichiers EXCEL")
If (LCase(fichier_choisi) <> "faux" And fichier_choisi <> "0") Then
liste_fichiers.AddItem (fichier_choisi)

End If

End Sub

Private Sub ecriture()

End Sub
Private Sub lecture(fichier As String)




End Sub





Private Sub traitement()

End Sub




si vous pouvez m'aider , merci d'avance .
A voir également:

1 réponse

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
25 sept. 2017 à 06:45
Bonjour,
lecture/ecriture classeur ferme:
https://silkyroad.developpez.com/VBA/ClasseursFermes/
0