Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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 ?
 
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

S
  • Résolu(e)
XL 2016 Besoin d'aide pour un code d'extraction
Réponses
14
Affichages
504
Phil69970
  • Question
XL 2021 Optimisation code pour affichage ligne et colonne
Réponses
14
Affichages
619
patricktoulon
M
  • Question
Microsoft 365 Modifier code et format textbox
2 3
Réponses
35
Affichages
1 K
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
334
elgringo123456
E
Y
  • Résolu(e)
XL 2013 Surligner une ligne si curseur sur la ligne et dans une zone définie
Réponses
2
Affichages
352
Yvan1
Y
A
  • Question
XL 2010 Tri sur Date
Réponses
4
Affichages
653
Aldonanou
A
S
  • Question
Microsoft 365 VBA pour copier une une des données d'une ligne à une autre
Réponses
3
Affichages
553
salma_hayek
S
  • Question
XL 2013 Réduire un code
Réponses
0
Affichages
456
chaelie2015
  • Question
XL 2010 [RESOLU] Lenteur rendre visible un Label
Réponses
11
Affichages
285
patricktoulon
D
  • Question
XL 2019 Message diffèrent en fonction état booléens
Réponses
3
Affichages
505
darkjedi
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…