Transfert de données plus rapide

Bonjour

Actuellement, je me sers de la procédure suivante pour importer des données du Classeur B à l'ouverture du Classeur A. Je précise que le Classeur B est en mode partagé donc pas possible à priori de se servir des fonctionnalités d'ADO ...

Set wkA = ThisWorkbook
chemin = Sheets("PARAM").Cells(3, 7) & "\Passerelles\" 
fichier = "ClasseurB.xls" 
Workbooks.Open chemin & fichier
Set wkB = ActiveWorkbook
wkB.Sheets("Feuil2").Range("A:U").Copy Destination:=wkA.Sheets("Feuil3").Range("A1") 
wkB.Close True

J'ai deux questions à propos de ce code :

• N'y aurait-il pas un moyen plus rapide ?

• Comment gérer le rapatriement de colonnes non contigües ? Par exemple rapatrier seulement les colonnes A, B, D, F à M, et R à T du classeur B. Par contre elles seraient contiguës dans le fichier A qui réceptionne les colonnes rapatriées.

Merci d'avance et bonne journée