Bonjour,
J'ai ce code qui fonctionne très bien pour pouvoir incrémenter une date. Je souhaiterais l'adapter pour que l'incrémentation ne prenne pas en compte les jours du week-end.
Est-ce que c'est réalisable?
Mes meilleures salutations,
Thierry
J'ai ce code qui fonctionne très bien pour pouvoir incrémenter une date. Je souhaiterais l'adapter pour que l'incrémentation ne prenne pas en compte les jours du week-end.
Est-ce que c'est réalisable?
VB:
'Pour incrémenter la date ou insérer la date du jour par double clics
If Not Intersect(Target, Range("B:B")) Is Nothing And Target.Row > 1 Then
Cancel = True
If Target = "" And Target.Offset(-1, 0) <> "" Then
Target = Target.Offset(-1, 0) + 1
ElseIf Target = "" And Target.Offset(-1, 0) = "" Then
Target = Format(Now, "dd.mm.yyyy")
Else
Target = ""
End If
End If
Mes meilleures salutations,
Thierry