Discussion :

[delphine1987]

Bonjour,

J'aimerais lier deux fichiers excel. Le 1er sert de "base de données".

Je souhaite "copier/coller" des données du 1er Fichier vers le 2ème sous certaines conditions.

J'ai écrit un macro avec des SI et un EACH, je dois apparemment définir mes feuilles comme des objets mais je ne sais pas comment.

Merci d'avance pour votre aide

Ci-dessous mon essai

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub copier_data()
 
For Each cellule In Workbook("2010 STD Activities status").Range("q5:q1000")
'condition de période
If Worksheet("datas test").Cells(2, 6) = Workbook("2010 STD Activities status").Range("q5:q1000") Then
        Exit Do
 
' condition si le montant de scrap est >0
If Worksheet("2010 STD Activities status").Range("x5:x1000") > 0 Then
'alors si ces conditions sont respectées copier/coller dans le fichier NQC
Workbook("2010 STD Activities status.xls").Range("L5:L1000").Copy
 
Worksheet("datas test").Range("G7:G1000").Paste
 
End If
 
End Sub

[Psychopathe]

Pleins de choses bizarre dans ton code. Déjà merci de bien utiliser la balise #Code pour voir correctement le code. Ensuite, tu compare une cellule d'une feuille Excel "datas test" avec une étendue de cellule d'un classeur "2010 STD Activities status" (quelle feuille du classeur?) dans:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
If Worksheet("datas test").Cells(2, 6) = Workbook("2010 STD Activities status").Range("q5:q1000")

Par ailleurs l'étendue de cellule copiée, ne semble pas correspondre en longueur à l'étendue de cellule collée. De plus, dans quelle feuille est réalisée la copie, puisque tu utilise Workbook pour la copie et Worksheet pour le collage?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Workbook("2010 STD Activities status.xls").Range("L5:L1000").Copy
 
Worksheet("datas test").Range("G7:G1000").Paste

[delphine1987]

classeur :activities status
classeur: suivi NQC

Le classeur source: Activities status.

La feuille datas test est dans le classeur NQC
j'ai une donnée qui est dans le NQC (celle que je dois comparer à l'autre fichier mais qui doit être modifier régulièrement) et dans le classeur activities status, l'information peut s'y trouver plusieurs fois.

La copie est réalisée dans le classeur Suivi NQC, dans la feuille datas test.

J'espère avoir bien répondu!!

Merci pour votre aide