XL pour MAC Problème de débutant mailto

nobodyuse · 7 Décembre 2022

Bonjour,
je veux utiliser cette formule pour créer l'envoie d'un email de manière simplifié depuis une feuille excel

VB:

=SIERREUR(LIEN_HYPERTEXTE("mailto:"&RECHERCHEV(D3;Mail;2;FAUX)&"?subject=Arret Maladie "&C3&"&body=Bonjour,%0AVeuillez trouver ci-joint l'arret de : "&C3&", du "&E3&" au "&F3&", %0AMerci d'en prendre connaissance ! %0ACordialement ";"Mail To: "&D3&"");"")

j'avais utilisé ce type de formule sur une autre feuille avec succès mais la, rien, meme pas de message d'erreur, je n'ai aucun affichage dans la cellule concerné

j'en appel donc a vos connaissance
Merci

TooFatBoy · 7 Décembre 2022

Gégé-45550 à dit:
Un destinataire de trop : pourquoi ?

Joke.

Gégé-45550 · 7 Décembre 2022

TooFatBoy à dit:
Joke.

Par contre, dans ta dernière version, plus de limite de nombre de destinataires ... enfin j'ai testé en en ajoutant seulement 4 assez longues.

Gégé-45550 · 7 Décembre 2022

Gégé-45550 à dit:
Par contre, dans ta dernière version, plus de limite de nombre de destinataires ... enfin j'ai testé en en ajoutant seulement 4 assez longues.

Ce qui montre bien, du moins le crois-je, que la limite vient de la fonction LIEN_HYPERTEXTE que tu contournes avec ta méthode. Bien vu.

TooFatBoy · 7 Décembre 2022

Gégé-45550 à dit:
Par contre, dans ta dernière version, plus de limite de nombre de destinataires ... enfin j'ai testé en en ajoutant seulement 4 assez longues.

J'en avais déjà mis 7 et tu en as ajouté 4 !?!

TooFatBoy · 7 Décembre 2022

Gégé-45550 à dit:
Ce qui montre bien, du moins le crois-je, que la limite vient de la fonction LIEN_HYPERTEXTE que tu contournes avec ta méthode. Bien vu.

En fait ce n'est pas ma méthode... je l'ai lamentablement pompée quelque part sur le forum et adaptée...

ici : https://excel-downloads.com/threads/lien-hypertexte-superieur-a-255-caracteres.58184/#post-299732

Gégé-45550 · 7 Décembre 2022

TooFatBoy à dit:
En fait ce n'est pas ma méthode... je l'ai lamentablement pompée quelque part sur le forum et adaptée...

ici : https://excel-downloads.com/threads/lien-hypertexte-superieur-a-255-caracteres.58184/#post-299732

Par contre, je ne vois pas l'intérêt de la macro Worksheet_Change ?

TooFatBoy · 7 Décembre 2022

Gégé-45550 à dit:
Par contre, je ne vois pas l'intérêt de la macro Worksheet_Change ?

Moi non plus, mais demande-lui, il te donnera peut-être une réponse qui répondra à ta question...
Si c'est utile, c'est dans son vrai fichier.

Au fait, il faut adapter mon bout de macro et ne pas laisser $I$3.

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Cells.Count <> 1 Then Exit Sub
    If Intersect(Target, Range("SuiviABS[MAILING]")) Is Nothing Then Exit Sub
    If Target.Value <> "" Then ThisWorkbook.FollowHyperlink Target.Offset(0, 2)
End Sub

Gégé-45550 · 7 Décembre 2022

TooFatBoy à dit:
Moi non plus, mais demande-lui, il te donnera peut-être une réponse qui répondra à ta question...
Si c'est utile, c'est dans son vrai fichier.

Au fait, il faut adapter mon bout de macro et ne pas laisser $I$3.

OK.
J'avais déjà adapté :

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, ActiveSheet.ListObjects("SuiviABS").ListColumns(9).DataBodyRange) Is Nothing And Not IsEmpty(Target) Then
        ThisWorkbook.FollowHyperlink Target.Offset(0, 2)
    End If
End Sub

Amitiés,

nobodyuse · 7 Décembre 2022

Comme je l’ai précisé je suis novice, je n’ai de ce fait pas toute vos connaissances et je cherche par la même à comprendre également.

Je fais au mieux pour vous suivre mais vous m’avez perdu en route la

TooFatBoy · 7 Décembre 2022

Dans ce cas, voici le classeur avec la macro corrigée. En espérant que ça fonctionne sur ton Mac.

nobodyuse · 7 Décembre 2022

TooFatBoy à dit:
J'adore tes réponses toujours aussi claires et précises ! Avec ça on est bien avancés...

Simplement car je n'ai aucun résultat, quand je clique rien ne ce passe (aucune message d'erreur mais rien ne se passe), j'aurai préféré te dire que cela marche et que c'est une bonne solution pour moi de contournement de la limite du nombre de caractère.

Après ma formule est peut être (sans doute) foireuse aussi

en tous cas le problème viens bien de la, il me reste juste a réduire la chaine de caractère en réduisant le texte, les services concernés compléterons le texte eux-mêmes.

TooFatBoy · 7 Décembre 2022

nobodyuse à dit:
Après ma formule est peut être (sans doute) foireuse aussi

Non non, ta formule est bonne. Le seul souci vient du nombre de caractères.

J'ai d'ailleurs réutilisé ta formule dans ma dernière proposition, car il semblerait que cette limite n'existe pas si on passe par du VBA.

nobodyuse · 7 Décembre 2022

TooFatBoy à dit:
Non non, ta formule est bonne. Le seul souci vient du nombre de caractères.

J'ai d'ailleurs réutilisé ta formule dans ma dernière proposition, car il semblerait que cette limite n'existe pas si on passe par du VBA.

ah c'est déjà ça j'ai pas tout faux ^^
Malheureusement ta dernière proposition ne fonctionne toujours pas mieux, possiblement que le problème viens du mac.
pas grave je vais reduire le nombre de caractere est expliquer aux utilisateurs qu'ils devrons completer, vous m'avez deja apporté cette solutions et surtout la comprehension de cela.

nobodyuse · 7 Décembre 2022

TooFatBoy à dit:
Moi non plus, mais demande-lui, il te donnera peut-être une réponse qui répondra à ta question...
Si c'est utile, c'est dans son vrai fichier.

La macro Worksheet_Change sert a insérer la date de manière automatique et fixe lorsque la première cellule est remplie.

XL pour MAC Problème de débutant mailto

nobodyuse

XLDnaute Occasionnel

TooFatBoy

XLDnaute Barbatruc

Gégé-45550

XLDnaute Accro

Gégé-45550

XLDnaute Accro

TooFatBoy

XLDnaute Barbatruc

TooFatBoy

XLDnaute Barbatruc

Gégé-45550

XLDnaute Accro

TooFatBoy

XLDnaute Barbatruc

Gégé-45550

XLDnaute Accro

nobodyuse

XLDnaute Occasionnel

TooFatBoy

XLDnaute Barbatruc

Pièces jointes

nobodyuse

XLDnaute Occasionnel

TooFatBoy

XLDnaute Barbatruc

nobodyuse

XLDnaute Occasionnel

nobodyuse

XLDnaute Occasionnel

Discussions similaires