mNouveau venumassilightInscrit le :15/06/2020Dernière activité :17/06/2020 à 02:48Version d'Excel :2007Messages6Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Messages postés par massilightDateAuteur du sujetSujetExtrait du message16/06/2020 à 14:16massilightAjouter un message a ce codeJ'ai juste un problème avec mes images il reporte pas l'image une fois le classeur crée j'ai ce message d'erreur...16/06/2020 à 14:11massilightAjouter un message a ce codeMerci...16/06/2020 à 13:30massilightAjouter un message a ce codeJe voudrai ajouter a ce code un message a la fin de son exécution qui me dit combien de classeur on été traité...15/06/2020 à 13:15massilightRegrouper plusieurs fichiers Excel sous un seul classeurNon elle me copie que le 1er onglé de chaque excel donc je modifie ThisWorkbook.Sheets(1).Activate j'ai 4 onglé dans les 31 fichiers source mais comme c tellement urgent j'ai pas pu cherché plus je dépanne avec celle ci...15/06/2020 à 13:01massilightRegrouper plusieurs fichiers Excel sous un seul classeurJ'ai trouvé ce que je cherché et un Grand merci quand même pour ton intension Sub ouvreFichiers() Dim NomFichier As Variant, Filtre As String, cmpt As Long, fich() As String Dim wb As Workbook, nom Filtre = "Tous les fichiers(*.xl*),*.xl*" NomFichier = Application.GetOpenFilename(Filtre, 1, "Ouvrir"...15/06/2020 à 12:45massilightRegrouper plusieurs fichiers Excel sous un seul classeurJe voudrai regrouper plusieurs fichier excel dans un seul classeur sachant que les fichiers contiennent plusieurs feuilles...Forums