Mail vba
Bonjour,
je veux envoyer un mail avec un fichier en piece jointe.
Mon problème est que mon fichier change de nom (il prend comme nom la date du jour)
.AddAttachment ("C\..................\???")
quand je met la date du jour (a la place de ???) ca marche
mais quand je met ma varibale nomfichier (string) (nomfichier =Month(Date) & "-" & Year(Date) & "_" & ActiveWorkbook.Name) ca ne marche plus.
Si quelqu'un à une idée.
merci pour votre aide
je veux envoyer un mail avec un fichier en piece jointe.
Mon problème est que mon fichier change de nom (il prend comme nom la date du jour)
.AddAttachment ("C\..................\???")
quand je met la date du jour (a la place de ???) ca marche
mais quand je met ma varibale nomfichier (string) (nomfichier =Month(Date) & "-" & Year(Date) & "_" & ActiveWorkbook.Name) ca ne marche plus.
Si quelqu'un à une idée.
merci pour votre aide
2 réponses
-
transforme ta date en texte
et n'utilise pas de charactère spéciaux dans le nom
utilise la fonction cStr pour convertir en texte -
non je suis contraint de laisser une date
merci-
ce n'est pas ce que j'ai dit....
les fonctions day,month,year revoie un entier (valeur numerique)
le nom du fichier est une chaine de charactère : string
donc il faut convertirSub test() Dim d As Date Dim j, m, a Dim tdate As String d = Date ' la date systeme j = Day(d) ' un entier m = Month(d) 'un entier a = Year(d) ' un entier tdate = CStr(j) & CStr(m) & CStr(a) ' une chaine End Sub
Mon explication est-elle plus claire?
-