Bonjour,

J'aimerais ouvrir 2 classeurs excel :

Le premier en parcourant une boîte de dialogue (jusqu'ici ça va)
et
Le second en allant chercher le fichier avec le chemin d'accès suivant (" C:\... \Test.xlsx ")

ici, le code met un message d'erreur " fichier introuvable" alors que pourtant il est bien là!

(ensuite j'aimerais pouvoir faire des copier/coller entre ces 2 fichiers)

Avez vous une explication, je pense à une erreur de syntaxe mais je ne parviens pas à trouver...

Merci d'avance,
Markym


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
 
    Dim objsource As Workbook
    Dim objcible As Workbook
 
    Set objsource = Application.Workbooks.Open(Application.GetOpenFilename, Local:=True)
 
    Set objcible = Application.Workbooks.Open (" C:\...  \Test.xlsx ")
    objcible.Activate