telefoon script

[drubbus]

Bestaat er een script dat je voip telefoon telefoon aanstuurt
ik heb er wel een gevonden met de telefoonkiezer maar deze werkt niet :

Private Sub CommandButton1_Click()

    CellContents = TextBox1.Value
    
    If CellContents = "" Then
        MsgBox "Geen telefoonnummer."
        Exit Sub
    End If

'   Activate (or start) Dialer
    Appname = "Dialer"
    AppFile = "Dialer.exe"
    On Error Resume Next
    AppActivate (Appname)
    If Err <> 0 Then
        Err = 0
        TaskID = Shell(AppFile, 1)
        If Err <> 0 Then MsgBox "kan niet starten " & AppFile
    End If




    Application.SendKeys "%m"
'    Application.SendKeys "{TAB}~", True
End Sub

Groet
drubbus

 

[RogerS]

Dat wordt voor ons een wilde gok als we niet minstens weten wat je precies wilt bereiken, welke type telefoon en telefooncentrale je gebruikt.

 

[alphamax]

In outlook kan je contacts toevoegen, die contact kan je bellen met lync.