Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
620to624
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
620to624
620to624
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Date senden unterbinden

Date senden unterbinden
14.06.2005 12:34:26
HS
Hallo,
ich suche eine Möglichkeit Datei, senden zu unterbinden. Für Datei speichern kann man dieses durch

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = True
End Sub

Gibt es etwas adäquates für Datei, senden?
Danke für Hilfe!
MfG, HS

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Date senden unterbinden
14.06.2005 14:32:52
Heiko
Hallo HS,
vielleicht nicht die Lösung die du suchst, aber senden an geht dann nicht mehtr (solange das Workbook auf ist).

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Worksheet Menu Bar").Controls("Datei").Controls("Senden an").Enabled = True
End Sub


Private Sub Workbook_Open()
Application.CommandBars("Worksheet Menu Bar").Controls("Datei").Controls("Senden an").Enabled = False
End Sub

Gruß Heiko

PS: Rückmeldung wäre nett !
AW: Datei senden unterbinden
14.06.2005 15:43:20
HS
Hallo Heiko,
schönen Dank! Das funktioniert super!
MfG, HS
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige