Macro Excel deplacer des fichiers
kl112
Messages postés
1
Statut
Membre
-
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour à tous,
Voila, je traite des masses de documents et pour "automatiser" le travail je voudrais savoir si qqun a une idée afin de copier des fichiers PDF d'un répertoire windows a un autre a partir d'une liste excel:
exemple:
|objet n°|Caractéristique 1|caractéristique 2| Caractéristique 3||Condition|
| 1 | X | A | 2 | Y
| 2 | U | B | 6 | Y
| 3 | N | B | 8 | Y
| 4 | S | B | 8 | N
Si dans la case "condition" c'est "Y", alors je veux que le fichier C1 actuellement dans le répertoire "caractéristique 1" soit copier dans un autre répertoire "caractéristique 1 Y" mais pas effacer du répertoire d'origine
Voila j'espère avoir été clair!
Merci d'avance pour l'aide!
Voila, je traite des masses de documents et pour "automatiser" le travail je voudrais savoir si qqun a une idée afin de copier des fichiers PDF d'un répertoire windows a un autre a partir d'une liste excel:
exemple:
|objet n°|Caractéristique 1|caractéristique 2| Caractéristique 3||Condition|
| 1 | X | A | 2 | Y
| 2 | U | B | 6 | Y
| 3 | N | B | 8 | Y
| 4 | S | B | 8 | N
Si dans la case "condition" c'est "Y", alors je veux que le fichier C1 actuellement dans le répertoire "caractéristique 1" soit copier dans un autre répertoire "caractéristique 1 Y" mais pas effacer du répertoire d'origine
Voila j'espère avoir été clair!
Merci d'avance pour l'aide!
A voir également:
- Macro Excel deplacer des fichiers
- Déplacer colonne excel - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Renommer des fichiers en masse - Guide
- Word et excel gratuit - Guide
1 réponse
bonjour
Je ne sais pas si tu as trouvé une solution, je te propose celle-ci.
Dans la feuille concernée, (mode d'emploi) tu mets cette macro
Le nom de ton classeur est en colonne A
Le nom du répertoire de départ est en colonne B (ex : C:\monrépertoire )
Le nom du répertoire de copie est en colonne C (idem)
Dès que tu saisis Y en colonne E la copie s'effectue.
Je ne sais pas si tu as trouvé une solution, je te propose celle-ci.
Dans la feuille concernée, (mode d'emploi) tu mets cette macro
Private Sub Worksheet_Change(ByVal sel As Range)
If Not Intersect(sel, [E:E]) Is Nothing Then
If sel.Value = "Y" Then
FileCopy Cells(sel.Row, "B").Value & "\" & Cells(sel.Row, "A").Value, _
Cells(sel.Row, "C").Value & "\" & Cells(sel.Row, "A").Value
End If
End If
End Sub
Le nom de ton classeur est en colonne A
Le nom du répertoire de départ est en colonne B (ex : C:\monrépertoire )
Le nom du répertoire de copie est en colonne C (idem)
Dès que tu saisis Y en colonne E la copie s'effectue.
