Re : nb de colonnes trop important pour entirecolumn.hidden
Bonsoir,
Ci-joint un exemple qui permet de reproduire ton pb.
Le rectangle blanc a les proprietes "Ne pas deplacer / redimensionner avec les cellules" comme ton bouton.
Ce qui se passe dans mon exemple : si tu masques les colonnes, le rectangle ne bouge pas (cf. propriétés) mais les colonnes se masquent.
Donc le rectangles n'est plus dans la feuille de calcul !
Ca, c'est pas possible => plantage.
Dans ta feuille, il se passe un peu la meme chose.
Empiriquement, je dirais que quand tu demandes de masquer ce grand nombre de colonnes, il y a un moment où l'objet se retrouve hors de la feuille.
J'ai essayé de masquer les memes colonnes (dans ton fichier) par blocs successifs, pas de pb j'y arrive.
J'ai trouvé 4 solutions :
- mettre le bouton (les objets) dans la colonne A, il n'est pas dans la zone à masquer => pas de sortie de feuille.
- modifier les parametres du bouton => deplacer/redimensionner avec les feuilles
- augmenter la largeur des colonnes au de la de GD => l'objet ne sortira pas de la feuille. La largeur de masquage sera inférieure à la largeur des colonnes vierges.
- faire une boucle du type :
For Each X In Range(Cells(lig, col), Cells(lig, col2)).Columns
X.Hidden = True
Next
à la place de :
Range(Cells(lig, col), Cells(lig, col2)).EntireColumn.Hidden = True
Une fiche technique trouvée par BERRACHED said dans un autre Fil :
http://support.microsoft.com/kb/211769/fr