Re : Imprimer au format pdf et ensuite le joindre directement dans mon mail
Bonjour,
Il y a déjà quelques années, au moment où je peaufinais la procédure que j'ai commise dans le classeur joint,
on devait ajouter cette fonction pour éviter une erreur d'automatisation (connue et répertoriée). Il se peut que
depuis lors qu'il y ait une version plus récente du programme qui a corrigé le problème. Je n'en sais rien car
je n'utilise pas cet utilitaire. Si tel est le cas, tu aurais avantage à télécharger la plus récente version du programme
et l'installer en lieu et place de celle que tu as. Sinon, tu peux utiliser la procédure du classeur et remplacer
la ligne Call () qui appelle la procédure d'envoi du courriel par celle qui utilise Outlook.
la fonction qui corrigeait le problème d'automatisation, peut-être inutile aujourd'hui.
'--------------------------
Sub killtask(sappname As String)
Dim oProclist As Object
Dim oWMI As Object
Dim oProc As Object
Set oWMI = GetObject("winmgmts:")
If IsNull(oWMI) = False Then
Set oProclist = oWMI.InstancesOf("win32_process")
For Each oProc In oProclist
If UCase(oProc.Name) = UCase(sappname) Then
oProc.Terminate (0)
End If
Next oProc
Else
MsgBox "Killing """ & sappname & _
""" - Can't create WMI Object.", _
vbOKOnly + vbCritical, "CloseAPP_B"
End If
Set oProclist = Nothing
Set oWMI = Nothing
End Sub
'--------------------------
Et pour ceux qui ont Excel 2007 ou 2010, vous pouvez consulter cette adresse (en anglais):
Ce lien n'existe plus