Forum
|
|
|
Forum
|
22/08/2006, 06h17
|
#1 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: octobre 2005
Messages: 182
|
Déplacer un fichier d'un répertoire vers un autre répertoire
Bonjour à tous,
Est il possible via une macro déclenchée par un bouton sur une fichier appelé par exemple Fichier_1.xls , de déplacer un fichier excel ( nommé par exemple " Fichier_XX.xls") se trouvant dans un repertoire A vers un répertoire B. Cela sachant que les répertoires A et B se trouvent dans le même répertoire que le fichier utilisé pour déclencher cette macro (Fichier_1.xls). Merci d'avance pour votre aide Cordialement Zeltron |
|
|
|
22/08/2006, 07h05
|
#2 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: octobre 2005
Messages: 182
|
Re : Déplacer un fichier d'un répertoire vers un autre répertoire
Je viens de trouver la solution ( j'avais cherché sur le forum mais pas dans les archives!!!)
Si cela peux aider quelqu'un: Sub Bouton1_QuandClic() Workbooks.Open Filename:=ThisWorkbook.Path & "\A\Fichier_XX.xls" Workbooks("Fichier_XX.xls").SaveAs ThisWorkbook.Path & "\B\Fichier_XX_déplacé.xls" Kill (ThisWorkbook.Path & "\A\Fichier_a_déplacer.xls") Workbooks("Fichier_XX_déplacé.xls").Close End Sub Bonne journée Cordialement Zeltron |
|
|
|
| ANNONCES | |
 |
| Liens sociaux |
| Outils de la discussion | |
|
|
Discussions similaires
|
||||
| Discussion | Auteur | Forum | Réponses | Dernier message |
| récupération du répertoire par défaut d'un fichier | emarchad | Forum Excel | 1 | 22/05/2006 16h30 |
| Répertoire d'un fichier | deni29 | Forum Excel | 4 | 10/05/2006 16h33 |
| Déplacer un repertoire | viniboy | Forum Excel | 2 | 15/08/2005 11h52 |
| Recherche d'un fichier dans un répertoire et un boucle... | Les2A | Forum Excel Downloads - Archives | 11 | 20/02/2005 11h54 |
| deplacer un classeur vers un nouveau repertoire | robby | Forum Excel Downloads - Archives | 3 | 04/02/2005 14h46 |
