inviare celle selezione excel via mail

[disa1981]

Buon giorno
avrei bisogno di un grosso piacere
devo inviare tramite un pulsante e relativa macro un gruppo di celle selezionate in excel

il campo di celle selezionate è B2:K24
l'oggetto è NOTIFICA
e i 2 indirizzi email sono nelle celle N8 e N9

chi è cosi gentile da darmi una mano
grazie

[ricky53]

Ciao,
prima di tutto benvenuto nel nostro forum.

Nel forum l'argomento è stato trattato molte volte.

Prova a fare una ricerca con queste due parole "inviare email" ... troverai molte discussioni che ti potranno essere utili.

[disa1981]

Aiuto
ho trovato nel forum come fare:

Private Sub MAIL_Click()

Range("B2:K24").COPY
Destinat = Range("n8:s9") 'il tuo indirizzo di destinazione
Ogget = "FLIGHT NOTIFICATION" 'l' oggetto che vuoi tu
ActiveWorkbook.SendMail _
Recipients:=Destinat, Subject:=Ogget

End Sub

ma in questo modo mi invia tutto il foglio, a me servirebbero solo le celle selezionate
chi mi puoò dare una mano???

[Flash30005]

Registra con una macro che le incolli in un secondo foglio poi spedisci il secondo foglio

ciao

[disa1981]

ok
grazie alle passate discussioni sono riuscito a creare la macro che invia via mail il range di celle selezionato,
l'unico problema è l'impaginazione che mi ritrovo poi ricevendo la mail, praticamente non è molto leggibile
è possibile mantenere un'impaginazione più bella tipo creando un immagine o un html solo delle celle selezionate?
ho visto nel forum diverse discussioni a riguardo ma non riesco a trovare nulla da adattare
chi mi può aiutare?

per info il range di celle da inviare via mail è B2:K29 e avrei bisongno che mantenesse la stessa "grafica"
grazie
ciao

[Anthony47]

Prova a guardare questa discussione, che mi pare assolutamente simile alla tua: viewtopic.php?f=26&t=62073&start=140#p567263

E se non risolvi scrivi ancora speiegando dove sei arrivato e dove invece ti sei arenato.
Ciao

[disa1981]

Grazie Anthony47
ho riletto tutta la discussione del topic e ho cercato di adattarla alle mie esigenze, ma qui ho bisogno del vostro aiuto
per prima cosa, come posso fare a collegare le due macro con un unico pulsante, cerco di spiegermi meglio, nel mio foglio ogni macro è collegata ad un pulsante e la macro inizia con Private Sub...., mentre la prima parte della macro suggerita inizia con Function range...
quello che mi succede è che quando clicco sul pulsante per inviare la mail mi si ricollega solo alla seconda parte e mi da un errore "errore di run-time 440" impossibile aggiungere l'allegato
come posso fare a ricollegare tutto in un unico pulsante "invia mail"?
grazie
ciao

[Anthony47]

Se guardi la discussione che ti ho linkato (in particolare il post di theShort del 14/03/13, viewtopic.php?f=26&t=62073&start=140#p567598), la "funzione RangeToHtml" e' usata nella macro CommandButton4_Click per creare il testo corrispondente al range di tuo interesse [istruzione .HTMLBody = RangetoHTML(rng)].

Tu invece come hai tradotto il tutto?

Ciao