Buonasera, vorrei che all'apertura del file la userform che si apre abbia nell'intestazione che è una label, sia la data, e qui no problem, che anche l'orario del momento/pc. Con queste istruzioni
Private Sub UserForm_Activate()
Sheets("DATI").Select
d = Format(Date, "dddd" & "dd" & " h.m") '(chiaro che sto mescolando data e orario, ma non so come risolvere)
Trimma = Trim(d)
Iniziale = Left(Trimma, 1)
Resto = Mid(Trimma, 2)
Label28.Caption = "Oggi : " & UCase(Iniziale) & Resto
etc. etc.
mi appare
Oggi: Mercoledì 11 febbraio 2015 0.0.
Vi ringrazio dell'aiuto.
Un cordiale saluto
Enrico
Registrazione