Capture d’écran (722).png
J'ai réussi a faire quelque chose mais ça ne marche pas tout le temps.
Mais je vais essayer un autre moyen
Quand je modifie le classeur pour envoyer le mail programmé
J'ai créer une macro qui sauvegarde une copie à chaque fois en mode hors ligne
et c est ce fichier que je vais ouvrir
comme ça plus de problèmes, enfin j’espère
par contre je dois me tromper dans mon code
Sub Archivedeux()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
chemin = "Z:\Mes documents SERVEUR\Excel\Tampon_Mail\"
extension = ".xlsm"
MsgBox "Mail Programmé "
On Error Resume Next
MkDir chemin
On Error GoTo 0
nomfichier = "TamponMail" & extension
ThisWorkbook.SaveCopyAs Filename:=chemin & nomfichier, FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
Application.DisplayAlerts = True
End Sub
Argument nommé intouvable sur fileformat ...