[kapetang]

Καλησπέρα

Γιάννη, όταν ζητάμε λύσεις που απαιτούν κώδικα ή τύπους, πρέπει να είμαστε απόλυτα σαφείς.

Εκφράσεις «καθώς και εκτός απο ΡΕΠΟ έχω, ΑΣΘΕΝΕΙΑ , ΑΔΕΙΑ, ΑΝΕΥ ΑΠΟΔΟΧΩΝ, κλπ.» είναι απαράδεκτες.

Η λύση που σου προτείνω βασίζεται στην υπόθεση ότι οι εκφράσεις που χρησιμοποιούνται όταν απουσιάζει κάποιος, δεν περιέχουν το σύμβολο «:».

Στον κώδικα στη συνάρτηση WorkHoursWeekEnd κάνε τις ακόλουθες αλλαγές:

1) Άλλαξε τη γραμμή κώδικα κάτω από τη λέξη «Σάββατο» με την:

If InStr(strD1, ":") > 0 Then

2) Άλλαξε τη γραμμή κώδικα κάτω από τη λέξη «Κυριακή» με την:

If InStr(strD2, ":") > 0 Then

Φιλικά/Γιώργος