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

Masquer des colonnes

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Constantin
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
C

Constantin

XLDnaute Occasionnel
Supporter XLD
Bonjour,

Dans une feuille, je souhaite trier dans la colonne F (masquée) les cellules qui contiennent un "x". Parallèlement, je veux masquer les colonnes C et D. J'ai réalisé une petite macro à partir de l'enregistreur, le problème c'est que quand je lance ma macro, tout se masque ou presque.
Est-ce du au fait de la présence de la cellule commentaire (fusionnée)? Le problème c'est que je ne peux pas supprimer ou défusionner cette cellule. Le fichier joint n'est pas mon fichier d'origine, je l'ai réalisé pour mieux expliciter mon propos.

Si vous pouvez m'aider, je suis preneur (comme vous vous en doutez, mon niveau en matière de programmation n'est pas très élevé)

Bien cordialement,

Pierre Constantin
 

Pièces jointes

Solution
Bonjour Constantin, JM,
VB: 
Sub Masquer1()
ActiveSheet.Protect UserInterfaceOnly:=True, AllowFiltering:=True
ActiveSheet.AutoFilterMode = False
Range("F1:F184").AutoFilter 1, "<>"
Range("C:D,F:F").EntireColumn.Hidden = True
End Sub

Sub Afficher1()
ActiveSheet.Protect UserInterfaceOnly:=True
If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData
End Sub
Trier par date Trier par votes
Re

Si j'ai bien compris le but recherché, essaie la macro ci-dessous
VB: 
Sub Macro4()
ActiveSheet.Range("$A$1:$F$11").AutoFilter Field:=6, Criteria1:="<>"
Range("C:D,F:F").EntireColumn.Hidden = True
End Sub
 
Vote positif 0 Vote négatif
Bonjour JM,
Ta macro fonctionne, comme d'habitude, très bien.
J'ai donc essayé de la transposer dans mon fichier de travail (2019_04_05_GRILLE_RAPPORT_CompilationEssai.xlsm (feuille 6-Conclusion initiale).
Cette feuille étant protégée (sans mot de passe) j'ai rajouté l'instruction unprotect pour pouvoir autoriser la macro à fonctionner.
Je ne sais pas comment je m'y suis pris, mais ça buggue à ActiveSheet.range (la méthode range a échoué...) dans la macro Masquer1.
C'est dur d'être si nul ! Mais là, je ne comprends pas ce qui bloque. Si tu as une idée ?

Bien cordialement,

Pierre
 

Pièces jointes

Vote positif 0 Vote négatif
Bonjour Constantin, JM,
VB: 
Sub Masquer1()
ActiveSheet.Protect UserInterfaceOnly:=True, AllowFiltering:=True
ActiveSheet.AutoFilterMode = False
Range("F1:F184").AutoFilter 1, "<>"
Range("C:D,F:F").EntireColumn.Hidden = True
End Sub

Sub Afficher1()
ActiveSheet.Protect UserInterfaceOnly:=True
If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData
End Sub
 
Vote positif 0 Vote négatif
Solution
Merci de votre réponse Job75,

C'est absolument parfait (comme d'habitude) !

Bonne journée !

Pierre Constantin
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

T
  • Résolu(e)
XL 2021 Masquer des colonnes et affichage avec MDP
Réponses
11
Affichages
857
ThomAnalyses
T
Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
143
Yogean
Y
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
679
Nel'
N
  • Résolu(e)
XL 2013 (RESOLU) Masquer et/ou afficher des colonnes selon une valeur
Réponses
5
Affichages
794
chaelie2015
L
  • Question Question
Microsoft 365 masquer colonne + MDP
Réponses
2
Affichages
531
l.et.lilou
L
B
  • Question Question
XL 2019 Dans une macro de démarrage de fichier masquer le code par des Astérix ou point
Réponses
3
Affichages
209
sylvanu
C
  • Résolu(e)
Microsoft 365 Problème VBA lors de l'affichage de ligne masquée
2
Réponses
21
Affichages
919
Chris Linefield
C
  • Question Question
XL 2021 EXTRAIRE + SOMME des 6 meilleures valeurs avec condition par participant
Réponses
11
Affichages
284
Poulet13
  • Résolu(e)
Microsoft 365 Masquer des colonnes aux cellules avec valeurs données selon sélection d'une liste déroulante
Réponses
5
Affichages
987
PatFr38
R
  • Résolu(e)
Autres Masquer des lignes et colonnes en fonction d'une valeur d'un menu déroulant
Réponses
1
Affichages
513
Romain77144
R
R
  • Résolu(e)
Autres Réorganiser ou masquer suivant un menu déroulant
2
Réponses
15
Affichages
925
Phil69970
Z
  • Résolu(e)
XL 2021 Tester l'existence d'un nom d'onglet
Réponses
3
Affichages
448
jm.andryszak
J
W
  • Question Question
XL 2019 Transformer des lignes de codes pour pratiquer Tablo à 4 colonnes et 40 lignes
2 3
Réponses
40
Affichages
1 K
Webperegrino
W
  • Question Question
XL 2021 Aide pour recherche intuitive
2
Réponses
16
Affichages
937
jeff1494
  • Question Question
Microsoft 365 Variable tableau : coller uniquement une partie des colonnes
2 3
Réponses
31
Affichages
1 K
BenHarber
  • Résolu(e)
XL 2013 (RESOLU) Afficher / Masquer des lignes et des colonnes selon les valeurs de deux cellules
Réponses
2
Affichages
583
chaelie2015
H
  • Résolu(e)
XL 2021 Comment masquer des colonnes sur un planning en changeant les mois
2 3
Réponses
41
Affichages
3 K
TooFatBoy
E
  • Question Question
XL 2021 Masquer des colonnes plus rapidement qu'avec Selection.EntireColumn.Hidden = True
2
Réponses
25
Affichages
3 K
ESCOUGER2022
E
S
  • Question Question
XL 2019 Excel 2019 VBA macro masquer lignes et colonnes vides
2
Réponses
29
Affichages
2 K
sofmat
S
L
  • Question Question
XL pour MAC tableau ans perturbation des colonnes non copié
Réponses
5
Affichages
676
DJunqueira
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…