problème de date

[modus57]

Bonsoir le forum

J’ai un petit souci de date

Comment écrire dans la colonne C le texte « férié » en fonction de la date dans la colonne A et la liste en colonne nommée « fériés »

Ci-joint fichier exemple pour mieux expliquer le problème

Quelqu’un pourrait-il m’aider

Merci d’avance à +

 

[Charly2]

Bonsoir modus57

Sans fichier, ça va pas être facile

Exemple en ligne 2 avec une plage nommée Feries, formule à placer en cellule C2 :

=SI(NB.SI(Feries;A2);'Férié';'')

Tiens nous au courant

A+

 

[modus57]

Bonsoir Charly2

Merci pour ta réponse

Mais je souhaiterai le faire par code VBA

Est-ce possible

A +

 

[Charly2]

Re

En vba, c'est tout à fait faisable également. Mais là, il vaut mieux avoir l'organisation de tes données sous les yeux.

Peux-tu joindre un fichier exemple simple ?

A+

 

[modus57]

Bonjour Charly2, le forum

Rechercher dans selection A2:A32 une valeur = à une valeur de la zone nommée 'fériés' ecrire sur la même ligne dans la colnne C le texte 'férié'

Exemple si dans la selection A2:A32 la valeur 01/01/2006 = jour de l'an de la zone nommée 'fériés'

J'epère être assez clair je te joint le fichier pour t'aider

A bientôt

 

[Charly2]

Re modus57,

Bon, un bout de code à placer dans un module et à déclencher par bouton par exemple :

Option Explicit

Sub BoutonFeries_QuandClick ()
'
Dim Cell As Range
'
  For Each Cell In Range('A2:A32')
    If WorksheetFunction.CountIf(Range('fériés'), Cell) = 1 Then
      Cell.Offset(0, 2) = 'FERIE'
    End If
  Next Cell
End Sub

A+

 

[modus57]

Bonsoir Charly2

C'est exactement ce que je cherchais
Je te remercie sincèrement pour ton aide,
cela me permet de gagner du temps

Super sympaaaaaaaaaaaaa

Bonne nuit