Envoyer par mail une feuille de document

Bonjour,

Sur une feuille j’ai créé un bouton et je voudrais que lorsqu’on clique sur ce bouton, le destinataire de la fonction mailto, paramétrée pour ce bouton, soit l’adresse email contenu (saisie auparavant) dans une cellule particulière.
Comment faire cette indirection pour aller rechercher l’adresse email contenu dans une cellule particulière ?

Pour l’instant je ‘bloque’…

Merci pour votre aide.

JP

Pourquoi ne pas se servir de la fonction LIEN.HYPERTEXTE ?

Bonjour,

Pour ce que je désire faire, un lien hypertexte ne fonctionne pas car je souhaite envoyer le document au format PDF à une adresse mail contenu dans une cellule bien précise.
En clair: en appuyant sur un bouton “Envoyer”, le document est converti automatiquement en PDF et ce PDF est envoyé à l’adresse contenue dans une cellule (toujours la même).
Et là… je n’ai pas trouvé de solution…

Merci pour votre réponse.
JP

Une solution trouvée via une recherche sur “macro mailto calc pdf” :

https://forum.openoffice.org/fr/forum/viewtopic.php?f=8&t=49293

Bonjour,

Le code de votre macro doit pointer vers la cellule de la bonne feuille. Le code pourrait être du genre (ancienne version) :

Dim monDocument As Object, lesFeuilles As Object
Dim maFeuille As Object, maCellule As Object
monDocument = ThisComponent
lesFeuilles = monDocument.Sheets
maFeuille = lesFeuilles.getByName("Feuille1")
' trois manières d'obtenir la cellule de coordonnées D5
maCellule = maFeuille.getCellRangeByName("D5")
maCellule = maFeuille.getCellRangeByName("CelluleD5")
' coordonnées X,Y : colonne D => X = 3  ligne 5 => Y = 4
maCellule = maFeuille.getCellByPosition(3,4)

Vous pouvez ensuite intégrer le contenu de la cellule donné par maCellule.value

Cordialement, Michel