Impossible de lire la propriete Match de la classe WorksheetFunction

un grand bonjour à tous je suis tout nouveau sur ce groupe; Si une âme généreuse pouvez m'aider,

la recherche de la date du jour dans une colonne qui comportent les 365 dates de l'année me renvoie l'erreur du titre

Bonjour,

Une date, en VBA, est un nombre.

Remplace ta déclaration comme ceci :

Dim datedujour As Double 'ou Single

et ensuite :

datedujour = CDbl(Date)

Ainsi ta WorksheetFunction Match fonctionnera.

Bonjour,

Autre solution :

       ' Trouver la colonne correspondante à la dépense
    colonne = WorksheetFunction.Match(bazar, ws.Range("B1:BD1"), 0) + 1
       ' Trouver la ligne correspondante à la date du jour
    ligne = WorksheetFunction.Match(CStr(dateDuJour), ws.Range("A2:A367").Value, 0) + 1