OVH Cloud OVH Cloud

Recopier une cellule sur trois

5 réponses
Avatar
Matthieu
Bonjour,=20

J'essaie de copier une cellule sur 3 sur une nouvelle=20
feuille:=20
je veux A1,A4,A7,A10,... de la feuille1 dans mes cellules=20
A1,A2,A3,... de ma feuille2.

Et quand j'essaie de faire une recopie incr=E9ment=E9e en=20
commen=E7ant par A1,A4, excel compl=E8te avec A2,A5,A3,A6

que faire?

Merci d'avance

5 réponses

Avatar
Vincent.
Salut !
Essaie :
ÞCALER($A$1;(LIGNE()-LIGNE($A$1))*3;0)
A+

V.

-----Message d'origine-----
Bonjour,

J'essaie de copier une cellule sur 3 sur une nouvelle
feuille:
je veux A1,A4,A7,A10,... de la feuille1 dans mes cellules
A1,A2,A3,... de ma feuille2.

Et quand j'essaie de faire une recopie incrémentée en
commençant par A1,A4, excel complète avec A2,A5,A3,A6

que faire?

Merci d'avance
.



Avatar
ru-th
Salut Matthieu

=INDIRECT("feuil1!a"&((LIGNE()-1)*3+1))

a+
rural thierry

"Matthieu" a écrit dans le message de news:
0c7701c3a928$cbdbc6f0$
Bonjour,

J'essaie de copier une cellule sur 3 sur une nouvelle
feuille:
je veux A1,A4,A7,A10,... de la feuille1 dans mes cellules
A1,A2,A3,... de ma feuille2.

Et quand j'essaie de faire une recopie incrémentée en
commençant par A1,A4, excel complète avec A2,A5,A3,A6

que faire?

Merci d'avance
Avatar
kris
Il faudrait utiliser le touche control en meme tant qu'il
faut cliquer sur les cellules visées.

Exemples pour selectionner a1 a3 et a10, tenir control
appuyé et cliquer sur les cellules a1 a3 et a10. Faire
copier, et pour cela lacher la touche control. Ensuite se
positionner sur la page ou les données doivent etre
copiées.

par contre je ne pense pas que cela marche pour plusieurs
feuilles à la fois et je ne pense pas que qu'on puisse
copier en meme temps le contenu de plusieurs cellules de
plusieurs pages sur une seule pages en une seule manip.

Corrigez moi si je me trompe.

Kris






-----Message d'origine-----
Bonjour,

J'essaie de copier une cellule sur 3 sur une nouvelle
feuille:
je veux A1,A4,A7,A10,... de la feuille1 dans mes cellules
A1,A2,A3,... de ma feuille2.

Et quand j'essaie de faire une recopie incrémentée en
commençant par A1,A4, excel complète avec A2,A5,A3,A6

que faire?

Merci d'avance
.



Avatar
Michel Gaboly
Binjour,

Autres solutions :

ÞCALER(Feuil1!A1;(LIGNE() - 1) * 2;)
ÞCALER(Feuil1!A$1;(LIGNE() - 1) * 3;)

L'une ou l'autre de ces formules donne le bon résultat :
sur une cellule de la ligne 1 d'une feuille quelconque,
la valeur de A1 de la feuille 1 est récupérée.

En recopiant vers le bas, on le décalalge souhaité de
3 lignes à chaque fois.

Le défaut de ces 2 formules est qu'en cas d'insertion de
lignes avant ces formules, les résultats seront modifiés
puisqu'ils dépendent du numéro de ligne de la cellule qui
les contient.

On peut régler le problème en modifiant ainsi les 2
formules.

ÞCALER(Feuil1!A1;(LIGNE() - LIGNE(A$1)) * 2;)
ÞCALER(Feuil1!$A$1;(LIGNE() - LIGNE(A$1)) * 3;)


L'avantage (ou l'inconvénient selon le résultat souhaité)
de la formule de Thierry , avec INDIRECT est qu'on
continue à obtenir la valeur de la cellule A1 de la feuille
1, même si des lignes sont insérées en début de feuille 1.

L'idéal est probablement de donner un nom à la cellule A1
de la feuille 1 (Insertion, Noms, Définir, ...) et d'utiliser
ce nom dans les formules.



Salut Matthieu

=INDIRECT("feuil1!a"&((LIGNE()-1)*3+1))

a+
rural thierry

"Matthieu" a écrit dans le message de news:
0c7701c3a928$cbdbc6f0$
Bonjour,

J'essaie de copier une cellule sur 3 sur une nouvelle
feuille:
je veux A1,A4,A7,A10,... de la feuille1 dans mes cellules
A1,A2,A3,... de ma feuille2.

Et quand j'essaie de faire une recopie incrémentée en
commençant par A1,A4, excel complète avec A2,A5,A3,A6

que faire?

Merci d'avance


--
Cordialement,

Michel Gaboly
http://www.gaboly.com

Avatar
Patrick
-----Message d'origine-----
Bonjour,

J'essaie de copier une cellule sur 3 sur une nouvelle
feuille:
je veux A1,A4,A7,A10,... de la feuille1 dans mes
cellules

A1,A2,A3,... de ma feuille2.

Et quand j'essaie de faire une recopie incrémentée en
commençant par A1,A4, excel complète avec A2,A5,A3,A6

que faire?

Merci d'avance
.
Voila se que je te propose ::


sub toto ()

sheets(1).activate
x=1

for i=1 to 50 step 3
sheets(2).cells(x,1)Îlls(i,1)
x=x+1
next

end sub


en esperant que ca te satisfait !!!!