23-09-15, 22:01
|
| Όνομα: Γιώργος Έκδοση λογισμικού Office: Ms-Office 2010 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 18-06-2010
Μηνύματα: 3.674
| |
Καλησπέρα
Σπύρο βλέποντας τον κώδικα διαπίστωσα ότι στη γραμμή:
Do Until WorksheetFunction.Days360(startDate, dt + 1) = iDays
το σύμβολο = θα πρέπει να αντικατασταθεί με το >=
Δηλαδή η γραμμή κώδικα να γίνει:
Do Until WorksheetFunction.Days360(startDate, dt + 1) > = iDays
|