Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Oliv'
*Patrick que je salue a écrit *:
Bonjour,
Je crée un message en VBA. J'aimerais que ma signature s'ajoute automatiquement à la fin du message. Est-ce possible ?
Merci pour votre aide.
Peut être ;-) Quel est l'éditeur Word ou Outlook lui même ?
si c'est outlook et si tu n'as qu'une seule signature essaye cela :
Sub signature() 'by Oliv fev2007 pour OUTLOOK 2003 Set Item = ActiveInspector.CurrentItem Item.GetInspector.CommandBars.Item("Insert").Controls("Signature").Controls(1).Execute End Sub
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Outlook : http://faq.outlook.free.fr/ les archives : http://groups.google.com/group/microsoft.public.fr.outlook Dernière chance http://www.outlookcode.com/ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
*Patrick <Patrick@discussions.microsoft.com> que je salue a écrit *:
Bonjour,
Je crée un message en VBA. J'aimerais que ma signature s'ajoute
automatiquement à la fin du message. Est-ce possible ?
Merci pour votre aide.
Peut être ;-)
Quel est l'éditeur Word ou Outlook lui même ?
si c'est outlook et si tu n'as qu'une seule signature essaye cela :
Sub signature()
'by Oliv fev2007 pour OUTLOOK 2003
Set Item = ActiveInspector.CurrentItem
Item.GetInspector.CommandBars.Item("Insert").Controls("Signature").Controls(1).Execute
End Sub
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Outlook : http://faq.outlook.free.fr/
les archives : http://groups.google.com/group/microsoft.public.fr.outlook
Dernière chance http://www.outlookcode.com/
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Je crée un message en VBA. J'aimerais que ma signature s'ajoute automatiquement à la fin du message. Est-ce possible ?
Merci pour votre aide.
Peut être ;-) Quel est l'éditeur Word ou Outlook lui même ?
si c'est outlook et si tu n'as qu'une seule signature essaye cela :
Sub signature() 'by Oliv fev2007 pour OUTLOOK 2003 Set Item = ActiveInspector.CurrentItem Item.GetInspector.CommandBars.Item("Insert").Controls("Signature").Controls(1).Execute End Sub
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Outlook : http://faq.outlook.free.fr/ les archives : http://groups.google.com/group/microsoft.public.fr.outlook Dernière chance http://www.outlookcode.com/ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
