quick call on excel

[Guest]

Can I command a call to the pc's modem by a simple clic on a cell? I work as a sallesman. I've so many calls to do every day and it's really hard to me.
Thanks for any help.
Fernando

 

[Don Guillett]

try this. It could be converted to a double click event.

Sub CellToDialer() '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"
' Application.SendKeys "{TAB}~", True
End Sub



--
Don Guillett
SalesAid Software
(e-mail address removed)

Can I command a call to the pc's modem by a simple clic on a cell? I work

as a sallesman. I've so many calls to do every day and it's really hard to
me.

 

[Frank Isaacs]

A google search revealed this thread:

http://makeashorterlink.com/?I36E125A6

--



Regards -

-Frank Isaacs
Dolphin Technology Corp.

Can I command a call to the pc's modem by a simple clic on a cell? I work

as a sallesman. I've so many calls to do every day and it's really hard to
me.

 

[Dave Peterson]

John Walkenbach has posted some code for a phone dialer:
http://google.com/[email protected]

MS has it as part of the KB, too:
ACC: Using TAPI to Dial a Phone Under Win95/NT 4.0 (95/97)
http://support.microsoft.com/default.aspx?scid=KB;en-us;q141625


And Orlando Magalhães Filho posted a windows API version that you may want to
try:
http://groups.google.com/groups?selm=eOFAoRbkBHA.2448@tkmsftngp02