Bonjour à tous,
Ci-dessous ma macro qui ne fonctionne pas vraiment comme je voudrais.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub Masquerlignesplanningpourimpression() ' ' Cacher lignes des calculs pour impression planning Macro ' Macro enregistrée le 14/01/2008 par macat ' Macro dans VBA PERSO.xls module 9 ActiveWindow.Activate Range("9:16,22:29,35:42,48:55,61:68,74:81,87:94,100:107,113:120,126:133,139:146,152:159,165:172,178:185,191:198,204:211").Select Selection.EntireRow.Hidden = True ActiveWindow.SmallScroll Down:=-75 Range("A3").Select End Sub
1) Pour masquer pas de soucis, le processus est un peu long mais je m’en accommode. Puis j’ai fabriqué un petit bouton et je suis fière d’y être arrivé !!!.
Je pense que dans cette macro des choses manquent et que d’autres ne sont pas nécessaires. Je n’ai pas la connaissance pour savoir sur l’instant quoi. Par contre lorsque je fais réapparaitre les lignes, les calculs ne se remettent pas en place normalement. Même après avoir demandé à recalculer. Je suis obligée de rentrer dans chaque cellule pour que réapparaisse le calcul demandé. Une horreur !!!
2) Entre temps mon tableau a grandi en nombre de ligne.
Donc j’ai plutôt essayé de voir avec une macro qui masque la ligne entière quand sa cellule en colonne A (qui est sans MFC) est de couleur « lavande (color 17)» et/ou aussi de couleur « Rose saumon (color 38)», et à partir de la ligne 4.
J’ai trouvé sur le net si la cellule a une valeur 0, que j’ai essayé de transformer en tenant compte de la couleur. Je n’ai pas réussi.
Merci à vous de m’aider à trouver la réponse.
Partager