Copier des fichiers d'un répertoire à un autre

Bonjour,
je suis en train d'adapter un fichier qui fonctionnait sous excel Windows pour le rendre compatible avec excel Mac 16.
J'ai presque tout adapté, sauf la fonction de copie de fichier.

Sur une feuille, j'ai une liste de fichiers dans la colonne A (des jpg) et je souhaite copier ces fichiers du répertoire source (indiqué en H4) vers le répertoire destination (indiqué en H5)

Sous windows, j'utilisais ce code :

Sub Transfert_commande()
If Range("A2").Value = "" Then Exit Sub
    Dim C As Range, source As String, Desti As String
    source = Range("H4").Value
    Desti = Range("H5").Value
    For Each C In Range("A2", Cells(Rows.Count, 1).End(xlUp))
        If Dir(source & C.Value) <> "" Then
            FileCopy source & C.Value, Desti & C.Value
        End If
    Next C
End Sub

Je n'ai pas d'erreur, mais rien ne se passe.

J'ai testé avec des /à la place des \, des :, avec Macintosh HD au début ou pas.... Si vous avez une idée...
Merci

Bonjour,

a priori tu peux utiliser FileCopy : Copier le fichier | Automatisation Mac Excel

Sub Copy_One_File()
'You can also rename the file if you want
    FileCopy "/Users/rondebruin/Desktop/xlsx/File1.xlsx", "/Users/rondebruin/Desktop/Export/File1.xlsx"
End Sub

Sub Move_One_File()
'You can also rename the file if you want
    Name "/Users/rondebruin/Desktop/xlsx/File1.xlsx" As "/Users/rondebruin/Desktop/Export/File1.xlsx"
End Sub

eric

Bonjour Eric et merci pour ta réponse,

Oui, c'est bien ce que j'utilise, mais je n'ai rien qui se passe.
J'ai peut-être une erreur dans la création de mon chemin, mais je n'arrive pas à la trouver

Mon chemin source en H4 est /Users/patrick/Documents/dossier de test/Ecole Bidule/Commande/Photos HD/

et mon chemin destination en H5 /Users/patrick/Documents/dossier de test/Ecole Bidule/Commande/Pochette complète/

J'ai vérifier 50x si je n'avais pas une erreur de majuscule, d'accent ou autre, mais je vois rien

Bonjour Messieurs,

Sauf erreur sur Mac c'est le Dir() qui n'est pas supporté

A+

Sauf erreur sur Mac c'est le Dir() qui n'est pas supporté

je ne l’utilise pas!

Bah si tu utilises Dir()

Fouille le site du lien que je t'ai passé.
Il y a d'autres exemples dont "Check if File or Folder exists on Mac"

ah oui mince !!! J’ai pas les yeux en face des trous 👀