Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

probleme pour importer un fichier excel

boris

XLDnaute Nouveau
J'ai un petit probleme pour importer un fichier excel, a partir d'un autre.
Je voudrais faire une macro qui importe les données d'un fichier excel, a priori rien de plus simple.
Mais j'y arrive pas....

Merci
 

boris

XLDnaute Nouveau
L'idee est la suivante :

je suis dans mon fichier excel qui contient ma macro.
Et ma macro doit charger un fichier excel qui ce trouve sur mon disque (j'entend par charger copier la plage de donnée), et la mettre sur la cellule active.
 

lapix

XLDnaute Occasionnel
Sub Macro3()
chemincomplet = 'Chemincomplet\\123.xls'
Workbooks.Open Filename:=chemincomplet
Range('A1:I14').Select 'selection de ce que l'on va copier
Selection.Copy
Windows('Classeur1').Activate 'ou on va coller
ActiveSheet.Paste 'collage
Application.CutCopyMode = False
Range('A1').Select
Windows(chemincomplet).Activate 'reprend la main sur le classeur ouvert
ActiveWindow.Close 'et le ferme
End Sub


apres il te reste a travailler sur la feuille a selectionner avant de copier et coller et sur les bornes de ta selection a copier
 

boris

XLDnaute Nouveau
merci beaucoup pour ces infos.
Est ce qu'il y aurait pas moyen de selectionner toute la feuille d'un seul coup, sans avoir a ecrire les bornes (parce que je dois charger plusieures feuilles differentes avec des bornes differentes).
Je pensais que cette operation se ferait avec un :

With ActiveSheet.QueryTables.Add(Connection:=......
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…