Copier lignes d'un fichier dans un autre fichier sous condition
Bonjour,
J'ai un fichier excel noté FICHIER1. Chaque nouvelle utilisation je vais avoir une nouvelle ligne qui se crée dans le fichier 1. Des personnes vont compléter leurs lignes dans le fichier 1.
J'ai un FICHIER 2 dont que moi possède l'accès. J'aimerai créer une macro qui à chaque fois que j'ouvre le FICHIER 2 ou en appuyant sur un bouton de MAJ. Je voudrais copier les dernières lignes du FICHIER 1 que je n'ai pas encore dans mon fichier 2.
Exemple aujourd'hui dans mon fichier 2 j'ai 15 lignes. Le lendemain 3 lignes se sont rajouter dans le fichier 1 j'aimerai que ces 3 lignes se copient dans mon fichier 2 sans écraser les 15 lignes précédentes. Et sans modifier ce que j'ai put changer dans ces 15 lignes. LA CONDITION est que les lignes se copient uniquement si une cellule particulière du fichier 1 est complétée par un OUI (ce qui me permet de copier les lignes uniquement remplit par les utilisateurs du fichier 1 pour ne pas copier des cellules vides !)
Merci pour votre aide
Bonjour fvba, le forum,
Tu augmenterais tes chances d'obtenir une réponse en joignant un fichier (sans données confidentielles)...
Une façon de procéder, au plus simple:
Dans le fichier 1, tu rajoutes une colonne où tu inscris un x si les lignes sont déjà transférées (cette colonne peut être masquée).
Dans le fichier 2 :
- Il faut tester si le fichier 1 est ouvert (sinon la macro va planter).
- Définir la dernière ligne du fichier 2.
- Récupérer toutes les lignes qui ne comportent pas ce x dans le fichier 1, et les copier dans le fichier 2, à partir de la dernière ligne.
- Pointer ces lignes avec un x dans le fichier 1
Cordialement,
Sub MAJdonnees_Cliquer()
Workbooks.Open ("XXX")
Derx = derligne + 1
Dery = derligne
k = Derx
For j = Derx To Dery
If Workbooks("XXX").Sheet("AJ").Range("Y") & k = "oui" Then
Workbooks("XXX").Sheet("AJ").Rows(k).Copy.Workbooks("XX").Sheets("AJ").Range ("A" & k)
End If
Next k=k+1Bonjour,
Je suis bloquée je n'y parvient pas. J'ai commencé mais je suis débutante et la demande est assez compliqué pour un début. Si vous avez la solution ça serait super
Cordialement
Bonjour fvba,
Peux-tu joindre un fichier pour voir comment sont structurés tes données ?
Cordialement,