unter meinem Menü Datei fehlt mir das Untermenu "senden", dass bei einigen Rechnern bei uns in der Firma unter dem Untermenu "drucken" liegt. Als Mailprogramm haben wir Lotus 5.0 im Einsatz.
Was muss ich tun, um dieses Menu zu aktivieren?
Gunter
Sub Ein()
On Error Resume Next
Application.CommandBars(1).Controls("Datei").Controls("Senden an").Visible = True
End Sub