Erreur Cmpilation

Bonjour,

je tente un copier coller de fichier mais me heurte à une erreur de compilation

Fonction ou variable attendue

Private Sub AddSubmissionFile_Click()

myfile = Application.GetOpenFilename(, , "Browse for Submission Files")
filename = Mid(myfile, InStrRev(myfile, "\") + 1)

Paste = ThisWorkbook.path & "\Projects_Library\" & Acronym & "-" & ProjectId & "\Submission\" & filename

FileCopy myfile, Paste

End Sub

toutefois si je tente d'afficher myfile ou paste tous les chemins sont parfaitement correct et je ne vois donc pas l'erreur..

Un avis tiers s'avère ici utile!

Merci

Re bonjour

je t'ai proposé une méthode pour copier le fichier dans le précédent post.... il ne convient pas ??

Fred

si mais je ne l'avais pas tester

merci en tout cas car cela fonctionne nickel.

par contre maintenant le fichier se copie colle bien

mais comment procéder afin que le userform au sein duquel les fichiers présent se listent dans une combobox se régénère afin de prendre en compte le nouveau fichier?

A toutes fins utile c'est un userform multipage

merci à vous

Comme ça je dirais qu'il faut

soit reconstruire la liste de fichier et refaire un affichage complet

soit ajouter ce nouveau fichier à la liste...

Faudrait voir comment tu fais initialement

Fred