ajouter des lignes dans un fichier à partir d'autres classeurs

skoobi

XLDnaute Barbatruc

• 21 Avril 2008

• #2

Re : ajouter des lignes dans un fichier à partir d'autres classeurs

Bonjour,

Je souhaiterai pouvoir copier chaque jour une ligne précise de mon classeur n°1 dans un autre classeur n°2 (sans avoir besoin de l'ouvrir et faire copier-coller...)

Cliquez pour agrandir...

Ce n'est pas aussi facile que tu le crois, il faut connaître (ce qui n'est pas mon cas) le modèle ADO, pour accéder aux fichiers fermés.
Cependant, faut-il absolument que le fichier reste fermé?

 

Vote positif 0 Vote négatif

I

infonuts

XLDnaute Nouveau

• 21 Avril 2008

• #3

Re : ajouter des lignes dans un fichier à partir d'autres classeurs

non, en fait il n'est pas indispensable que le fichier central (classeur 2) reste fermé.
ça simplifie surement les choses?

 

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 21 Avril 2008

• #4

Re : ajouter des lignes dans un fichier à partir d'autres classeurs

Oui, en envoyant un extrait des 2 fichiers aussi.
A te relire.

 

Vote positif 0 Vote négatif

I

infonuts

XLDnaute Nouveau

• 22 Avril 2008

• #5

Re : ajouter des lignes dans un fichier à partir d'autres classeurs

ben en fait c'est assez simple, je veux qu'une ligne de données soit reprise dans un autre fichier (même champs, même disposition) pour l'instant, je n'ai pas crée le deuxième classeur, mais les champs seront les mêmes que ceux que je veux exporter.

Merci

 

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 22 Avril 2008

• #6

Re : ajouter des lignes dans un fichier à partir d'autres classeurs

Ces champs sont toujours les mêmes où ils peuvent varier?
Merci de préciser et d'envoyer le fichier si nécessaire.

 

Vote positif 0 Vote négatif

I

infonuts

XLDnaute Nouveau

• 22 Avril 2008

• #7

Re : ajouter des lignes dans un fichier à partir d'autres classeurs

non, les champs seront toujours les mêmes.

Il ne me semble pas nécessaire d'envoyer un exemple, mais je peux en faire un si nécessaire: il s'agit d'une "bête" feuille avec une ligne contenant le nom des champs et une ligne contenant les données (une ligne par jour seulement dans chaque fichier quotidien)

 

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 23 Avril 2008

• #8

Re : ajouter des lignes dans un fichier à partir d'autres classeurs

Bonjour,

voici un code à placer dans le classeur 1:

Code:

Sub test()
Dim ce_class As Workbook, wb_dest As Workbook
Dim lig_suiv As Long

Set ce_class = ThisWorkbook
Set wb_dest = Workbooks.Open("E:\VBA excel\Forum Excel-Download\fichier2.xls")
lig_suiv = wb_dest.Sheets("Feuil1").Range("A65536").End(xlUp).Row + 1
ce_class.Sheets("Feuil1").Rows(2).Copy wb_dest.Sheets("Feuil1").Rows(lig_suiv)
wb_dest.Close savechanges:=True
End Sub

Il est supposé que c'est la ligne 2 de la feuille 1 qui doit être copiée vers la feuille 1 du classeur 2.
Changer bien sur le chemin:
"E:\VBA excel\Forum Excel-Download\fichier2.xls"
Le "fichier2" s'ouvre, complété puis sauvegardé et refermé.

Voilà.

 

Vote positif 0 Vote négatif

I

infonuts

XLDnaute Nouveau

• 23 Avril 2008

• #9

Re : ajouter des lignes dans un fichier à partir d'autres classeurs

bonjour,

ok, merci!
je vais tester ça dans les 2,3 jours et je te tiendrai au courant

(là je suis sur autre chose)

à bientôt

 

Vote positif 0 Vote négatif