OVH Cloud OVH Cloud

recopie de formules !!!!

8 réponses
Avatar
ghandara
Bonjour à tous,
Je n'arrive pas à trouver comment recopier des données verticale sur des
cellules à horizontale. Je m'explique !

FEUILLE A
a1
b1
c1
d1
FEUILLE B
................................F7 F8 F9 F10

Je veux recopier a1 en f7 ; b1 en f8 ; c1 en f9 etc....

Car si je me sert de la poignée et je tire ma cellule cela va me recopier a2
a3 a4 a5 et non a1 b1 c1 d1 !!!

J'espère être assez clair pour que vous puissiez m'aider car j'ai un gros
tableau et j'ai pas trop le temps de pointer chaque cellules !

Merci


Merci

8 réponses

Avatar
j
collage spécial / transposition ?
--

http://jacxl.free.fr/



"ghandara" a écrit dans le message de news:

Bonjour à tous,
Je n'arrive pas à trouver comment recopier des données verticale sur des
cellules à horizontale. Je m'explique !

FEUILLE A
a1
b1
c1
d1
FEUILLE B
................................F7 F8 F9 F10

Je veux recopier a1 en f7 ; b1 en f8 ; c1 en f9 etc....

Car si je me sert de la poignée et je tire ma cellule cela va me recopier
a2

a3 a4 a5 et non a1 b1 c1 d1 !!!

J'espère être assez clair pour que vous puissiez m'aider car j'ai un gros
tableau et j'ai pas trop le temps de pointer chaque cellules !

Merci


Merci




Avatar
ghandara
Je mets ma reponse a sur le groupe car je me suis trompé de bouton.
Je n'ai pas précisé mais les données en a1 a2 a3 ... sont des variables,
c'est pourquoi je dois mettre des formules pour dire f7¡ f8¢ f9£
etc... mais je ne peu pas faire recopie vers la droite car cela ne prend pas
la colone a mais la ligne 6 !!!!

Merci pour votre aide

"" a écrit dans le message de
news:
collage spécial / transposition ?
--

http://jacxl.free.fr/



"ghandara" a écrit dans le message de news:

Bonjour à tous,
Je n'arrive pas à trouver comment recopier des données verticale sur des
cellules à horizontale. Je m'explique !

FEUILLE A
a1
b1
c1
d1
FEUILLE B
................................F7 F8 F9 F10

Je veux recopier a1 en f7 ; b1 en f8 ; c1 en f9 etc....

Car si je me sert de la poignée et je tire ma cellule cela va me
recopier


a2
a3 a4 a5 et non a1 b1 c1 d1 !!!

J'espère être assez clair pour que vous puissiez m'aider car j'ai un
gros


tableau et j'ai pas trop le temps de pointer chaque cellules !

Merci


Merci








Avatar
JLuc
Salut ghandara,
essaie avec une macro du type

Sub test()
For x = 1 To 6
Worksheets("Feuil1").Cells(x + 5, 6).Value = Worksheets("Feuil1").Cells(1,
x).Value
Next
End Sub
j'ai teste avac des valeurs en a1,b1,c1,d1,e1,f1
pour les mettres en f6 a f11
Adaote a ton cas
A+ et bonnes fêtes

--

JLuc
Pour m'ecrire, supprimer 'ns.' dans l'adresse.
~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
Bonjour à tous,
Je n'arrive pas à trouver comment recopier des données verticale sur
des cellules à horizontale. Je m'explique !

FEUILLE A
a1
b1
c1
d1
FEUILLE B
................................F7 F8 F9 F10

Je veux recopier a1 en f7 ; b1 en f8 ; c1 en f9 etc....

Car si je me sert de la poignée et je tire ma cellule cela va me
recopier a2 a3 a4 a5 et non a1 b1 c1 d1 !!!

J'espère être assez clair pour que vous puissiez m'aider car j'ai un
gros tableau et j'ai pas trop le temps de pointer chaque cellules !

Merci


Merci


Avatar
JLuc
Salut ghandara,
Alors modifie ma macro

Sub test()
For x = 0 To 5
MaVar = "G" & x + 1
Result = "=" & Chr(65 + x) & "1"
Worksheets("Feuil1").Range(MaVar).Value = Result
Next
End Sub

Fais 1 boucle autour pour changer de ligne
A+

Je mets ma reponse a sur le groupe car je me suis trompé de
bouton.
Je n'ai pas précisé mais les données en a1 a2 a3 ... sont des
variables, c'est pourquoi je dois mettre des formules pour dire f7¡
f8¢ f9£ etc... mais je ne peu pas faire recopie vers la droite
car cela ne prend pas la colone a mais la ligne 6 !!!!

Merci pour votre aide

"" a écrit dans le message de
news:
collage spécial / transposition ?
--

http://jacxl.free.fr/



"ghandara" a écrit dans le message de news:

Bonjour à tous,
Je n'arrive pas à trouver comment recopier des données verticale
sur des cellules à horizontale. Je m'explique !

FEUILLE A
a1
b1
c1
d1
FEUILLE B
................................F7 F8 F9 F10

Je veux recopier a1 en f7 ; b1 en f8 ; c1 en f9 etc....

Car si je me sert de la poignée et je tire ma cellule cela va me
recopier a2 a3 a4 a5 et non a1 b1 c1 d1 !!!

J'espère être assez clair pour que vous puissiez m'aider car j'ai
un gros tableau et j'ai pas trop le temps de pointer chaque
cellules !

Merci


Merci






Avatar
j
en F7 de la page feuilleB :
=INDEX(FeuilleA!$1:$1;LIGNE()-6)
et recopie vers le bas
--

http://jacxl.free.fr/




"ghandara" a écrit dans le message de news:

Je mets ma reponse a sur le groupe car je me suis trompé de bouton.
Je n'ai pas précisé mais les données en a1 a2 a3 ... sont des variables,
c'est pourquoi je dois mettre des formules pour dire f7¡ f8¢ f9£
etc... mais je ne peu pas faire recopie vers la droite car cela ne prend
pas

la colone a mais la ligne 6 !!!!

Merci pour votre aide

"" a écrit dans le message de
news:
collage spécial / transposition ?
--

http://jacxl.free.fr/



"ghandara" a écrit dans le message de news:

Bonjour à tous,
Je n'arrive pas à trouver comment recopier des données verticale sur
des



cellules à horizontale. Je m'explique !

FEUILLE A
a1
b1
c1
d1
FEUILLE B
................................F7 F8 F9 F10

Je veux recopier a1 en f7 ; b1 en f8 ; c1 en f9 etc....

Car si je me sert de la poignée et je tire ma cellule cela va me
recopier


a2
a3 a4 a5 et non a1 b1 c1 d1 !!!

J'espère être assez clair pour que vous puissiez m'aider car j'ai un
gros


tableau et j'ai pas trop le temps de pointer chaque cellules !

Merci


Merci












Avatar
ghandara
Merci jean-luc,
Mais ta macro me recopie en G de façon vertical a1 b1 c1 d1 ....
Alors qu'il faudrait recopier a1 en g6 a2 en h6 a3 en i6 etc .....
Merci de ton aide

"JLuc" a écrit dans le message de
news:3fe361ad$0$1145$
Salut ghandara,
Alors modifie ma macro

Sub test()
For x = 0 To 5
MaVar = "G" & x + 1
Result = "=" & Chr(65 + x) & "1"
Worksheets("Feuil1").Range(MaVar).Value = Result
Next
End Sub

Fais 1 boucle autour pour changer de ligne
A+

Je mets ma reponse a sur le groupe car je me suis trompé de
bouton.
Je n'ai pas précisé mais les données en a1 a2 a3 ... sont des
variables, c'est pourquoi je dois mettre des formules pour dire f7¡
f8¢ f9£ etc... mais je ne peu pas faire recopie vers la droite
car cela ne prend pas la colone a mais la ligne 6 !!!!

Merci pour votre aide

"" a écrit dans le message de
news:
collage spécial / transposition ?
--

http://jacxl.free.fr/



"ghandara" a écrit dans le message de news:

Bonjour à tous,
Je n'arrive pas à trouver comment recopier des données verticale
sur des cellules à horizontale. Je m'explique !

FEUILLE A
a1
b1
c1
d1
FEUILLE B
................................F7 F8 F9 F10

Je veux recopier a1 en f7 ; b1 en f8 ; c1 en f9 etc....

Car si je me sert de la poignée et je tire ma cellule cela va me
recopier a2 a3 a4 a5 et non a1 b1 c1 d1 !!!

J'espère être assez clair pour que vous puissiez m'aider car j'ai
un gros tableau et j'ai pas trop le temps de pointer chaque
cellules !

Merci


Merci











Avatar
JLuc
Salut ghandara,
C'est pas tres grave, il suffit d'adapter pour ton cas. j'avais cru
comprendre que ce qui etait en colonne devais passer en ligne... excuse ;-))
. En fait c'est dans l'autre sens :

Sub test()
For x = 0 To 5
MaVar = Chr(71 + x) & "6" 'G6 en debut de boucle,
apres H6 ...
Result = "=" & Chr(65) & x+1 ' A1 en debut de boucle,
apres A2 ...
Worksheets("Feuil1").Range(MaVar).Value = Result
Next
End Sub


Merci jean-luc,


a ta disposition

Mais ta macro me recopie en G de façon vertical a1 b1 c1 d1 ....
Alors qu'il faudrait recopier a1 en g6 a2 en h6 a3 en i6 etc .....
Merci de ton aide


Avatar
ghandara
Merci beaucoup Jean-Luc c'est exactement ce dont j'avais besoins il ne me
reste plus qu'a l'adapter à mes tableaux.

Encore milles merci

Ghandara
"JLuc" a écrit dans le message de
news:3fe38e58$0$24023$
Salut ghandara,
C'est pas tres grave, il suffit d'adapter pour ton cas. j'avais cru
comprendre que ce qui etait en colonne devais passer en ligne... excuse
;-))

. En fait c'est dans l'autre sens :

Sub test()
For x = 0 To 5
MaVar = Chr(71 + x) & "6" 'G6 en debut de boucle,
apres H6 ...
Result = "=" & Chr(65) & x+1 ' A1 en debut de boucle,
apres A2 ...
Worksheets("Feuil1").Range(MaVar).Value = Result
Next
End Sub


Merci jean-luc,


a ta disposition

Mais ta macro me recopie en G de façon vertical a1 b1 c1 d1 ....
Alors qu'il faudrait recopier a1 en g6 a2 en h6 a3 en i6 etc .....
Merci de ton aide