[VB] Couper une ligne sous excel et la coller Résolu/Fermé

Question

Bonjour,

J'essais de mettre en place un fichier qui permet de suivre l'avancement de mon travail.

En gros, je mets la date, le renseigne le travail à effectuer, la date butoire et l'avancement sous forme de pourcentage.

Exemple:

07/06/07....Mettre à jour le fichier Excel.....10/06/07...... 100%

Ma question: A l'aide d'un bouton par exemple, si une cellule de la colonne 'x' renvoie la valeur "VRAI" alors couper la ligne correspondante et la coller à la fin du tableau. J'aimerais aussi que le fait de couper la ligne ne laisse pas la ligne blanche mais remonte tout le tableau.

En gros, si un travail est effectué à 100%, une cellule renvoie la valeur "VRAI" et j'aimerais par la suite mettre le travail en question à la fin de mon tableau Excel.

Merci

Arnaud61 · Answer

Up

irem · Answer

nul besoin de macro, c'est juste un tri à faire, donc le dit bouton est dans menu Données -> Trier, et ensuite choisir la bonne colonne et éventuellement le sous classement.

Si par contre il faut conserver l'ordre des autres (c'est-à-dire ne pas classer les autres lignes) cela peut se faire par macro (calculer l'indice de la dernière ligne puis procédure de boucle pour chaque ligne en partant de l'avant dernière, si 100% couper coller en dernière).

Irem

Arnaud61 · Answer

Merci pour cette réponse, mais je cherche absolument à faire un bouton. Concernant la procédure à suivre, je ne connais vraiment rien en VB...

Je ferais de cette manière.

If colonne "X" = True Then Cut "ligne correspondante" And Paste "A la fin du tableau"

Ca devrait donner un truc dans le style...

En vrai, ça donen quoi? :)

irem · Answer

pour le bouton, tu enregistre la macro de tri, ensuite tu clique droit sur la barre des menus, crée le bouton et y affecte la macro, ou insere un bouton et y affecte la macro.

Elle sera écrite directement

Arnaud61 · Answer

"enregistrer la macro de tri" <- comment faire?

Arnaud61 · Answer

Up

fred.0 · Answer

Voici un petit bout de code VB qui pourrait t'aider :


Sub TrierLesTaches()
    
    Range("A4").Select
    Selection.CurrentRegion.Select
    Selection.Sort Key1:=Range("D4"), Order1:=xlAscending, Key2:=Range("C4"), Order2:=xlDescending, Key3:=Range("A4"), Order3:=xlDescending, Header:=True
    Range("A4").Select

End Sub


Il faut ensuite affecter cette macro au bouton.

Les cellules A4, D4 et C4 représente les en-têtes de colonnes (à ajuster en fonction de tes besoins)
A4 = date de début
D4 = pourcentage
C4 = date de fin

Et pour ajouter des tâches, inutile d'insérer des lignes au début du tableau, il suffit de saisir la tâche en fin de tableau et d'appliquer le tri.

Bon courage.

Arnaud61 · Answer

Merci à tous, je suis arrivé à résoudre mon problème!

tazou · Answer

Bonjour,

Voila, je voudrai classer une ligne dans un feuille excel avec un bouton
exemple/
classe ligne A7
ranger classer dans la ligne A11:A1000
merci a vous

[VB] Couper une ligne sous excel et la coller

9 réponses

Discussions similaires