XL pour MAC Automatisation fichier Excel

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 1 Février 2023

• #2

Bonjour Luoissss, et bienvenu sur XLD,

Louisssss à dit:

je voulais savoir si une méthode est possible afin de l'automatiser pour que les colonnes se supprime automatiquement.

Cliquez pour agrandir...

Oui c'est possible, mais va dépendre de votre fichier test. On peut le faire facilement en VBA.
Pouvez vous fournir un petit fichier test représentatif mais anonyme.

 

Vote positif 0 Vote négatif

L

Louisssss

XLDnaute Nouveau

• 2 Février 2023

• #3

Bonjour Sylvanu,
Merci pour ta réponse,
j'ai mis un exemple en PJ avec dans la première Feuil1 le tableau initial et dans la Feuil2 le tableau voulu.
Merci pour votre retour.

 

Pièces jointes

• Exemple1.xlsx

  10 KB · Affichages: 3

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 2 Février 2023

• #4

Bonsoir,
Dans cette PJ sur la bonne feuille faites ALT+F8 puis éxécuter SupColonnes. Avec simplement :

Code:

Sub SupColonnes()
Application.ScreenUpdating = False
Columns("H:H").Delete Shift:=xlToLeft
Columns("C:C").Delete Shift:=xlToLeft
End Sub

Toujours commencer par supprimer les colonnes de droite à gauche pour ne pas se tromper de colonnes.

 

Pièces jointes

• Exemple1.xlsm

  15.1 KB · Affichages: 3

Vote positif 0 Vote négatif

L

Louisssss

XLDnaute Nouveau

• 6 Février 2023

• #5

Merci beaucoup c’est parfait, savez vous si nous pouvons également automatiser le triage d’une colonne de À à Z ?
Merci

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 6 Février 2023

• #6

Bonjour Louissss,

Louisssss à dit:

savez vous si nous pouvons également automatiser le triage d’une colonne de À à Z ?

Cliquez pour agrandir...

"triage" ne veut rien dire.
Que trier ? numérique, alphanumérique ?
Croissant, décroissant ?
Chaque colonne séparément ou toutes les colonnes ensemble ?

 

Vote positif 0 Vote négatif

L

Louisssss

XLDnaute Nouveau

• 6 Février 2023

• #7

il s’agirait de classer des dates du plus récent au plus ancien avec la date la plus récente en haut du tableau et plus ancien en bas.
Et cela sur une seule colonne

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 6 Février 2023

• #8

Vous pouvez fournir un fichier un peu plus représentatif que le premier ?

Louisssss à dit:

Et cela sur une seule colonne

Cliquez pour agrandir...

Si on tri chaque colonne séparément, cela veut dire que les données initiales sur une ligne seront mélangées ? C'est bien ça ?

 

Vote positif 0 Vote négatif

L

Louisssss

XLDnaute Nouveau

• 6 Février 2023

• #9

Une seule colonne aura besoin d'être triée il faut donc que la ligne associé à celle dans la colonne triée bouge en même temps.
Voir PJ,
Merci pour votre aide

 

Pièces jointes

• Exemple1.xlsx

  10.6 KB · Affichages: 9

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 6 Février 2023

• #10

Re,
Sur votre PJ, il suffit de faire :

VB:

Sub Tri()
    DL = Range("E65500").End(xlUp).Row
    Range("A:J").Resize(DL).Sort key1:=Range("E1"), order1:=xlDescending, Header:=xlYes
End Sub

 

Vote positif 0 Vote négatif