masquer colonnes

[lio]

Bonjour le forum,

Sur un calendrier, je désire masquer 2 colonnes si nous ne sommes pas en année bissextiles.

J'ai donc écrit ce bout de code mais il ne fonctionne pas ( mes colonnes restent tjs masquées ???)

Voici le code:

Private Sub Worksheet_Activate()' feuil fev
If Range('C2') DIFFERENT DE 2008 Or 2012 Or 2016 Then
[BG6:BH6].EntireColumn.Hidden = True
End If
End Sub

Mon année se trouve dans la cellule C2.

Je suis encore débutant et je ne comprends plus là

Merci pour votre aide et vos explications.

[PascalXLD]

Bonjour

il faut

If Range('C2') DIFFERENT DE 2008 Or Range('C2') DIFFERENT DE 2012 Or Range('C2') DIFFERENT DE 2016 Then

Bon courage

[Jacques87]

Bonjour Lio

If Range('C2') DIFFERENT DE 2008 Or 2012 Or 2016 Then

doit s'écrire

If Range('C2') DIFFERENT DE 2008 Or Range('C2')DIFFERENT DE2012 Or Range('C2') DIFFERENT DE 2016 Then

j'ai vu passer une subtilité du genre

If Range('C2') DIFFERENT DE ( 2008 Or 2012 Or 2016) Then

si je ne trompe, mais sans certitude au niveau du 'parenthésage'

Bonne journée

[Jacques87]

Oups, bonjour Pascal
entre autres connais-tu la deuxième écriture d'un ou multiple que j'ai vu passe'r un jour sur le Forum ?

Amicalement

[lio]

Bonjour Jacques et Pascal,

Merci beaucoup pour ces réponses aussi rapides et concordantes.

Bonne semaine.

[lio]

Re,

Pardon mais j'ai toujours un problème.

Ci joint, un exemple bidon puisque c'est sur le feuille de Fevrier qu'il faudrait agir

Malgrè le changement de date, les colonnes restent masquées ...

Merci pour votre aide. [file name=PlanningV4_20060130130645.zip size=13543]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/PlanningV4_20060130130645.zip[/file]

[Jacques87]

Re Lio

Ta procédure ne fonctionnait qu'à l'activation de la feuille, or il me semble que tu veuilles la faire fonctionner à chaque changement de date

Voila ce que je propose

PS: merci pour le petit message super sympa que tu as laissé sur mon livre d'or [file name=PlanningV4_20060130131639.zip size=13714]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/PlanningV4_20060130131639.zip[/file]

[lio]

Merci Jacques de me venir en aide, mais je n'ai pas le résultat que je recherche.

Par exemple:

Si l'année est 2006 alors les colonnes sont masquées

A contrario, si l'année est 2008 alors les colonnes doivent s'afficher.

Or, j'ai l'impression que rien ne bouge !

[PascalXLD]

Re

Si j'ai bien compris [file name=PlanningV4_20060130133726.zip size=13462]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/PlanningV4_20060130133726.zip[/file]

[Jacques87]

Lio

J'ai fait un suivi pas à pas de la procédure et en effet j'ai constaté que mêmem si l'année est 2008 le test est négatif, c'est à dire que les colonnes secachent
J'ai vu de plus que tu as certainement du scinder des cellules et nommer le groupe 'an'.
Or dans ce groupe se trouve la cellule C2 à partir de laquelle le test se lance.
Le problème est certainement du à cet état de fait
Pour le vérifier, jette un coup d'oeil sur le fichier que je t'envoie après avoir mis un point d'arrêt au début de la procédure
Tu contateras que malgré le test sur la cellule sélectionnée, ici C2, le test sur sa valeur est shunté, mais si un deuxième clic en C2 tu permets de lire le test sur la date (qui ne martche pas d'ailleurs)
A approfondir [file name=PlanningV4_20060130134916.zip size=14639]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/PlanningV4_20060130134916.zip[/file]

Post nul et non avenu, Pascal t'apporte la solution, mais je reste surpris par ce qui se passe dans le fichier joint

Message édité par: Jacques87, à: 30/01/2006 13:51

[lio]

Re, Pascal,

Ton exemple ne marche pas non plus. :unsure:
Je dois mal m'exprimer!

Ce code doit me permettre de faire une gestion d'erreur supplémentaire pour que l'utilisateur n'est pas l'occasion de se tromper.

A savoir: lors d'une année bissextile( soit 2008 par ex), les colonnes doivent s'afficher sinon on les masques pour les années 2006/2007/2009...

Bon l'exemple que j'ai donné est bidon car c'est bien sur la feuille 'Fevrier' que je placerais ce code. En fait, dans ce test si C2 = 2006/2007... on masque le 31 ème jour.
Si l'année est 2008 alors le 31éme jour doit apparaitre .

Merci.

[jmps]

Bonjour lio, Pascal, Jacques,

J'ai aussi un peu de mal avec ce fil (imbrog)lio

Si tu parles d'années bissextiles pour une feuille 'Février', il n'y a pas de 31. Ni de 30. Il faut juste jouer sur le 29 et le cacher ou l'afficher.

Je crois aussi qu'il manque un truc à ton code (en reprenant l'exemple de Pascal):

If Range('C2') DIFFERENT DE 2008 Or Range('C2') DIFFERENT DE 2012 Or Range('C2') DIFFERENT DE 2016 Then
[BG6:BH6].EntireColumn.Hidden = True
Else
[BG6:BH6].EntireColumn.Hidden = False
End If

Là encore, c'est pas tout à fait exact puisqu'on ne joue que sur une seule colonne.

[lio]

Ok, Jacques,

Je vais voir si je peux contourner le problème.

Merci donc à vous deux.

[PascalXLD]

Re

Bizarre car à moins que je ne me sois planté de fichier mais quand je mets 2008 ou 2012 j'ai bien les colonnes BK et BL qui s'affichent alors que sinon elles se masquent

je renvoie le fichier pour voir [file name=PlanningV4_20060130141224.zip size=13500]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/PlanningV4_20060130141224.zip[/file]

[lio]

Bonjour Jmps,

Ok pour le 29.

Par contre tu dis :Là encore, c'est pas tout à fait exact puisqu'on ne joue que sur une seule colonne.

Pour moi, je crois qu'il y a deux colonnes !(BG6 et BH6). Non?