VBA ExcelInviare immagine con thunderbird

Hai un problema con Excel?

Nuova discussione

[VBA Excel]Inviare immagine con thunderbird
di Marco Augusto (utente non iscritto) data: 29/08/2017 16:32:34
Salve a tutti
ho questa semplice macro per inviare email con thunderbird da un foglio excel e funziona perfettamente (Sendmail)

Ora vorrei inviare come CORPO dell'email una immagine creata sempre con excel con il generatore di macro quest'altra (Macro 3)
Come fare ? Ho cercato un po' ovunque ma gli unici esempi sono con immagini esterne ad Excel.

P.S. ho postato per errore in "Excel e gli applicativi Microsoft Office" la riposto qui per correttezza (non so come cancellarla lì)

Sub sendmail() 
Dim BodyMsg As String, Indirizzo As String, Oggetto As String 
    BodyMsg = Range("A3:").Value 
        Indirizzo = Range("A1").Value 
    Oggetto = Range("A2").Value 
        Shell "C:Program Files (x86)Mozilla Thunderbird	hunderbird -compose " _ 
        & Chr$(34) & "to='" & Indirizzo & "',subject='" & Oggetto & "',body='" & BodyMsg _ 
        & Chr$(34), vbNormalFocus 
    Application.Wait Now + TimeValue("00:00:03") 
    SendKeys "^{ENTER}" 
End Sub 


Sub Macro3()
    Range("C25:E38").Select
    Selection.Copy
    Range("H6:J19").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
    Selection.Copy
    Range("H25").Select
    ActiveSheet.Pictures.Paste.Select
    ActiveSheet.Shapes.Range(Array("Picture 24")).Select
    Range("G23").Select
    ActiveSheet.Shapes.Range(Array("Picture 24")).Select
    Selection.ShapeRange.Shadow.Type = msoShadow34
    With Selection.ShapeRange.Line
        .Visible = msoTrue
        .ForeColor.RGB = RGB(0, 112, 192)
        .Transparency = 0
    End With
    With Selection.ShapeRange.Line
        .Visible = msoTrue
        .Weight = 2.25
    End With
    Range("L22").Select
    ActiveSheet.Shapes.Range(Array("Picture 24")).Select
    Application.CutCopyMode = False
    Selection.Copy   
End Sub

di tanimon data: 29/08/2017 19:00:22
ciao,
non è bello fare una domanda già fatta ad altri...

Avresti potuto aspettare una risposta da loro,
non ti pare?

w w w forumexcel.it/ forum/7-domande-su-excel-vba-e-macro/10682- inviare-immagine-excel-con-thunderbird
di marco (utente non iscritto) data: 30/08/2017 10:30:04
Tanimon... la domanda posta è di carattere generale e non personale ... non ho chiesto di uscire a due donne contemporaneamente ...
Al di là che secondo la tua opinione ciò non sia "bello", perché non avrei la facoltà di effettuare la medesima domanda a più persone ?
di tanimon data: 30/08/2017 11:22:05
Ciao Marco,
la mia opinione non ha importanza.....
Le regole stabilte da chi gestisce un Forum,
invece ce l'hanno.
La maggior parte dei Forum, hanno il proprio regolamento
in evidenza, basta leggerlo ed osservarlo.
Buona giornata.

Frank
di Marco (utente non iscritto) data: 30/08/2017 11:25:42
Ne prendo atto.
di Albatros54 data: 30/08/2017 11:25:49
@ Marco:
Regola numero 11 del Forum
11) Non inviare messaggi uguali o su Forum diversi
Scrivi un messaggio una sola volta, poi attendi pazientemente la risposta. Invia un solo messaggio per segnalare lo stesso problema! Se nessuno ti risponde può voler dire due cose: hai scritto in maniera talmente incomprensibile che nessuno ha avuto il coraggio di risponderti o la capacità di comprendere il tuo quesito; oppure nessuno ha trovato soluzione al tuo problema (magari la soluzione non c'è ancora).
Se ci sono nuovi problemi per quanto riguarda la "vecchia" domanda, basta seguire il primo thread e agganciare un post a esso. Evita di scriverne uno nuovo!
Non ripubblicare la stessa domanda più di una volta magari in sezioni diverse del Forum: in tal modo causi solo una perdita di tempo ai Moderatori, che invece potrebbero impegnare il proprio tempo per aiutare altri utenti.
Se la pubblicazione doppia di una stessa domanda è dovuta a errori tecnici, puoi segnalare l'anomalia mediante il Modulo Contatti
Non è educato neanche porre la stessa domanda su altri Forum esterni; questa tecnica, detta "crossposting", pur essendo generalmente tollerata, tuttavia è considerata contraria alle regole dell'educazione della rete. Così facendo rischi che nessuno impieghi il proprio tempo per dedicarti attenzione.
di Vecchio Frac data: 30/08/2017 11:29:58
Non l'avesse già fatto Albatros54, l'avrei fatto io ^_^
Non alimentiamo ulteriori flames.
In altri forum esistono regole più stringenti (che portano anche al blocco della discussione); qui non è così e la conseguenza è che chi vuol rispondere può farlo, altrimenti semplicemente si astiene.
Grazie a tutti per la collaborazione :)

cit. "ho postato per errore in "Excel e gli applicativi Microsoft Office" la riposto qui per correttezza (non so come cancellarla lì) "
---> Non si può cancellare una discussione una volta inviata, ci penso io a cancellare il doppione.
di Vecchio Frac data: 30/08/2017 11:35:38
Chiudo questa discussione perchè nell'altra ci sono già delle risposte pertinenti di patel edit by VF: e Friedrich.

Vuoi Approfondire?