Ciao a tutti,
premetto che non sono una programmatrice, ma mi è necessario il calcolo dei giorni lavorativi tra due date ed escludere dal conteggio o giorni da calendario festivi.
Ho fatto quindi una tabella access "CALENDARIO" con un solo campo FESTIVO, ed un altra tabella di prova tNumSeq con 3 campi:
-Giorno_inizio
-Giorno_fine
-Giorni_lav
Tramite tutorial, sono riuscita a creare la mia prima funzione (ovviamente banale), oltre questo non riesco ad andare:
Private Sub Comando0_Click()
Dim Rs1 As DAO.Recordset
Set Rs1 = CurrentDb.OpenRecordset("Select * From tNumSeq Where Giorni_lav=0")
If Rs1!Giorni_lav = 0 Then
Rs1.Edit
Rs1!Giorni_lav = Rs1!Giorno_fine - Rs1!Giorno_inizio
MsgBox ("Aggiornato")
Rs1.Update
Rs1.Close
End If
Set Rs1 = Nothing
End Sub
Mi sapreste completare il codice per il calcolo dei giorni lavorativi?
Vi ringrazio in anticipo!!!!