COPIER / COLLER pourtant basique ... mais je cale

[foxone56]

Je cherche, je cherche mais je ne trouve pas, la migraine me gagne alors je décide de poster mon premier message sur le forum,


J'ai un tableau contenant 2 colonnes :

Collone A : Adresse initiale du fichier
Collone B : Nouvelle adresse pour ce fichier

le tout en format texte



je souhaite faire une macro qui


1- déplace le fichier dont l'adresse initiale se situe dans la cellule A1
puis le colle à l'adresse inscrite dans la cellule B1

2- meme principe pour un autre fichier en ligne 2, 3 , etc

3- fin de la macro a la fin du tableau



Merci d'avance 😉 🙄

 

[Pierrot93]

Re : COPIER / COLLER pourtant basique ... mais je cale

Bonjour,

essaye ceci, attention il faut qu'il y ait le chemin et nom complet des fichiers, les répertoires doivent être déjà créés :

Option Explicit
Sub test()
Dim i As Long
For i = 1 To Range("A65536").End(xlUp).Row
    Name Cells(i, 1).Value As Cells(i, 21).Value
Next i
End Sub

Teste pas à pas, utilisation de la touche de fonction F8 dans l'éditeur vba.

bonne soirée
@+

 

[foxone56]

Re : COPIER / COLLER pourtant basique ... mais je cale

Merci pour votre aide,

cependant je n'arrive pas à m'en sortir...
il me dit fichier déja existant, alors qu'il n'existe pas encore, malgré le répertoire déja créer

Si tu veux j'ai posé mon pb dans le fichier suivant,
téléchargeable ici

pour que les liens fonctionnent, il faut le dézipper et le coller le dossier test à la racine du lecteur C:\

merci d'avance pour votre aide 😱 😕 😀 😉

 

[Pierrot93]

Re : COPIER / COLLER pourtant basique ... mais je cale

Re,

Le message d'erreur me semble clair... vérifie bien les chemins et existances des fichiers... ci-dessous aide vba sur les contraintes de l'instruction :

oldpathname Expression de chaîne indiquant le nom et le chemin du fichier. Cet argument peut contenir le répertoire ou dossier et le lecteur.
newpathname Expression de chaîne indiquant les nouveaux nom et chemin du fichier. Cet argument peut préciser le répertoire ou le dossier et le lecteur. Le nom de fichier indiqué dans l'argument newpathname ne peut pas correspondre à un fichier existant.



Remarques

L'instruction Name renomme un fichier et le déplace le cas échéant vers un nouveau répertoire ou dossier. Elle permet aussi de déplacer un fichier d'un lecteur à un autre, mais elle ne peut renommer un dossier existant que si les arguments newpathname et oldpathname concernent le même lecteur. L'instruction Name ne permet pas de créer un nouveau fichier ou dossier.

Si vous appliquez Name à un fichier ouvert, vous provoquez une erreur. Les fichiers ouverts ne peuvent être renommés avant d'avoir été fermés. Les arguments de Name ne peuvent comporter de caractères génériques (* : multicaractères, ? : caractère unique).

bonne soirée
@+