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

Copier des lignes dans d'autres fichiers Excel

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Amilo
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
A

Amilo

XLDnaute Accro
Bonsoir le Forum,

Voici une de mes demandes les plus difficiles, peut-être que pour certains ceci est un jeu d'enfant.

Dans mon répertoire "dossiers commun", j'ai actuellement 3 fichiers Excel nommés : création, Schmitt et Muller.

Dans "création", je gère les nouvelles factures dans l'onglet "Formulaire" pour les rajouter dans "Base de données".

A chaque création d'une nouvelle ligne de facture dans données de base, je souhaiterai que cette ligne se copie dans le fichier qui porte le même nom que la colonne F sous "responsable".

Une facture avec pour responsable "Schmitt" soit copiée dans le fichier "Schmitt", une facture "Muller" dans le fichier "Muller" etc...

Pour l'instant j'ai créé 2 fichiers avec des formules de liaisons qui ne répondent pas à mon problème.

Je pense la solution la plus appropriée est une macro !!

Merci pour votre aide.

Bonne soirée à tous.
 
Dernière édition:
Trier par date Trier par votes
Re : Copier des lignes dans d'autres fichiers Excel

bonsoir Amilo,

ton pb est très spécifique donc il faudrait poster ton fichier de base avec juste les infos qu'il faut et le fichier schmidt par exemple

Dans l'attente de te lire

a+
 
Vote positif 0 Vote négatif
Re : Copier des lignes dans d'autres fichiers Excel

ledzepfred à dit:
bonsoir Amilo,

ton pb est très spécifique donc il faudrait poster ton fichier de base avec juste les infos qu'il faut et le fichier schmidt par exemple

Dans l'attente de te lire

a+
Cliquez pour agrandir...
Re bonsoir,

Effectivement Ledepfred, le sujet est déjà compliqué comme ça, sans fichier exemple, c'est plutôt impossible de donner un avis !!

Excusez moi pour ma maladresse, j'ai complètement zapé le fichier que je voulais joindre,

Le voici ci-dessous :

Merci d'avance.
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Copier des lignes dans d'autres fichiers Excel

ledzepfred à dit:
re...

les fichiers schmidt et muller seront-ils ouverts au moment de l'execution de la macro? où sont-ils fermés?

A+
Cliquez pour agrandir...

Ledzpfred,

ces fichiers ne seront pas ouverts systématiquement par l'utilisateur du fichier "Création" au lancement de la macro. Les fichiers "Muller" etc... sont destinés à chaque responsable pour lecture seule mais ils seront libre d'ouvrir leur fichier à leur gré.

Slts
 
Vote positif 0 Vote négatif
Re : Copier des lignes dans d'autres fichiers Excel

re...

vois si cela te convient

la macro se déclenche quand tu sélectionnes la ligne à copier ou une cellule dans cette ligne puis tu cliques sur le bouton copie
si le fichier dont le nom est indiqué en F n'est pas ouvert, la macro l'ouvre et colle l'intégralité de la ligne en valeur dans ce fichier puis le ferme après enregistrement.

à peaufiner...

a+
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Copier des lignes dans d'autres fichiers Excel


ça ne fonctionne malheureusemnt pas, je me suis bien mis dans une cellule de la ligne à copier, le fichier responsable s'ouvre effectivement mais ne colle pas la ligne souhaitée.

de plus peut-on exécuter une telle macro à partir du bouton "ajouter facture" de l'onglet "formulaire" de manière à ce qu'il copie à la fois dans la base de données "Création" et le fichier "Responsable" ???

Merci d'avance

Bonne nuit à tous
 
Vote positif 0 Vote négatif
Re : Copier des lignes dans d'autres fichiers Excel

bonsoir amilo,

bizarre que ça ne fonctionne pas chez toi, j'avais testé de mon côté et pas de souci; Pour l'associer à la macro ajouter_facture essaye comme ceci (j'ai fusionnée les deux procédures mais je n'ai pas testé (pas le temps), le bouton copie et le code associé sont donc inutiles

Code: 
Option Explicit

Sub ajouter_facture()
  Dim DerLig, NextLig,  lig2 As Long
  '
  ' ajouter_facture Macro
  '
  ' Trouver la dernière ligne de la BdD en partant de la fin
  ' et en remontant vers le haut = CTRL + flèche vers le haut
  DerLig = Sheets("Base de données").Range("A" & Rows.Count).End(xlUp).Row
  NextLig = DerLig + 1

  Range("A2:H2").Copy
  With Sheets("Base de données").Range("A" & NextLig)
    .PasteSpecial Paste:=xlPasteValues, _
                  Operation:=xlNone, SkipBlanks:=False, Transpose:=False
    .PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
                  SkipBlanks:=False, Transpose:=False
  Sheets("Formulaire").Range("E6,E8,E10,E12,E14,E16,E18").ClearContents
  Range("E6").Select

'On Error Resume Next
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Workbooks(.Cells(DerLig, 6).Value & ".xls").Activate
If Err = 9 Then Workbooks.Open Filename:=ActiveWorkbook.Path & "\" & .Cells(DerLig, 6).Value & ".xls", UpdateLinks:=3
lig2 = Workbooks(.Cells(DerLig, 6).Value).Sheets("Feuil1").Cells(65536, 1).End(xlUp).Row + 1
.Cells(DerLig, 6).EntireRow.Copy
Workbooks(.Cells(DerLig, 6).Value).Sheets("Feuil1").Cells(lig2, 1).PasteSpecial xlPasteValues
Workbooks(.Cells(DerLig, 6).Value).Close True
End With
End Sub

j'ai volontairement mis une apostrophe devant la ligne On Error Resume Next, si tu executes la macro pas à pas tu verras où se situe l'erreur pour pouvoir la corriger

a+
 
Vote positif 0 Vote négatif
Re : Copier des lignes dans d'autres fichiers Excel

Bonsoir amilo, ledzepfred


ledzepfred : d'accord avec ces modifications ?

 
Vote positif 0 Vote négatif
Re : Copier des lignes dans d'autres fichiers Excel

Bien sur cher ami,

je n'aime pas imbriqué les With End With mais j'avoue qu'on y gagne en clarté!🙂

En plus j'avais bouletté ça m'apprendra à ne pas écrire un code dans l'editeur vba mais directement dans le post

a+
 
Vote positif 0 Vote négatif
Re : Copier des lignes dans d'autres fichiers Excel

ledzepfred à dit:
Bien sur cher ami,

je n'aime pas imbriqué les With End With mais j'avoue qu'on y gagne en clarté!🙂

En plus j'avais bouletté ça m'apprendra à ne pas écrire un code dans l'editeur vba mais directement dans le post

a+
Cliquez pour agrandir...

Bonsoir Vbacrumble, Lepzepfrd, le Forum,


Je viens à cette heure de prendre connaissance de vos nouvelles suggestions que je testerai avec la plus grande attention dès demain dans la première heure.

Je vous tiendrai informés du résultat.

D'avance un grand merci à vous pour vos propositions et pour le temps que vous avez bien voulu passer sur le sujet.


Bonne nuit à tous.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

D
  • Question Question
Microsoft 365 Aide au publipostage et envoi en nombre de fichiers et/ou mails
Réponses
4
Affichages
476
DARRIEUX
D
P
  • Résolu(e)
Microsoft 365 Comparaison 2 tableaux EXCEL différents
Réponses
12
Affichages
784
Peter DOE
P
D
  • Question Question
XL 2013 Aide à création Fichiers, SMS, envoi
Réponses
0
Affichages
308
DARRIEUX
D
A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
533
AtTheOne
C
  • Question Question
Microsoft 365 Disparation de données dans des fichiers excel
Réponses
10
Affichages
827
CedricR34
C
A
  • Question Question
XL 2021 extraire des informations de plusieurs fichiers
Réponses
4
Affichages
391
job75
R
  • Question Question
XL 2010 Copier des lignes de données de plusieurs feuilles dans une seule
Réponses
6
Affichages
852
AtTheOne
  • Résolu(e)
XL 2016 Optimisation des fichiers Excel volumineux
Réponses
4
Affichages
478
Armisa
K
  • Question Question
XL 2010 copier des dossiers ou fichiers pour les coller dans un disque dur externe
Réponses
2
Affichages
565
kiki29
L
  • Résolu(e)
Power Query Problème de fusion de données entre deux fichiers Excel sous Power Query
Réponses
8
Affichages
1 K
chris
D
  • Résolu(e)
Microsoft 365 récupérer des données d'une feuille excel d'un classeur A pour les incrémenter automatiquement sur le classeur B
Réponses
10
Affichages
451
TooFatBoy
F
  • Question Question
XL 2016 copier des fichiers dans des sous dossiers a partir de case a cocher sous excel
2
Réponses
17
Affichages
2 K
Felipe54
F
A
  • Question Question
Microsoft 365 Macro pour récupérer des colonnes qui ne sont pas conjointes
Réponses
4
Affichages
488
Anthony_51
A
C
  • Question Question
Microsoft 365 Extraction de datas dans des fichiers pdf
Réponses
2
Affichages
700
kiki29
G
  • Question Question
XL 2016 Extraire des données d'un pdf et les copier dans excel
2
Réponses
19
Affichages
3 K
kiki29
M
  • Question Question
XL 2021 Creation VBA copie de differents fichiers dans différents dossiers
Réponses
5
Affichages
721
patricktoulon
M
  • Question Question
XL 2019 Copier des lignes les unes a la suite des autres dans une autre feuille sous conditions et seulement certaines colonnes
Réponses
7
Affichages
918
MGH
M
  • Question Question
Power Query [Resolu] Importer plusieurs fichiers excel provenant de dossiers différents sur sharepoint
Réponses
6
Affichages
2 K
Staple1600
F
  • Résolu(e)
XL 2021 recherche doublons dans colonne puis suppression des lignes
Réponses
5
Affichages
699
ftpo69
F
I
  • Question Question
Microsoft 365 Renommer des fichiers avec des caractères non reconnus
Réponses
10
Affichages
1 K
ivan27
I
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…