Modification incompréhensible destinataire email

Modification incompréhensible destinataire email Destinataires emails xperia Problème modification adresse email (Résolu) Adresse email cachée aux autres destinataires (Résolu) Cacher des destinataires dans un email . (Résolu) Modification email pour compte nintendo+ Wii (Résolu)

Bonjour à vous,

Ceci concerne une macro faite dans Excel.
A la fin du remplissage d'une fiche Excel, ce document est enregistré en version PDF, puis il est mis en pièce jointe à un email.

Pour des raisons qui ne peuvent être changées, ce fichier doit être envoyé à un numéro de FAX.
J'ai une instabilité à ce niveau. Une fois Outlook ouvert, le destinataire est correct.
Soit : [Fax:0123456789]
Seulement après quelques secondes, cela se modifie pour être : 0123456789

Pouvez-vous me dire ce qui se passe ?

Voici la partie de la macro concernée :

'Enregistre PDF         With Worksheets("Données")             CHE = .Range("H4").Value             NF = .Range("H5").Value             NC = CHE & NF             NUM = .Range("G1").Value             NFAX = Format(NUM, "0000000000")   'Pour maintenir 10 numéro             Dest = "[fax:" & NFAX & "]"             Sujet = "Intervention SECUTEL " & .Range("H5")         End With         Sheets("CRT").Activate         ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _         NC, Quality:= _         xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _         From:=1, To:=1, OpenAfterPublish:=False     'Outlook si nécessaire     OUTLOOKSIBESOIN   'Ouvre Outlook si pas déjà ouvert         'Création du mail         Set OL = CreateObject("Outlook.Application")         Set OLmail = OL.CreateItem(0)             With OLmail                 .To = Dest                 .Subject = Sujet                 .Body = "Ce document a pour destination un numéro de FAX. Il est donc inutile d'ajouter quelque chose ici."                 .Attachments.Add NC                 .Display             End With


Dans l'attente de vos réponses, je vous remercie d'avoir pris un peu de votre temps et vous adresses mes meilleures salutations.

(PS : ne vous arrachez pas les cheveux et ne faite pas de syncope. Cette macro est du bricolage, sans prétention aucune. Merci de votre indulgence.)

Forum

Modification incompréhensible destinataire email Destinataires emails xperia Problème modification adresse email (Résolu) Adresse email cachée aux autres destinataires (Résolu) Cacher des destinataires dans un email . (Résolu) Modification email pour compte nintendo+ Wii (Résolu)

Web: www.shapebootstrap.net

2 réponses

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Bonjour,

Peut être l'erreur ici

Dest = "[fax:" & NFAX & "]"

Essayez avec Dest = "["fax:" & NFAX]"

Cordialement

Reply
réponses:
  • auteur

    Bonjour,

    Merci pour votre suggestion.
    Malheureusement, ça n'est pas celà.

    Merci à vous

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed