OVH Cloud OVH Cloud

Procédure qui plante Evaluate et textbox

2 réponses
Avatar
Florian
Bonjour
J'ai téléchargé la procédure d'Alain VALLON qui se trouve dans son classeur
j'essaie de l'adapter pour 2 textbox, mais cela plante et me renvoie "erreur
13"
Merci pour votre aide
Flo riant

'les sam., dim. et jours fériés sont décomptés

TextBox11.Value = ("SUM((WEEKDAY(ROW(" & TextBox9 * 1 & _
":" & TextBox10 * 1 & "),2)<6)*ISNA(MATCH(ROW(" & TextBox9 * 1 & ":" & _
TextBox10 * 1 & "),jours_fériés,0)))")

2 réponses

Avatar
AV
Sous réserve de la saisie de dates en TextBox9 et TextBox10 :

TextBox11= Evaluate("SUM((WEEKDAY(ROW(" & CDate(TextBox9) * 1 & _
":" & CDate(TextBox10) * 1 & "),2)<6)*ISNA(MATCH(ROW(" & CDate(TextBox9) * 1 &
":" & _
CDate(TextBox10) * 1 & "),jours_fériés,0)))")

AV
Avatar
Florian
C'est tout simplement parfait
Un très grand merci !!!
Flo riant

"AV" a écrit dans le message de news:

Sous réserve de la saisie de dates en TextBox9 et TextBox10 :

TextBox11= Evaluate("SUM((WEEKDAY(ROW(" & CDate(TextBox9) * 1 & _
":" & CDate(TextBox10) * 1 & "),2)<6)*ISNA(MATCH(ROW(" & CDate(TextBox9) *
1 &
":" & _
CDate(TextBox10) * 1 & "),jours_fériés,0)))")

AV