Buongiorno.

Problema della domenica.

Nella mia tabella ho un campo in cui viene riportato l'indirizzo mail. Ho inserito un pulsante che una volta che viene cliccato apre il client di posta elettronico predefinito e inserisce automaticamente l'indirizzo mail della casella di testo.

La sub è questa e funziona

codice:
Private Sub mandamail_Click()
On Error GoTo Err_mandamail_Click

    Dim stDocName As String

    stDocName = "Empty_Report"
   ' DoCmd.SendObject acReport, stDocName
    DoCmd.SendObject acSendNoObject, stDocName, acFormatXLS, Me.mail, , , "", , True
Exit_mandamail_Click:
    Exit Sub

Err_mandamail_Click:
    MsgBox Err.Description
    Resume Exit_mandamail_Click
    
End Sub
anche se magari c'è del codice superfluo ma non saprei dove mettere le mani.
Ovviamente se l'utente non ha un indirizzo mail vorrei che il pulsante non venisse visualizzato visto che cliccandolo appare il messaggio "Tipo di dati dell'espressione errato per uno degli argomenti".
Ho provato a fare un if e a impostare la proprietà visible del pulsante a false ma non riesco a farla funzionare.

Come posso risolvere? Grazie e buona domenica a tutti.