elioeco
00martedì 20 settembre 2022 15:59
Salve a tutti,
rieccomi per un nuovo piccolo (per Voi, per me che sono una schiappa è enorme!!!) problema.
Nel codice VBA di un file ho posto questa condizione:
Dim Fer_Fes As Boolean, Orario As Boolean
If Time >= 7 / 24 And Time <= 20 / 24 Then (se la condizione è vera, apre il Foglio1, altrimenti apre il Foglio2).
sono quindi legato ad orari, diciamo così, interi: dalle 07 alle 20 apre il Foglio1; dopo le 20, fino alle 07 del mattino, aprirà il Foglio2.
La mia domanda è questa: come posso scrivere gli orari tenendo presente anche dei minuti?
Una cosa del tipo:
If Time >= 6,56 / 24 And Time <= 19,51 / 24 Then....
che però scritta così pare che se ne freghi dei minuti (infatti è come se avessi scritto 6 / 24 e 19 / 24).
Magari la soluzione è stupida e probabilmente io lo sono ancor di più.
Mi rimetto alla Vostra pazienza.
Grazie.
Elio
federico460
00mercoledì 21 settembre 2022 15:35
ciao
If Time >= TimeSerial(15, 31, 0) And Time <= TimeSerial(15, 35, 0) Then
Sheets("foglio1").Select
Else
Sheets("foglio2").Select
End If
elioeco
10giovedì 22 settembre 2022 15:07
Grazie Federico!!!
In realtà avevo visto questa funzione (TimeSerial) ma non sapevo come utilizzarla e se era possibile associarla alla funzione Time.
Caso risolto.
Siete fantastici e sempre pronti ad aiutare!!!
Grazie ancora.
Elio