Sur passage d'une cellule affichage d'information

[tinet]

Bonjour le forum,


Il y a t'il une solution sur le passage d'une cellule de faire apparaitre
Dans un calendrier perpétuel les jours fériés.

 

[tinet]

Re : Sur passage d'une cellule affichage d'information

bonsoir le forum,

J'ai trouver sa sur le forum

Mais comment modifier mon fichier


a+

 

[JCGL]

Re : Sur passage d'une cellule affichage d'information

Bonjour à tous,

Mise en place du code JB (Boisgontier) sur ton fichier

A+ à tous

Édition : Modification du fichier pour tenir compte des fériés sur deux années

 

[tinet]

Re : Sur passage d'une cellule affichage d'information

Bonsoir jgcl le forum,

Merci, mais il y a un probléme quand on change d'année sa ne mache plus.

Je pense que le fichier trouver pause problème sur les fonctions.

A+

 

[JCGL]

Re : Sur passage d'une cellule affichage d'information

Bonjour à tous,

Il est quasiment impossible qu'un code déposé par JB ne fonctionne pas : c'est mon "adaptation" qui fait défaut...

J'ai rajouté "Cel.ClearComments"

Remplace la Sub MaJ() par celle-ci :

Sub MaJ()
    With Sheets("Planning")
        For Each Cel In [B5:AJ35]
            Cel.ClearComments
            p = Application.Match(Cel, Application.Index([TabloFer], , 1), 0)
            If Not IsError(p) Then
                Temp = Sheets("planning").Range("TabloFer").Cells(p, 2)
                If Cel.Comment Is Nothing Then Cel.AddComment
                Cel.Comment.Text Text:=Temp
                Cel.Comment.Shape.TextFrame.AutoSize = True
            End If
        Next Cel
    End With
End Sub

A+ à tous

 

[tinet]

Re : Sur passage d'une cellule affichage d'information

Bonjour JCGL le forum,

Merci JCGL, ta formule est mieux.
j'avais trouver la solution suivante

Cells.Select
Selection.ClearComments

A+