Problème de syntaxe

[Isabelle]

Salut, j'ai récupéré un programme pour ouvrir des fichiers contenus dans une liste.
Le problème c'est que la première ligne du programme ne fonctionne pas et je ne sais pas pourquoi.
Pouvez-vous m'aider?
Voilà le programme:



Attribute VB_Name = "OuvertureTableauFichiers"


Sub FileNameArray()

Dim fNames As Variant
Dim mycell As Range
Dim lLastRow As Long
Dim lCount As Long

lLastRow = Range("A1").End(xlDown).Row

fNames = Range("A1:A" & lLastRow)

For lCount = 1 To UBound(fNames)
Workbooks.Open Filename:=fNames(lCount, 1)
Next lCount


End Sub

 

[STéphane]

vire la ligne attribute vb_name non nécessaire (je pense qu'elle est nécessaire si tu improtes ce fichier module directement dans visual basic editor)

ce code suppose que tes fichiers (et leur chemin éventuel) figure dans les cellules de la colonne A en partant de A1

bye
stephane