Selection.EntireColumn.Hidden = True ne fonctionne pas ?
Résolu
Ribanjo
Messages postés
8
Statut
Membre
-
Ribanjo Messages postés 8 Statut Membre -
Ribanjo Messages postés 8 Statut Membre -
Bonjour,
J'ai pris un exemple dans un livre de VBA pour les NULS (page 55) mais ça plante à l'exécution. Je ne vois pas où est l'erreur?
Sub MasquerToutSaufVueUtilisateur()
ActiveWindow.Panes(1).Activate
Columns("Q:Q").Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.EntireColumn.Hidden = True
ActiveSheet.Shapes.Range(Array("Group Box 95")).Select
' faire hidden sur le box &H8000000F& (blanc) l'instruction suivante ne fonctionne pas non plus???
' ActiveSheet.Shapes.Range(Array("Group Box 95")).BorderColor = &H8000000F
Rows("338:381").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.EntireRow.Hidden = True
Range("A").Select
End Sub
J'ai pris un exemple dans un livre de VBA pour les NULS (page 55) mais ça plante à l'exécution. Je ne vois pas où est l'erreur?
Sub MasquerToutSaufVueUtilisateur()
ActiveWindow.Panes(1).Activate
Columns("Q:Q").Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.EntireColumn.Hidden = True
ActiveSheet.Shapes.Range(Array("Group Box 95")).Select
' faire hidden sur le box &H8000000F& (blanc) l'instruction suivante ne fonctionne pas non plus???
' ActiveSheet.Shapes.Range(Array("Group Box 95")).BorderColor = &H8000000F
Rows("338:381").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.EntireRow.Hidden = True
Range("A").Select
End Sub
A voir également:
- Excel vba entirecolumn.hidden
- Acronis true image - Télécharger - Sauvegarde
- True crypt - Télécharger - Chiffrement
- True caller avis ✓ - Forum Logiciels
- True launch bar - Télécharger - Divers Utilitaires
- Testingcheats true ne fonctionne pas - Forum Jeux vidéo
