l

Nouveau venu

Inscrit le :14/08/2013
Dernière activité :21/08/2013 à 16:15
Version d'Excel :office 7
Messages
4
Votes
0
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par laurent77184

DateAuteur du sujetSujetExtrait du message
21/08/2013 à 15:21laurent77184Appliquer macro à tout les fichier Excel d'un repertoireJe suis pas sur de saisir. Mais merci de ton aide...
14/08/2013 à 13:52laurent77184Appliquer macro à tout les fichier Excel d'un repertoireJ'ai donc ceci Sub parcourirFichiers() Dim chemin As String, Fichier As String Dim wb As Workbook Set wb = ThisWorkbook chemin = wb.Path + "\" Fichier = Dir(chemin & "*.xl*") ' 1er fichier Do While (Len(Fichier) > 0) If Fichier <> ThisWorkbook.Name Then Workbooks.Open chemin & Fichier ' tra...
14/08/2013 à 11:07laurent77184Appliquer macro à tout les fichier Excel d'un repertoireWhaooo super merci Par contre je suis vraiment pas très doué pouvez vous m'indiquer comment l'intégré à ma macro? Dois-je copier ce texte avant ou après? ou intercallé ma macro dans ce code? dois-je modifier certaine information? du style remplacé chemin par "Z:\Région IDF Val de Loire PACA BOURGOGN...
14/08/2013 à 10:39laurent77184Appliquer macro à tout les fichier Excel d'un repertoireJe travaille tous les mois sur des fichier excel que je dois mettre en forme et protéger de manière identique. Pour cela j'utilise la macro suivante Sub Variables() ' ' Variables Macro ' ' Touche de raccourci du clavier: Ctrl+l ' Columns("A:I").Select Columns("A:I").EntireColumn.AutoFit Range("E3")...