report de données entre deux classeurs

Question

Bonjour,

Je sollicite votre aide pour un problème de report de cellules d'un classeur à un autre.
Il s'agit de deux classeurs différents contenant une feuille chacun.
J'ai du oublier des étapes importantes ou faire des erreurs car je n'arrive pas à obtenir de résultats.
Jusqu'à présent je m'étais contentée d'écrire des petits programmes entre feuilles d'un même classeur.
Voilà le squelette actuel du programme:

Sub reportformules()
Workbooks("Extraction PC Holding 22 mars 2010").Activate

pointeur = 0
For i = 6 To 296
       Cells(i, 2).Value = pointeur
       Workbooks("Liste formules Holding V2").Activate
        For j = 6 To 124
              If Cells(j, 1).Value = pointeur Then
                    Workbooks("Extraction PC Holding 22 mars 2010").Activate
                    Cells(i, 8).Value = Workbooks("Liste formules Holding V2").Cells(j, 3).Value
              End If
        Next j
Next i

End Sub


Merci beaucoup pour votre aide.

Cordialement

Elisabeth

zebulon2503 · Answer

Salut 

Tu as fait une erreur je pense. 
Tu veux enregistrer dans la variable "pointeur" la valeur contenue dans ta cellule Bi je pense non ? 
Dans ce cas il faut mettre : 


pointeur = Cells(i,2).Value 
 

Au lieu de : 

 
Cells(i,2).Value = pointeur 


Ca devrait peut être suffir à faire marcher ton programme :-) 

Les cons peuvent avoir l'air intelligent à première vue... Heureusement pour eux que la vitesse de la lumière est supérieure à celle du son.

Elima · Answer

Merci beaucoup, le programme est résolu!

zebulon2503 · Answer

Pas de quoi :)

Report de données entre deux classeurs

3 réponses

Discussions similaires

Newsletters