Bonjour tout le monde,

voici mon souci : j'ai un dossier contenant des classeurs excel qui ont tous des lignes d'enregistrements sur leur première feuile - je voudrais créer un classeur excel qui me copie un à la suite des autre tout ces enregistrements de ces classeurs.

je n'y arrive pas du tout - merci de m'aider.

j'ai crée mon classeur :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Set classeur = Application.Workbooks.Add
 
With classeur
.SaveAs "Z:\Construction"
Windows("Construction.xls").Activate
End With
j'ai en fait besoin d'aide pour finir ce début de programme :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
ChDir "Z:\IMPORT 1"
monfichier = Dir("*.*")
While monfichier <> ""
merci de votre aide.

ash.