copie colonnes de feuille1 vers feulle4

[atc]

bonjour forum
j'ai deux tableaux sur la feuille 1 et deux tableaux sur la feuille 4 ,les tableaux sont disposés cote a cote dans les deux cas.j'aimerais pouvoir copier automatiquement les valeurs de certaines colonnes de feuilles 1 vers feuille 4
que ce soit par macro ou par formule
ex cas 1er tableau :
col I9:I70 Feuil 1 vers col C7:C56 Feuil 4
col D970 Feuil 1 vers col D756 Feuil 4
col G9:G70 Feuil 1 vers col E7:E56 Feuil 4


merci d'avance

 

[Mytå]

Re : copie colonnes de feuille1 vers feulle4

Salut Atc

Avec une macro

Sub Copier()

With Sheets("Feuil1")
.Range("I9:I70").Copy Sheets("Feuil4").Range("C7:C68")
'Ajoute les autres plages
End With

End Sub

La Macro fonctionne bien tester sous Excel97 et Excel2000.
Le problème était que les 2 plages n'avaient pas la même longueur.

Sinon pour éviter une erreur

Sub Copier()

With Sheets("Feuil1")
.Range("I9:I70").Copy Sheets("Feuil4").Range("C7")
'Ajoute les autres plages
End With

End Sub



Mytå

PS Ajoute les autres plages car les bonhommes verts masquent les plages

 

[porcinet82]

Re : copie colonnes de feuille1 vers feulle4

Salut,

Myta, chez moi, ton code ne fonctionne pas, cependant en reprenant ton idée, j'ai un peu modifier le code :

Sub Copier()
Sheets("Feuil1").Select
With Sheets("Feuil4")
    .Range("C7:C16").Value = Range("A1:A10").Value
    'tes autres plages
End With
End Sub

@+

 

[porcinet82]

Re : copie colonnes de feuille1 vers feulle4

Edition : Doublons

J'été persuader qu'on pouvait supprimer les doublons, mais je ne sais plus comment faire. Si quelqu'un pouvait me donner la marche a suivre, merki !!!