templplates
 

is there a way to dial telephone numbers from excel?

John, here is some code by John Walkenbach that will do it

Sub CellToDialer()
'By John Walkenbach
' Transfers active cell contents to Dialer
' And then dials the phone

' Get the phone number
CellContents = ActiveCell.Value


If CellContents = "" Then
MsgBox "Select a cell that contains a phone number."
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 "Can't start " & AppFile
End If

' Transfer cell contents to Dialer
Application.SendKeys "%n" & CellContents, True

' Click Dial button
Application.SendKeys "%d", True

End Sub

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"johnfarrow" wrote in message
...
is there a way to dial telephone numbers from excel?

There is no built-in way to do this in Excel.
You might try exploring this for an answer:
http://www.google.com/groups?hl=en&l...TNGP10.phx.gbl

If you aren't familiar with macros, go to this site first:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

tj

"johnfarrow" wrote:

is there a way to dial telephone numbers from excel?