Sujet Précédent Sujet Suivant

MACRO EXCEL - comment la stoper ?

Résolu/Fermé
HELD_tokyo Messages postés 51 Date d'inscription lundi 5 janvier 2009 Statut Membre Dernière intervention 19 janvier 2010 - 3 avril 2009 à 03:02
leplot Messages postés 191 Date d'inscription lundi 1 décembre 2008 Statut Membre Dernière intervention 13 août 2015 - 3 avril 2009 à 11:47
Bonjour,

J'ai un fichier excel avec 1500 ligne de donnees.
J'effectue des recherches via des filtres automatiques, et ca marche tres bien

J'ai cree une macro pour reinitialiser les filtres, car si je multiplie les criteres de selection, ce me prend un plombe apres pour tout afficher a nouveau.

Voici la marco:
Private Sub CommandButton1_Click()

ActiveSheet.ShowAllData
Exit Sub

End Sub

Or voila, si les filtres ne sont pas appliques, et que j'appuye sur le bouton de remise a 0, il m'Affiche un message d'erreur 1004.

Donc je voudrais que lorsque je clique sur le bouton, la macro ne s'execute que si les filtres sont appliques.
Si je clique alors qu'aucun filtre n'est applique, il ne se passe tout simplement rien...du tout.

Merci pour votre aide, je pense qu'il faut peut etre stopper la macro, ou faire quelque chose du genre, if active sheet.showalldata is wrong alors ne pas appliquer la macro...sais pas.
A voir également:

3 réponses

Réponse 1 / 3
wilfried_42 Messages postés 907 Date d'inscription mardi 19 août 2008 Statut Contributeur Dernière intervention 8 décembre 2009 243
3 avril 2009 à 06:02
bonjour
le plus simple est de gérer l'erreur 
Private Sub CommandButton1_Click() 
        On error resume next
        ActiveSheet.ShowAllData 
        on error goto 0
End Sub

dans la macro que tu as montré, le Exit Sub n'est pas utile puisque suivi d'un End Sub, Exit Sub est là pour forcer la sortie d'une procédure pour ne pas effectuer le traitement qui suit.
1
Réponse 2 / 3
HELD_tokyo Messages postés 51 Date d'inscription lundi 5 janvier 2009 Statut Membre Dernière intervention 19 janvier 2010 1
3 avril 2009 à 11:43
Ca marche du feu!
0
Réponse 3 / 3
leplot Messages postés 191 Date d'inscription lundi 1 décembre 2008 Statut Membre Dernière intervention 13 août 2015 130
3 avril 2009 à 11:47
Bonjour,

Si tu veux réinitialiser le filtre, pourquoi ne fais tu pas simplement Données\Filtrer\Afficher tout (Excel 2003) ?
0

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses