Dim NumFT as string
NumFT  = Form_Macshera1_Testo3.text
MsgBox "Registrazione Fattura n° " & NumFT & " effettuata correttamente", vbInformation, "Gestione Fatture"