Numéroteur téléphonique

[magoo]

Bonjour,

Je souhaite pouvoir cliquer sur un n° de téléphone placé dans une cellule de ma feuille pour qu'il se compose via mon modem ou au travers du numéroteur de outlook.

J'ai bien trouvé sur le site un exemple mais je débute et je n'arrive à le mettre en forme dans excel. :-((

http://www.excel-downloads.com/html/French/forum/read.php?f=1&i=111710&t=111710

Private Declare Function tapiRequestMakeCall Lib "TAPI32.DLL" (ByVal Dest$, ByVal AppName$, ByVal CalledParty$, ByVal Comment$) As Long

Sub Appeler(Num$, Optional Auteur$, Optional Titre$ = "", Optional Sujet$ = "")
On Error Resume Next
tapiRequestMakeCall Num, Titre, Auteur, Sujet
If Err <> 0 Then MsgBox "Appel impossible"
End Sub


Sub Test()
Appeler [A8], "Zon"
End Sub

Si quelqu'un peu m'aider pour l'intégrer dans une feuille ou je suis preneur de tout autre exemple.

Merci beaucoup
Magoo

 

[magoo]

Yes cela fonctionne !!!
J'ai enfin trouvé mon erreur ;-))
La vie est belle
Bonne fin d'après midi
Magoo