Frage : Aktives Blatt kopieren, um Körper zu mailen speichern, um Faltblatt zu zeichnen

Hallo Experten,

I morgens using das Makro Ronde Bruin unten, zum eines aktiven Blattes Excel-2007 als der Körper einer eMail über Aussicht 2007 auf meinem Personal-Computer mit Erfolg zu senden. Leider erhalte ich Sicherheitswarnungen, wenn ich dieses Makro bei der Arbeit using Büro 2003 verwende, und ich habe nicht die Verwaltungsprivilegien anzubringen hinzufüge an, um die Sicherheit warnings.

I zu verhindern wunderte, wenn aller Sie das Makro ändern können, um die eMail zum Entwurfsfaltblatt in der Aussicht zu speichern, anstatt, die eMail zu senden?

Thanks

Sub Send_Selection_Or_ActiveSheet_with_MailEnvelope ()
schwaches Sendrng als Range
schwache Intro als String

Intro = CStr (InputBox („eMail einleitendes Commments betreten: "))

auf Störung Goto- StopMacro

mit Application
.ScreenUpdating = False
/>
/> „Anmerkung: wenn die Vorwähler eine Zelle ist, die sie dem vollständigen worksheet
gesetztes Sendrng = Selection

„verursacht die Post schickt und it
mit Sendrng

ActiveWorkbook.EnvelopeVisible = True
mit. Parent.MailEnvelope

“ einstellte das wahlweise freigestellte Einleitungsfeld gs, das adds
“ etwas Überschrifttext zur eMail body.
ist. Einleitung = (Intro)

„in „mit. Einzelteil“ Teil können Sie mehr options
addieren,“ die Spitzen auf diesem Aussicht page.
sehen „ http://www.rondebruin.nl/m ail/tips2.htm
mit. Item
. Zu = „CLE Umsatz Dislist "
. Thema = „CLE C-Überprüfen Umsatz "
“. Display
. Send
Ende With

Ende With
Ende With

StopMacro:
mit Application
.ScreenUpdating = True
.EnableEvents = True
Ende With
ActiveWorkbook.EnvelopeVisible = False

End Sub

Antwort : Aktives Blatt kopieren, um Körper zu mailen speichern, um Faltblatt zu zeichnen

Nicht sofort zu den Entwürfen aber zum Ersetzen:

. Senden
mit
.save

speichert es im inbox.

Chris