Création d'un nouveau contact dans outlook

Soyez le premier à donner votre avis sur cette source.

Snippet vu 10 447 fois - Téléchargée 42 fois

Contenu du snippet

Ce code vous permet de creer n nouveau contact dans outlook, très pratique..

Source / Exemple :


Sub cmdRenvoieContact()
'Ici vous definissez toutes les variables
Dim myOlApp As Object
Dim myItem As Object
Dim Start As Object
'Lancement de l'application à utiliser
Shell "c:\program files\microsoft office\office\outlook.exe"
Set Start = CreateObject("Outlook.Application")
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olContactItem)
myItem.Display
'Ouverture et création d'un nouveau contact dans la base Outlook

End Sub

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
mercredi 21 mai 2003
Statut
Membre
Dernière intervention
6 janvier 2011

La ligne suivante est inutile...
Shell "c:\program files\microsoft office\office\outlook.exe"
Messages postés
1
Date d'inscription
samedi 30 décembre 2006
Statut
Membre
Dernière intervention
30 décembre 2006

Bonjour, je suis nouveau sur le site et débutant en programmation et je recherche une information (je sais que cette discussion est ancienne mais je tente le coup, on ne sait jamais). Je cherche à intégrer des contacts d'une table Access au fichier des contacts d'Outlook simplement. Quelqu'un saurait-il faire ça ? Merci d'avance de votre aide.
Messages postés
186
Date d'inscription
lundi 11 mars 2002
Statut
Membre
Dernière intervention
30 novembre 2010
2
Tu sais que Dim myOlApp as OutLook.Application ca le fait mieux....
Tu faisais du vbscript avant ?
FRANCHEMENT !!!!!!!!!!!!!!!!!!!
Messages postés
155
Date d'inscription
vendredi 2 novembre 2001
Statut
Membre
Dernière intervention
19 mai 2011

J'aime pas trop critiquer mais la je pense que je peux, recopier le code de l'aide VBA - Outlook c'est moyen mais ca peut toujours etre utile à certains mais ce bout de code est vraiment court pourtant tu n'hésite pasà déclarer une variable qui qui ne sert à rien (en tout cas dans l'exemple). En effet, je me demande pourquoi initialiser 2 variables (en l'occurence start et myolapp) de facon identique...
En un mot BOF

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.