erreur 1004 méthode 'range' de l'objet '_global' a échoué

[good57]

Bonjour,

J'ai voulu créer 2 macros qui semblent simples.
L'une pour masquer certaines lignes et colonnes en cliquant sur le bouton ROUGE.
L'autre pour afficher ces lignes et colonnes en cliquant sur le bouton VERT.

Mais j'ai toujours ce message d'erreur qui revient lorsque je veux masquer mes cellules et je n'arrive pas à me dépatouiller !

erreur 1004 méthode 'range' de l'objet '_global' a échoué

Merci

 

[Dranreb]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Bonjour.
Essayez peut être comme ça :

Sub MWZeilenAusblenden()
ActiveSheet.[A4:A65536].SpecialCells(xlCellTypeConstants, 2).EntireRow.Hidden = True
ActiveSheet.Columns("AW:IV").Hidden = True
End Sub
Sub MWZeilenAnschlagen()
ActiveSheet.Rows.Hidden = False
ActiveSheet.Columns.Hidden = False
End Sub

 

[good57]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Salut Dranreb,
Avant tout, merci pour ta réponse.
Ta macro fonctionne très bien, mais j'aimerai comprendre à quel endroit tu as entré les lignes et colonnes à masquer !?

 

[Dranreb]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Les lignes sont les lignes entières des cellules de la plage A4:A65536 contenant des constantes texte.
Pour les colonnes c'est clair, non ?

 

[good57]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

ok,
désolé mais ça n'est pas tout à fait ça.
Dans mon fichier Excel que je t'ai envoyé, ca fonctionne très bien, ca ne fonctionnera pas dans mon "vrai fichier" car j'ai aussi des lignes à masquer dont les cellules ne sont pas toutes des constantes :/

 

[Dranreb]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Voir s'il est possible de les cerner par un SpecialCells(xlCellTypeFormulas,…) pour les masquer aussi par une deuxième instruction.

 

[good57]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Ok, mais sinon, sais-tu me dire pourquoi ma macro initiale ne fonctionne pas ?

 

[Dranreb]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Il pouvait y avoir plusieurs raisons, et je ne suis pas parvenu à trouver une expression qui marchait.
La méthode Range de l'objet Application est plus délicate que celle de l'objet Worksheet. C'est le bouton de formulaire qui est peut être sélectionné quand on lance la macro et non la feuille, et dans ce cas je ne sais même pas si elle essaye d'assumer quelque chose.
Le ";" est surtout un séparateur français de zone de plages multi-zones. Mais même en les remplaçant par "," ça ne marchait pas: Erreur définie par l'objet ou par l'application.

 

[good57]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Ok, merci bien !!

 

[good57]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Je ne m'en sors toujours pas.
Solution alternative :
Comment masquer toutes les lignes dont la 1ere cellule est vide ?
Idem pour les colonnes ?

 

[Dranreb]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

ActiveSheet.Columns(1).SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
ActiveSheet.Rows(1).SpecialCells(xlCellTypeBlanks).EntireColumn.Hidden = True

 

[good57]

Re : erreur 1004 méthode 'range' de l'objet '_global' a échoué

Mer, ca fonctionne très bien comme ça !