Résultats de la recherche

Re : Récupérer le nom de fichier Je viens de trouver la solution Ci-joint le code corrigé Sub Ecrit() Dim Temp As String Dim fichier As String Dim i As Integer Dim m As Integer 'lecture des fichier xls Temp = Dir(ActiveWorkbook.Path & "\*.xls") Application.DisplayAlerts = False...

Re : Récupérer le nom de fichier Voila un exemple de travail que je souhaite faire le fichier toto.xls dans le zip va servir pour exécuter la macro. Donc quand j'exécute la macro je trouve bien le titre du fichier dans la colonne 8 pour le fichier CSMT_CGMT08_0566_v1_3.xls mais par pour les...

Re : Récupérer le nom de fichier c'est pas vraiment ca, ce que je souhaite plus c'est d'écrire le nom du fichier dans la cellule(1,8) du même fichier. merci

Bonjour, J'ai plusieurs fichiers xls dans le répertoire: D:\Documents and Settings\pc\Mes documents\XLS et je souhaite ouvrir le fichier toto.xls et écrire le nom du fichier "toto.xls" dans la cellule(i,8) du même fichier du moment que cette dernière est vide. ainsi de suite ouvrir le...

Bonjour, Je viens vers vous pour une petite demande: J'ai plusieurs fichier doc et un fichier xls Exemple: toto.doc ; titi.doc ; tata.doc et un fichier xls. Je souhaite récupérer les noms "toto.doc ; titi.doc ; tata.doc" dans le fichier xls. Merci d'avance

Re : programme de copier plusieurs tableaux de plusieurs word vers plusieurs xls merci ça marche nikel, voila le nouveau code Sub BlocCopyWord() Dim NDF As String Dim WordApp As Word.Application Dim WordDoc As Word.Document Dim i As Integer Dim j As Integer Dim...

Bonsoir, je viens de solliciter votre aide sur le programme suivant: Sub Vers_Word() Dim NDF As String Dim Temp As String Dim WordApp As Word.Application Dim WordDoc As Word.Document Dim i As Integer Dim j As Integer For j = 1 To 4 NDF = ActiveWorkbook.Path & "\j.doc" Set WordApp...

Bonjour, Je cherche une macro qui permet de copier un tableau word vers xls merci d'avance