OVH Cloud OVH Cloud

copie valeur non adjacente

2 réponses
Avatar
MIKE
Qui peut m'aider.
J'ai un tableau de 10 lignes par 2 colonnes (sheet 1)
Je copie la colonne 2 en entier.
Sur la sheet 2, je recopie ces valeurs dans une colonne...MAIS par exemple
de 3 lignes en 3 lignes...laissant en blanc les lignes non concernées.
Quelqu'un peut-il me donner une formule generale.
Merci

2 réponses

Avatar
michdenis
Bonjour Mike,

Si tu veux recopier seulement une colonne d'une feuille vers
une autre feuille ... à tous les 3 lignes ...

Feuil1 et Feuil3 sont les noms des objets visible dans la fenêtre
d'éditeur de code et nom le nom des onglets de la feuille.

'--------------------------
Sub test()

Dim C As Range, A As Integer
A = 1
'Copie la colonne G
For Each C In Feuil1.Range("G1:G10")
'Vers la colonne F
Feuil3.Range("F" & A) = C
A = A + 3
Next

End Sub
'--------------------------


Salutations!


"MIKE" a écrit dans le message de news:
Qui peut m'aider.
J'ai un tableau de 10 lignes par 2 colonnes (sheet 1)
Je copie la colonne 2 en entier.
Sur la sheet 2, je recopie ces valeurs dans une colonne...MAIS par exemple
de 3 lignes en 3 lignes...laissant en blanc les lignes non concernées.
Quelqu'un peut-il me donner une formule generale.
Merci
Avatar
MIKE
Merci beaucoup pour cette aide.
J'abuse....Je voudrais maintenant interpoler lineairement les valeurs dans
ma nouvelle colonne...afin de remplir les trous.
Comment faire ?
Merci de nouveau


Bonjour Mike,

Si tu veux recopier seulement une colonne d'une feuille vers
une autre feuille ... à tous les 3 lignes ...

Feuil1 et Feuil3 sont les noms des objets visible dans la fenêtre
d'éditeur de code et nom le nom des onglets de la feuille.

'--------------------------
Sub test()

Dim C As Range, A As Integer
A = 1
'Copie la colonne G
For Each C In Feuil1.Range("G1:G10")
'Vers la colonne F
Feuil3.Range("F" & A) = C
A = A + 3
Next

End Sub
'--------------------------


Salutations!


"MIKE" a écrit dans le message de news:
Qui peut m'aider.
J'ai un tableau de 10 lignes par 2 colonnes (sheet 1)
Je copie la colonne 2 en entier.
Sur la sheet 2, je recopie ces valeurs dans une colonne...MAIS par exemple
de 3 lignes en 3 lignes...laissant en blanc les lignes non concernées.
Quelqu'un peut-il me donner une formule generale.
Merci