code pour remplacer par ...

K

Katoch

XLDnaute Junior
Bonjour à tous !

J'ai besoin de remplacer dans un très grand nb de macros (plusieurs centaines d’occurrences...)
les 2 lignes , contiguës , de code suivantes :

Selection.AutoFilter
Selection.AutoFilter

par

If ActiveSheet.AutoFilterMode = True Then ActiveSheet.AutoFilterMode = False
Selection.AutoFilter

Quelqu'un a-t-il une solution ?
 

Discussions similaires

S
  • Résolu(e)
XL 2016 Besoin d'aide pour un code d'extraction
Réponses
14
Affichages
285
Phil69970
Phil69970
M
  • Question
Microsoft 365 Modifier code et format textbox
2 3
Réponses
35
Affichages
748
Marvin57
M
E
  • Question
Microsoft 365 utilisation de la fonction rechercher/remplacer pour ajouter un caractère d'annihilation par ' en amont de chaque contenu de la cellule
Réponses
2
Affichages
132
elgringo123456
E
A
  • Question
XL 2010 Tri sur Date
Réponses
4
Affichages
545
Aldonanou
A
chaelie2015
  • Question
XL 2013 Réduire un code
Réponses
0
Affichages
254
chaelie2015
chaelie2015
P
  • Question
XL 2021 Remplacer des formules matricielle par code VBA
Réponses
12
Affichages
252
TooFatBoy
TooFatBoy
chaelie2015
  • Résolu(e)
XL 2013 (RESOLU) Code afficher/Masquer problème
Réponses
10
Affichages
239
chaelie2015
chaelie2015
L
  • Résolu(e)
Microsoft 365 Cumul progressif en PowerQuery
Réponses
7
Affichages
236
oguruma
oguruma
P
  • Question
Microsoft 365 rétablir le clic droit sur les onglets malgré ThisWorkbook.Saved = True
Réponses
2
Affichages
493
Lu76Fer
Lu76Fer
halecs93
  • Résolu(e)
XL 2016 Indice n'appartient pas à la sélection : HELP !!!!
2
Réponses
21
Affichages
552
halecs93
halecs93

Membres actuellement en ligne

16 membres et 169 invités.

Partager cette page

Tutos vidéos

Power Query : Ajouter des requêtes (Excel et Power BI)
Créez votre première fonction LAMBDA dans Excel en 3 étapes!
LAMBDA, l’arme secrète de Microsoft pour Excel !
Office Insider - Découvrez les nouveautés Excel avant tout le monde

Statistiques des forums

Discussions
312 343
Messages
2 087 440
Membres
103 546
dernier inscrit
mohamed tano