Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Tri par boutons

Tri par boutons

4 réponses
Avatar
Jean-Paul Brine
Bonjour,

Aprés avoir essayé vainement, je m'en remets à vous pour résoudre mon
problème.
Dans l'exemple http://cjoint.com/?jepdmziMOG je souhaite trier les nombres
contenus en colonne A et les repartir en B, C, D, ou E
Explication:
je selectionne A4 je clique le bouton "Copier en colonne C" et A4 se copie
en C4
Idem A5 "Copier en colonne B"
A5 B5
Et ainsi de suite.

Merci

JP
Signaler un problème avec ce contenu

4 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
isabelle
bonjour Jean-Paul,

copi ces macro dans un module standard :
'_________________________________________________________
'une cellule de la colonne "A" doit être sélectionner
'avant l'exécution de ces macro

Sub CopyEnColonneB()
Selection.Copy Cells(ActiveCell.Row, 2)
End Sub

Sub CopyEnColonneC()
Selection.Copy Cells(ActiveCell.Row, 3)
End Sub

Sub CopyEnColonneD()
Selection.Copy Cells(ActiveCell.Row, 4)
End Sub

Sub CopyEnColonneE()
Selection.Copy Cells(ActiveCell.Row, 5)
End Sub
'_________________________________________________________

fait un click droit sur chacun des boutons pour lui affecter une macro.

isabelle



Bonjour,

Aprés avoir essayé vainement, je m'en remets à vous pour résoudre mon
problème.
Dans l'exemple http://cjoint.com/?jepdmziMOG je souhaite trier les nombres
contenus en colonne A et les repartir en B, C, D, ou E
Explication:
je selectionne A4 je clique le bouton "Copier en colonne C" et A4 se copie
en C4
Idem A5 "Copier en colonne B"
A5 B5
Et ainsi de suite.

Merci

JP





Avatar
Jean-Paul Brine
Merci à Isabelle. Mais un petit souci subsiste: les nombres ne peuvent se
copier que dans une seule colonne à la fois.

JP


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

bonjour Jean-Paul,

copi ces macro dans un module standard :
'_________________________________________________________
'une cellule de la colonne "A" doit être sélectionner
'avant l'exécution de ces macro

Sub CopyEnColonneB()
Selection.Copy Cells(ActiveCell.Row, 2)
End Sub

Sub CopyEnColonneC()
Selection.Copy Cells(ActiveCell.Row, 3)
End Sub

Sub CopyEnColonneD()
Selection.Copy Cells(ActiveCell.Row, 4)
End Sub

Sub CopyEnColonneE()
Selection.Copy Cells(ActiveCell.Row, 5)
End Sub
'_________________________________________________________

fait un click droit sur chacun des boutons pour lui affecter une macro.

isabelle



Bonjour,

Aprés avoir essayé vainement, je m'en remets à vous pour résoudre mon
problème.
Dans l'exemple http://cjoint.com/?jepdmziMOG je souhaite trier les
nombres


contenus en colonne A et les repartir en B, C, D, ou E
Explication:
je selectionne A4 je clique le bouton "Copier en colonne C" et A4 se
copie


en C4
Idem A5 "Copier en colonne B"
A5 B5
Et ainsi de suite.

Merci

JP







Avatar
isabelle
je ne suis pas sur de bien comprendre,
est ce que, s'il existe déjà un nombre dans les cellules B:F
la recopie ne doit pas être possible,
est ce bien ça que tu veux ?

si oui, voici l'exemple pour le bouto "B"

Sub CopyEnColonneB()
If Application.CountA(Range("B" & ActiveCell.Row & ":F" & ActiveCell.Row)) = 0 Then _
Selection.Copy Cells(ActiveCell.Row, 2)
End Sub

isabelle

Merci à Isabelle. Mais un petit souci subsiste: les nombres ne peuvent se
copier que dans une seule colonne à la fois.

JP


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


bonjour Jean-Paul,

copi ces macro dans un module standard :
'_________________________________________________________
'une cellule de la colonne "A" doit être sélectionner
'avant l'exécution de ces macro

Sub CopyEnColonneB()
Selection.Copy Cells(ActiveCell.Row, 2)
End Sub

Sub CopyEnColonneC()
Selection.Copy Cells(ActiveCell.Row, 3)
End Sub

Sub CopyEnColonneD()
Selection.Copy Cells(ActiveCell.Row, 4)
End Sub

Sub CopyEnColonneE()
Selection.Copy Cells(ActiveCell.Row, 5)
End Sub
'_________________________________________________________

fait un click droit sur chacun des boutons pour lui affecter une macro.

isabelle




Bonjour,

Aprés avoir essayé vainement, je m'en remets à vous pour résoudre mon
problème.
Dans l'exemple http://cjoint.com/?jepdmziMOG je souhaite trier les



nombres

contenus en colonne A et les repartir en B, C, D, ou E
Explication:
je selectionne A4 je clique le bouton "Copier en colonne C" et A4 se



copie

en C4
Idem A5 "Copier en colonne B"
A5 B5
Et ainsi de suite.

Merci

JP












Avatar
Jean-Paul Brine
Merveilleuse Isabelle,
C'est exactement cela.
Merci.

JP


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

je ne suis pas sur de bien comprendre,
est ce que, s'il existe déjà un nombre dans les cellules B:F
la recopie ne doit pas être possible,
est ce bien ça que tu veux ?

si oui, voici l'exemple pour le bouto "B"

Sub CopyEnColonneB()
If Application.CountA(Range("B" & ActiveCell.Row & ":F" & ActiveCell.Row))
= 0 Then _

Selection.Copy Cells(ActiveCell.Row, 2)
End Sub

isabelle

Merci à Isabelle. Mais un petit souci subsiste: les nombres ne peuvent
se


copier que dans une seule colonne à la fois.

JP


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


bonjour Jean-Paul,

copi ces macro dans un module standard :
'_________________________________________________________
'une cellule de la colonne "A" doit être sélectionner
'avant l'exécution de ces macro

Sub CopyEnColonneB()
Selection.Copy Cells(ActiveCell.Row, 2)
End Sub

Sub CopyEnColonneC()
Selection.Copy Cells(ActiveCell.Row, 3)
End Sub

Sub CopyEnColonneD()
Selection.Copy Cells(ActiveCell.Row, 4)
End Sub

Sub CopyEnColonneE()
Selection.Copy Cells(ActiveCell.Row, 5)
End Sub
'_________________________________________________________

fait un click droit sur chacun des boutons pour lui affecter une macro.

isabelle




Bonjour,

Aprés avoir essayé vainement, je m'en remets à vous pour résoudre mon
problème.
Dans l'exemple http://cjoint.com/?jepdmziMOG je souhaite trier les



nombres

contenus en colonne A et les repartir en B, C, D, ou E
Explication:
je selectionne A4 je clique le bouton "Copier en colonne C" et A4 se



copie

en C4
Idem A5 "Copier en colonne B"
A5 B5
Et ainsi de suite.

Merci

JP