[Excel] Macro : sélectionner tout

xavdu25 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

je me sers d'une macro pour copier des données présentes dans un tableau trié automatiquement. Le problème est le suivant : si une des colonnes fait l'objet d'une sélection partielle, ma copie ne prend pas tout en compte (forcèment...).

J'ai pensé utiliser la ligne suivante:
ActiveWorkbook.Worksheets("ma feuille").AutoFilter.Sort.SortFields.Clear
mais sans succès.

Comment puis-je m'assurer que "sélectionner tout" est coché pour chaque colonne de ce tableau?

A voir également:

1 réponse

gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 725
 
bonjour

Tu peux tester si ton filtre est présent et l'enlever :

If ActiveWorkbook.Worksheets("ma feuille").AutoFilterMode Then
    ActiveWorkbook.Worksheets("ma feuille").Rows(1).AutoFilter
End If

Puis après ta copie tu le remets :
    ActiveWorkbook.Worksheets("ma feuille").Rows(1).AutoFilter

Tu remplaces évidemment .Rows(1) par la position de ton filtre.
0