Macro pour copier et insérer données d'un fichier vers un autre
MAHOU_2021
Messages postés
6
Statut
Membre
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention -
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour
J'ai enregistré une macro à partir de Excel (microsoft 365) pour insérer dans un fichier_A, la plage de données sélectionnée d'un autre fichier_B.
La tâche consiste à:
- Copier les lignes sélectionnées dans le fichier_B
- Insérer la sélection à partir de la ligne 2 dans le fichier_A
- Insérer après une ligne vide
Voilà ce que j'ai eu comme code automatique dans Excel.
Sub inserer_selection()
'
Windows("Fichier_B.xlsx").Activate
Selection.Copy
Windows("Fichier_A.xlsm").Activate
Rows("2:2").Select
Selection.Insert Shift:=xlDown
Rows("2:2").Select
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Range("A2").Select
End Sub
Ma préoccupation:
Le fichier de destination (Fichier_A) sera toujours le même mais le fichier dans lequel se fera la copie des données changera à chaque fois (ce sera le fichier actif )
Ma question: Comment modifier ce code pour que la copie s'applique à un fichier variable dans lequel les données seront sélectionnées(fichier variable autre que le fichier_B).
Merci de votre aide
J'ai enregistré une macro à partir de Excel (microsoft 365) pour insérer dans un fichier_A, la plage de données sélectionnée d'un autre fichier_B.
La tâche consiste à:
- Copier les lignes sélectionnées dans le fichier_B
- Insérer la sélection à partir de la ligne 2 dans le fichier_A
- Insérer après une ligne vide
Voilà ce que j'ai eu comme code automatique dans Excel.
Sub inserer_selection()
'
Windows("Fichier_B.xlsx").Activate
Selection.Copy
Windows("Fichier_A.xlsm").Activate
Rows("2:2").Select
Selection.Insert Shift:=xlDown
Rows("2:2").Select
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Range("A2").Select
End Sub
Ma préoccupation:
Le fichier de destination (Fichier_A) sera toujours le même mais le fichier dans lequel se fera la copie des données changera à chaque fois (ce sera le fichier actif )
Ma question: Comment modifier ce code pour que la copie s'applique à un fichier variable dans lequel les données seront sélectionnées(fichier variable autre que le fichier_B).
Merci de votre aide
2 réponses
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention Ambassadeur 1 588
bonjour,
comment le code pourra-t-il déterminer le nom du fichier variable?
s'agit-il d'un fichier déjà ouvert? -
Bonjour merci beaucoup de votre promptitude.
Oui le fichier serait ouvert
