Userform Error Check and Textbox Help

Try this

Private Sub Done_Click()
    Dim oCtrl As MSForms.Control
    Dim blnFileOpened As Boolean
    For Each oCtrl In Me.Controls
        If TypeName(oCtrl) = "TextBox" & oCtrl = Empty Then
            MsgBox "Please complete all text boxes", vbCritical, "Input required"
            Exit Sub
        End If
    Next oCtrl
    
    Initialize.Hide
    blnFileOpened = OpenText
    If blnFileOpened Then
        Call Destrezas
    End If
    Unload Me
End Sub

For entering data see the DatabaseForm