bouclesdor
XLDnaute Occasionnel
Bonjour à tous,
J'ai besoin de votre aide pour m'aider à résoudre un problème. J'ai excel 2013 et mes collègues ont excel 2007. J'ai un code VBA qui utilisait la référence Microsoft outlook library 15.0 mais mes collègues sont incapable d'utiliser le fichier car leur référence outlook est library 12.0. J'ai vu sur internet que pour résoudre mon problème je devais faire un late Binding mais je n'y arrive pas....
Voici le début de mon code que j'ai déjà remplacé les champs
Sub Make_Outlook_Mail_With_File_Link_display()
'For Tips see: Excel Automation - Ron de Bruin
'Working in Excel 2000-2013
Dim OutApp As Object 'Outlook.Application
Dim OutMail As Object 'Outlook.MailItem
Dim StrBody As String
Dim PJ As String
Dim Annee As String
Dim SigString As String
Dim signature As String
If ActiveWorkbook.Path <> "" Then
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(o) ''' *** je crois que c'est ce bout là que je n'écris pas comme il faut...
merci à l'avacne de votre aide et bonne soirée,
Bouclesdor
J'ai besoin de votre aide pour m'aider à résoudre un problème. J'ai excel 2013 et mes collègues ont excel 2007. J'ai un code VBA qui utilisait la référence Microsoft outlook library 15.0 mais mes collègues sont incapable d'utiliser le fichier car leur référence outlook est library 12.0. J'ai vu sur internet que pour résoudre mon problème je devais faire un late Binding mais je n'y arrive pas....
Voici le début de mon code que j'ai déjà remplacé les champs
Sub Make_Outlook_Mail_With_File_Link_display()
'For Tips see: Excel Automation - Ron de Bruin
'Working in Excel 2000-2013
Dim OutApp As Object 'Outlook.Application
Dim OutMail As Object 'Outlook.MailItem
Dim StrBody As String
Dim PJ As String
Dim Annee As String
Dim SigString As String
Dim signature As String
If ActiveWorkbook.Path <> "" Then
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(o) ''' *** je crois que c'est ce bout là que je n'écris pas comme il faut...
merci à l'avacne de votre aide et bonne soirée,
Bouclesdor