Pb sous XP avec HasRoutingSlip

[Sébastien]

Bonjour,

1)Suite au passage de NT4 à XP, je rencontre un soucis sur une macro excel pour l'envoi d'un mail en automatique avec la fonction HasRoutingSlip.

Les déstinataires du mail ne recoivent pas l'attach mais un fichier nommé 'winmail.dat'.

En l'envoyant normalement à partir d'Outlook, il n'y a pas de problème pour lire l'attach.


2)Est il possible d'enlever les fenètres de sécurité entre Excel2003 et Outlook qui demande la confirmation de l'envoi du mail par Outlook


La fonction est la suivante :

ActiveWorkbook.HasRoutingSlip = True
With ActiveWorkbook.RoutingSlip
.Recipients = 'Acces-SDEL'
.Subject = 'Fiche First '
.Message = _
'Bonjour,' & Chr(10) & '' & Chr(10) & 'Veuillez trouver ci joint la fiche first du jour.' & Chr(10) & '' & Chr(10) & '' & Chr(10) & 'Cdlt' & Chr(10) & '' & Chr(10) & 'Didier ARNOULD' & Chr(10) & 'Gestionnaire Accès Sites' & Chr(10) & 'Tél : 03 87 37 43 26'
.Delivery = xlOneAfterAnother
'.ReturnWhenDone = True
'.TrackStatus = True
End With
ActiveWorkbook.Route

ActiveWorkbook.Close SaveChanges:=False

Merci d'avance pour votre aide.

Sébastien

email : sebastien.beyer@fr.sfr.com

 

[anuky]

Bonjour,

pour ton premier problème, je n'ai pas de réponse, mais pour le deuxième j'ai peut-être une solution,

dans Excel, la fonction

Application.DisplayAlerts = False

permet dans Excel de supprimer les message d'alerte.

ce code se place avant la fonction qui déclanche le message d'alerte.
Et il faut remettre les messages d'eereur après pour éviter les problèmes.

Application.DisplayAlerts = True

A+