Questione : Copiare lo strato attivo per inviare con la posta elettronica il corpo risparmiano per disegnare il dispositivo di piegatura

Ciao esperti,

I using la macro del Ron de Bruin qui sotto per trasmettere uno strato attivo di Excel 2007 come il corpo di un email via la prospettiva 2007 sul mio con computer personale con successo. Purtroppo ottengo gli avvertimenti di sicurezza quando usando questa macro sul lavoro using l'ufficio 2003 e non ho privilegi amministrativi da installare aggiungo per aggirare la sicurezza warnings.

I stavo domandando se tutto abbiate saputo emendare la macro per conservare il email al dispositivo di piegatura delle brutte copie nella prospettiva invece di invio del email?
Sendrng fioco del

Thanks

Sub Send_Selection_Or_ActiveSheet_with_MailEnvelope () come introduzione fioca di Range
come introduzione del
di String
= CStr (InputBox (“entrare nel email Commments introduttivo: "))

sull'errore StopMacro

con Application
.ScreenUpdating = False
.EnableEvents = False
estremità With

“: se la selezione è una cellula che trasmetterà all'intero worksheet
Sendrng = Selection

“genera la posta e trasmettere il it
con Sendrng

ActiveWorkbook.EnvelopeVisible = True
con. Parent.MailEnvelope

„ ha regolato il giacimento facoltativo dell'introduzione che è adds
„ un certo testo dell'intestazione al email body.
. Introduzione =

(di introduzione) “in “con. Parte dell'articolo„ potete aggiungere più options
„ vedere che le punte su questo la prospettiva esempio rel= " nofollow " " del _blank " " del target= " di http://www.rondebruin.nl/mail/tips2.htm del href= di “> ail/tips2.htm
di http://www.rondebruin.nl/m con. Item
. Per = “
di Dislist di giro d'affari di CLE ". L'oggetto = “CLE C-Controlla il giro d'affari "
„. Display
. Estremità With

StopMacro di With
di conclusione di With

di conclusione di Send
:
con Application
.ScreenUpdating = True
estremità With
ActiveWorkbook.EnvelopeVis/>ible = False

End Sub

class= del

Risposta : Copiare lo strato attivo per inviare con la posta elettronica il corpo risparmiano per disegnare il dispositivo di piegatura

Non immediatamente alle brutte copie ma alla sostituzione:

. Trasmettere
con
.save

lo conserverà nel inbox.

Chris
Altre soluzioni  
 
programming4us programming4us