Saltare sabati e domeniche



  • Saltare sabati e domeniche
    di Nena88 (utente non iscritto) data: 03/08/2015 15:31:17

    Ciao a tutti...Ho un problema... data ad esempio la data 1/06/2015 ho due giorni tempo per compiere un'attività. Se ci impiego più di due giorni l'attività è eseguita Overtime, viceversa sarà On time. Se la data di start dell'attività è di venerdi la data di scadenza ultima sarebbe il martedì successivo (ovvero l'attività è on time fino a martedi e overtime dal mercoledi in poi). Non riesco a scrivere il codice.
    Io sono nuovissima con VBA, spippolando sul forum ho trovato dei codici che girano, ma facendo dei test non mi danno il risultato corretto.

    Potete aiutarmi...non capisco dove sbaglio!!! Sono solo due settimana che ho iniziato con VBA!!!!

    Grazie a chi risponderà!!!!!!!!!!!
     
    Public
    Data = Sheets("Operativo").Cells(KP, 9) 'imposta come data di partenza la MO date
    LT = 2 'imposta lead time
    Num_Giorni = LT 'definisce variabile di incremento dei giorni LT
    
     Do While Num_Giorni > 0
          If Weekday(Data, 2) < 6 Then  'calcola se è un  giorno lavorativo o weekend
           Festività = False
            If Not Festività Then Num_Giorni = Num_Giorni - 1 ' se non è festivo mi scala di 1 giorno il LT
          End If
          Data = Data + 1 'Incrementa la data di 1 e guarda se è festivo o no 
        Loop
    
    If Data - Sheets("Operativo").Cells(K, 9) <= LT Then
               Sheets("Operativo").Cells(KP, 4).Value = "On Time"   
            Else
               Sheets("Operativo").Cells(KP, 4).Value = "Overtime" 
            End If



  • di Vecchio Frac data: 03/08/2015 15:52:37

    @nena88
    Gentilmente inizia una nuova discussione. Questa purtroppo è finita come risposta a una discussione già iniziata da frankmac.





  • di alfrimpa data: 03/08/2015 15:57:07

    Ciao Nena e benvenuta.

    Ti sei accodata, probabilmente non volendo, ad una discussione preesistente.

    Per avere maggiore visibilità ti consiglio di aprirne una nuova "tua" e di allegare un file di esempio dove illustri la situazione di partenza ed il risultato che vuoi ottenere (riporta anche l'intero codice che eventualmente hai scritto).

    Alfredo