XL 2019 Ouverture et copier coller d'un classeur excel dans un autre

l.et.lilou

XLDnaute Junior
Bonjour,

Je suis à la recherche d'un moyen de copier coller des données d'un onglet excel dans un autre classeur excel.

En premier temps, j'aimerais avoir un MSGBOX qui me dise ou aller cherche le fichier que je veux copier / coller (le chemin peut changer, c'est pour ca que je voudrais aller le chercher).
En deuxième temps, j'aimerais qu'il me fasse un copier coller des données du 1er classeur dans le 2e précédemment ouvert.
Le fichier ou je récupère les données s'appelle "CLASSEUR COPIER"
Le fichier ou je veux que les données soient collées est "CLASSEUR COLLER".

J'ai mis en jaune le résultat que j'aimerais qu'il me donne dans le classeur COLLER.


Ci-joint les 2 classeurs excel
J'essai mais en vain... Merci de votre aide !!
 

Pièces jointes

  • CLASSEUR COLLER.xlsx
    8.7 KB · Affichages: 9
  • CLASSEUR COPIER.xlsx
    8.5 KB · Affichages: 2

Staple1600

XLDnaute Barbatruc
Re

[moment Recyclerie]
Adapté d'une réponse que j'ai faite en janvier 2021
VB:
Sub Test_OK()
Dim fichier As Variant, wbk As Workbook
fichier = _
        Application.GetOpenFilename("Fichiers EXCEL ,*.xls?", , "Choisir un fichier, svp", False)
If fichier <> False Then
Set wbk = Workbooks.Open(fichier)
End If
wbk.Worksheets(1).Range("A1:C10").Copy ThisWorkbook.Worksheets(1).[A1]
Application.CutCopyMode = False
wbk.Close False
End Sub
Je te laisse faire les adaptations nécessaires.
;)
 

Staple1600

XLDnaute Barbatruc
Re

Tu as essayé le bout de code du message#3?
Copies le dans un classeur vierge puis lance la macro
Normalement, tu auras alors déjà la réponse à comment faire ceci ;)
En premier temps, j'aimerais avoir un MSGBOX qui me dise ou aller cherche le fichier que je veux copier / coller (le chemin peut changer, c'est pour ca que je voudrais aller le chercher).
 

Discussions similaires

Réponses
56
Affichages
907

Statistiques des forums

Discussions
311 730
Messages
2 081 981
Membres
101 855
dernier inscrit
alexis345