Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel copier une colonne sur deux (entre 2 feuilles)

copier une colonne sur deux (entre 2 feuilles)

9 réponses
Avatar
Alfred WALLACE
Bonjour =E0 tous les EXCELents gurus !

j'ai un probl=E8me pour recopier des donn=E9es d'une feuille A vers une
feuille B.

en effet, dans ma feuille A

j'ai des nombres toutes les deux colonnes pour une ligne donn=E9e.

j'aimerai recopier ces valeurs (qui sont donc d=E9par=E9es par une
colonne) dans
la feuille B, mais de fa=E7on contigu=EB.

Feuille A : 100 ----- 110 ----- 50 ------- 80 ------- (les
"-----" repr=E9sentent des colonnes)

Feuille B : 100 110 50 80


Existe-t-il une formule, ou une m=E9thode pour copier les donn=E9es ????

Merci encore !!!!

Jos=E9
Signaler un problème avec ce contenu

9 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jacky
Bonjour,
Ceci peut-être
'---------------------
Sub jj()
Application.ScreenUpdating = False
x = 1
For i = 1 To 255 Step 2
Sheets("feuil1").Columns(i).Copy Sheets("feuil2").Columns(x)
x = x + 1
Next
End Sub
'---------------------

--
Salutations
JJ


"Alfred WALLACE" a écrit dans le message de news:

Bonjour à tous les EXCELents gurus !

j'ai un problème pour recopier des données d'une feuille A vers une
feuille B.

en effet, dans ma feuille A

j'ai des nombres toutes les deux colonnes pour une ligne donnée.

j'aimerai recopier ces valeurs (qui sont donc déparées par une
colonne) dans
la feuille B, mais de façon contiguë.

Feuille A : 100 ----- 110 ----- 50 ------- 80 ------- (les
"-----" représentent des colonnes)

Feuille B : 100 110 50 80


Existe-t-il une formule, ou une méthode pour copier les données ????

Merci encore !!!!

José
Avatar
michdenis
Un petit exemple :


Sub test()
Dim C As Range, A As Long
For Each C In Worksheets("Feuil2").Range("A1:E3").Columns
'=1 Pour les colonnes Impaires , =0 colonnes paires
If C.Column Mod 2 = 1 Then
A = A + 1
C.Copy Worksheets("Feuil3").Cells(1, A)
End If
Next
End Sub




"Alfred WALLACE" a écrit dans le message de news:

Bonjour à tous les EXCELents gurus !

j'ai un problème pour recopier des données d'une feuille A vers une
feuille B.

en effet, dans ma feuille A

j'ai des nombres toutes les deux colonnes pour une ligne donnée.

j'aimerai recopier ces valeurs (qui sont donc déparées par une
colonne) dans
la feuille B, mais de façon contiguë.

Feuille A : 100 ----- 110 ----- 50 ------- 80 ------- (les
"-----" représentent des colonnes)

Feuille B : 100 110 50 80


Existe-t-il une formule, ou une méthode pour copier les données ????

Merci encore !!!!

José
Avatar
Alfred WALLACE
Opps, merci Jacky pour ta réponse
heu si possible, nous voudrions éviter les macros.

Ceci dit : je me la note dans un coin !!!!!

Merci !
José

On 22 sep, 15:25, "Jacky" wrote:
Bonjour,
Ceci peut-être
'---------------------
Sub jj()
Application.ScreenUpdating = False
x = 1
For i = 1 To 255 Step 2
 Sheets("feuil1").Columns(i).Copy Sheets("feuil2").Columns(x)
x = x + 1
Next
End Sub
'---------------------

--
Salutations
JJ


Avatar
Youky
Salut,
Avec une petite macro....
A rectifier le nom des feuilles qui est ici le codename et non le nom de
l'onglet
Youky

Sub vide()
For k = 1 To Feuil1.Cells.SpecialCells(xlLastCell).Row
Feuil2.Rows(k).Value = Feuil1.Rows(k).Value
Feuil2.Rows(k).SpecialCells(xlCellTypeBlanks).Delete
Next
End Sub

"Alfred WALLACE" a écrit dans le message de news:

Bonjour à tous les EXCELents gurus !

j'ai un problème pour recopier des données d'une feuille A vers une
feuille B.

en effet, dans ma feuille A

j'ai des nombres toutes les deux colonnes pour une ligne donnée.

j'aimerai recopier ces valeurs (qui sont donc déparées par une
colonne) dans
la feuille B, mais de façon contiguë.

Feuille A : 100 ----- 110 ----- 50 ------- 80 ------- (les
"-----" représentent des colonnes)

Feuille B : 100 110 50 80


Existe-t-il une formule, ou une méthode pour copier les données ????

Merci encore !!!!

José
Avatar
Jacky
Re...
Je crois bien qu'il faille la ressortir du coin, je ne vois pas
l'équivalence dans une formule.
Formuuuuuullliiiiiiiistes!!!
--
Salutations
JJ


"Alfred WALLACE" a écrit dans le message de news:

Opps, merci Jacky pour ta réponse
heu si possible, nous voudrions éviter les macros.

Ceci dit : je me la note dans un coin !!!!!

Merci !
José

On 22 sep, 15:25, "Jacky" wrote:
Bonjour,
Ceci peut-être
'---------------------
Sub jj()
Application.ScreenUpdating = False
x = 1
For i = 1 To 255 Step 2
Sheets("feuil1").Columns(i).Copy Sheets("feuil2").Columns(x)
x = x + 1
Next
End Sub
'---------------------

--
Salutations
JJ


Avatar
Alfred WALLACE
On 22 sep, 18:45, "Jacky" wrote:
Re...
Je crois bien qu'il faille la ressortir du coin, je ne vois pas
l'équivalence dans une formule.
Formuuuuuullliiiiiiiistes!!!
--
Salutations
JJ



lol ! salut JJ ! et merci à tous pour votre aide !

José
Avatar
Misange
Bonjour,
Avec un peu de retard mais sans macro :

tu mets en A1 de ta feuille 2
ÞCALER(Feuil1!$A1;0;(COLONNE(A1)*2)-2). Tu tires la formule vers la
droite et vers le bas.

Magique décaler quand on utilise ligne() ou colonne(A1) dedans !

Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !
http://xlwiki.free.fr/wiki
http://www.excelabo.net

Alfred WALLACE a écrit :
Bonjour à tous les EXCELents gurus !

j'ai un problème pour recopier des données d'une feuille A vers une
feuille B.

en effet, dans ma feuille A

j'ai des nombres toutes les deux colonnes pour une ligne donnée.

j'aimerai recopier ces valeurs (qui sont donc déparées par une
colonne) dans
la feuille B, mais de façon contiguë.

Feuille A : 100 ----- 110 ----- 50 ------- 80 ------- (les
"-----" représentent des colonnes)

Feuille B : 100 110 50 80


Existe-t-il une formule, ou une méthode pour copier les données ????

Merci encore !!!!

José


Avatar
Alfred WALLACE
On 24 sep, 13:31, Misange wrote:
Bonjour,
Avec un peu de retard mais sans macro :

tu mets en A1 de ta feuille 2
ÞCALER(Feuil1!$A1;0;(COLONNE(A1)*2)-2). Tu tires la formule vers la
droite et vers le bas.

Magique décaler quand on utilise ligne() ou colonne(A1) dedans !

Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !http://xlwiki. free.fr/wikihttp://www.excelabo.net




Bonjour et Merci pour cette formule !
je la maitrise très mal, mais, à chaque fois, elle me "décale" le
cerveau ...

José
Avatar
Misange
Mais au moins, quitte à te décaler le cerveau, fait-elle ce que tu veux
? :-)

je t'explique :
regarde ici déjà pour les notions de base sur cette fonction magique :
http://www.excelabo.net/excel/pap-decaler.php

ensuite la ruse tient dans le 3° paramètre de la formule :
colonne(A1) renvoie le numéro de la colonne A1 soit... 1 (mais si !)
quand tu tires cette formule vers la droite, elle s'ajuste et dans la
colonne E colonne(E1) te renvoie 5
(colonne(E1)*2)-2 renvoie donc 5*2-2 soit 8
donc en écrivant en E1 sur la feuille 2 la formule
ÞCALER(Feuil1!$A1;0;(COLONNE(E1)*2)-2) tu récupères la valeur de la
cellule qui est trouvée comme suit :
tu pars de A1 (sur la feuille 1), tu ne te décales pas de ligne mais tu
te décales de 8 colonnes vers la droite. Ca qui te renvoie la valeur de
la cellule H1
La même formule en F1 sur la feuille 2 te renvoie A1 de la feuille 1
décalée cette fois de 6*2-2 soit 10 colonnes vers la droite donc J
CQFD

Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !
http://xlwiki.free.fr/wiki
http://www.excelabo.net

Alfred WALLACE a écrit :
On 24 sep, 13:31, Misange wrote:
Bonjour,
Avec un peu de retard mais sans macro :

tu mets en A1 de ta feuille 2
ÞCALER(Feuil1!$A1;0;(COLONNE(A1)*2)-2). Tu tires la formule vers la
droite et vers le bas.

Magique décaler quand on utilise ligne() ou colonne(A1) dedans !

Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !http://xlwiki.free.fr/wikihttp://www.excelabo.net




Bonjour et Merci pour cette formule !
je la maitrise très mal, mais, à chaque fois, elle me "décale" le
cerveau ...

José