Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Comment téléphoner à partir d'un numéro contenu dans Excel?

Comment téléphoner à partir d'un numéro contenu dans Excel?

25 réponses
Avatar
La-louloutte
Je souhaite composer par simple clic un numéro de téléphone contenu dans une
cellule Excel .

Je souhaiterai donc connaitre l'ensemble de la marche à suivre à mettre en
place pour Windows XP, Excel 2003 ET AUSSI pour Windows Vista Excel 2007.

Merci par avance.
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2 3
Avatar
garnote
Salut Denis, Isabelle et Modeste,

J'ai essayé la macro de John Walkenbach et
et je reçois comme message : Can't start Dialer.exe.
Et quand je tente le coup dans la fenêtre du numéroteur téléphonique,
ce n'est guère mieux, un boîte grise apparaît avec ce message :
Échec : numéro incorrect ou périphérique appelé hors service.
Et dans la fenêtre du numéroteur téléphonique à droite, je peux lire :
Le serveur sélectionné ne répond pas...

Bonne journée,

Serge



"MichDenis" a écrit dans le message de news:
Une procédure élaborée de John Walkenbach
que tu peux coller dans un module standard et
attacher à un bouton dans une feuille de calcul.

La cellule active doit contenir le numéro de téléphone
à appeler lors de l'appel de la procédure :

'---------------------------------------------------------
Sub CellToDialer()
' 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
' Application.SendKeys "{VbTab}" & "n" & "­"
' Click Dial button
Application.SendKeys "%n"
End Sub
'---------------------------------------------------------



"La-louloutte" a écrit dans le message de groupe
de discussion :
Je souhaite composer par simple clic un numéro de téléphone contenu dans une
cellule Excel .

Je souhaiterai donc connaitre l'ensemble de la marche à suivre à mettre en
place pour Windows XP, Excel 2003 ET AUSSI pour Windows Vista Excel 2007.

Merci par avance.




Avatar
MichDenis
Merci Isabelle, mais que veux-tu dire par "brancher en externe" ?
L'ajouter comme deuxième HD à celui déjà en place ...
sinon comment branche-t-on un disque dur en EXTERNE ?


Salutations.



"isabelle" a écrit dans le message de groupe de discussion :

Salut Denis,

MichDenis a écrit :
Tu n'aurais pas une petite procédure VBA pour récupérer
des données sur un disque dur mort ? ;-



si tu branche le disque en externe sur un pc qui fonctionne, peut-tu le
lire ?

isabelle
Avatar
MichDenis
Bonjour Serge,

As-tu cet exécutable "Dialer.exe" sur ta machine ?

Moi, il est situé dans ce répertoire : C:WindowsSystem32

Si ce fichier est absent ou si le petite programme ne peux pas
le trouver où il cherche, difficile d'avoir d'obtenir le résultat escompté.





"garnote" a écrit dans le message de groupe de discussion :
#$
Salut Denis, Isabelle et Modeste,

J'ai essayé la macro de John Walkenbach et
et je reçois comme message : Can't start Dialer.exe.
Et quand je tente le coup dans la fenêtre du numéroteur téléphonique,
ce n'est guère mieux, un boîte grise apparaît avec ce message :
Échec : numéro incorrect ou périphérique appelé hors service.
Et dans la fenêtre du numéroteur téléphonique à droite, je peux lire :
Le serveur sélectionné ne répond pas...

Bonne journée,

Serge



"MichDenis" a écrit dans le message de news:

Une procédure élaborée de John Walkenbach
que tu peux coller dans un module standard et
attacher à un bouton dans une feuille de calcul.

La cellule active doit contenir le numéro de téléphone
à appeler lors de l'appel de la procédure :

'---------------------------------------------------------
Sub CellToDialer()
' 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
' Application.SendKeys "{VbTab}" & "n" & "­"
' Click Dial button
Application.SendKeys "%n"
End Sub
'---------------------------------------------------------



"La-louloutte" a écrit dans le message de
groupe
de discussion :
Je souhaite composer par simple clic un numéro de téléphone contenu dans une
cellule Excel .

Je souhaiterai donc connaitre l'ensemble de la marche à suivre à mettre en
place pour Windows XP, Excel 2003 ET AUSSI pour Windows Vista Excel 2007.

Merci par avance.




Avatar
isabelle
salut Denis,

déjà il faudrait l'alimenter (soit le laisser branché sur le power du
pc defect) si ce power supply est good bien sur,
et puis ça prend un adaptateur adéquat pour le relier à la carte du pc
qui fonctionne ,
tu verras un jumper derrière le dd Il y a 3 réglages possibles je
crois, master;slave;auto.
ensuite il faudrait régler dans le bios les paramètres de reconnaissance
des ports IDE primaire et secondaire
sur "auto" de façon à ce que l'ordinateur détecte automatiquement ce qui
est branché sur l'IDE.

isabelle



MichDenis a écrit :
Merci Isabelle, mais que veux-tu dire par "brancher en externe" ?
L'ajouter comme deuxième HD à celui déjà en place ...
sinon comment branche-t-on un disque dur en EXTERNE ?


Salutations.



"isabelle" a écrit dans le message de groupe de discussion :

Salut Denis,

MichDenis a écrit :

Tu n'aurais pas une petite procédure VBA pour récupérer
des données sur un disque dur mort ? ;-




si tu branche le disque en externe sur un pc qui fonctionne, peut-tu le
lire ?

isabelle





Avatar
isabelle
regarde ici : http://www.01net.com/article/197562.html
isabelle

MichDenis a écrit :
Merci Isabelle, mais que veux-tu dire par "brancher en externe" ?
L'ajouter comme deuxième HD à celui déjà en place ...
sinon comment branche-t-on un disque dur en EXTERNE ?


Salutations.



"isabelle" a écrit dans le message de groupe de discussion :

Salut Denis,

MichDenis a écrit :

Tu n'aurais pas une petite procédure VBA pour récupérer
des données sur un disque dur mort ? ;-




si tu branche le disque en externe sur un pc qui fonctionne, peut-tu le
lire ?

isabelle





Avatar
isabelle
... et si c'est un hd de portable il te faut un adaptateur ide 2"1/2 à
3"1/2 et tu branche l'adaptateur directement sur un port de carte mere,
isabelle

MichDenis a écrit :
Merci Isabelle, mais que veux-tu dire par "brancher en externe" ?
L'ajouter comme deuxième HD à celui déjà en place ...
sinon comment branche-t-on un disque dur en EXTERNE ?


Salutations.



"isabelle" a écrit dans le message de groupe de discussion :

Salut Denis,

MichDenis a écrit :

Tu n'aurais pas une petite procédure VBA pour récupérer
des données sur un disque dur mort ? ;-




si tu branche le disque en externe sur un pc qui fonctionne, peut-tu le
lire ?

isabelle





Avatar
garnote
Oui j'ai et même en double !
Voici où je peux me rendre :
http://www.cijoint.fr/cjlink.php?file=cj200903/cijwrhD8e3.xls

Une fois là, quand j'essaie de composer une numéro, j'obtiens un échec.

Serge



"MichDenis" a écrit dans le message de news:
Bonjour Serge,

As-tu cet exécutable "Dialer.exe" sur ta machine ?

Moi, il est situé dans ce répertoire : C:WindowsSystem32

Si ce fichier est absent ou si le petite programme ne peux pas
le trouver où il cherche, difficile d'avoir d'obtenir le résultat escompté.





"garnote" a écrit dans le message de groupe de discussion :
#$
Salut Denis, Isabelle et Modeste,

J'ai essayé la macro de John Walkenbach et
et je reçois comme message : Can't start Dialer.exe.
Et quand je tente le coup dans la fenêtre du numéroteur téléphonique,
ce n'est guère mieux, un boîte grise apparaît avec ce message :
Échec : numéro incorrect ou périphérique appelé hors service.
Et dans la fenêtre du numéroteur téléphonique à droite, je peux lire :
Le serveur sélectionné ne répond pas...

Bonne journée,

Serge



"MichDenis" a écrit dans le message de news:

Une procédure élaborée de John Walkenbach
que tu peux coller dans un module standard et
attacher à un bouton dans une feuille de calcul.

La cellule active doit contenir le numéro de téléphone
à appeler lors de l'appel de la procédure :

'---------------------------------------------------------
Sub CellToDialer()
' 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
' Application.SendKeys "{VbTab}" & "n" & "­"
' Click Dial button
Application.SendKeys "%n"
End Sub
'---------------------------------------------------------



"La-louloutte" a écrit dans le message de
groupe
de discussion :
Je souhaite composer par simple clic un numéro de téléphone contenu dans une
cellule Excel .

Je souhaiterai donc connaitre l'ensemble de la marche à suivre à mettre en
place pour Windows XP, Excel 2003 ET AUSSI pour Windows Vista Excel 2007.

Merci par avance.








Avatar
Daniel.C
Bonsoir.
A mon avis, avec la Livebox, tu n'y arriveras pas. La téléphonie fonctionne
(si le service est démarré, chez moi, il est en manuel) en analogique. C'est
quoi, ton logiciel de fax ?
Cordialement.
Daniel

--
Cordialement.
Daniel
"la-louloutte" a écrit dans le message de news:

isabelle a écrit le 19/03/2009 à 22h19 :
je n'ai pas eu ce probleme, est ce que ton numérateur fonctionne en
dehors d'excel ?

http://cjoint.com/?dvwpfXh5No




http://search.microsoft.com/results.aspx?mkt=fr-FR&setlang=fr-FR&q=num%c3%a9roteur

isabelle

garnote a écrit :
OK
J'ai commenté le commentaire ;-)
et j'ai tenté de me téléphoner !
Voici le résultat :
http://www.cijoint.fr/cjlink.php?file=cj200903/cijX8GZxtk.xls

Où est l'erreur ?

Serge





"isabelle" a écrit dans le message de news:


salut Serge,

cette ligne est un commentaire,

isabelle

garnote a écrit :

Bonjour Isabelle,

J'ai aussi trouvé ça mais ça bogue à Attribute !
Pourrais-tu l'essayer ?

Serge

Attribute VB_Name = "ProcPourTelephoner"

Declare Function tapiRequestMakeCall Lib "tapi32.dll" _
(ByVal stNumber As String, ByVal stDummy1 As String, _
ByVal stDummy2 As String, ByVal stDummy3 As String) As Long

'Cette procédure permet de déclencher la numérotation
'par le numéroteur de Windows (P. Supera).
Sub TapiDialNumber(PhoneNumber$, NomAppelé$)
Const MB_ICONSTOP = 16, MB_ICONINFORMATION = 64
Dim Msg As String, MsgBoxType As Integer, MsgBoxTitle As String
Dim ResVal As Long

ResVal = tapiRequestMakeCall(PhoneNumber, "", NomAppelé,
"")

If ResVal < 0 Then
Msg = "Ce numéro n'a pas pu être appelé : "
& PhoneNumber
GoTo Err_TapiDialNumber
End If

Exit Sub

Err_TapiDialNumber:
Msg = Msg & vbNewLine & vbNewLine & "Vérifier
qu'aucune autre" & _
" application ne mobilise le port de communication."
MsgBoxType = MB_ICONSTOP
MsgBoxTitle = "Erreur de numérotation" & ", "
& Version
MsgBox Msg, MsgBoxType, MsgBoxTitle

End Sub

Sub test()
TapiDialNumber "418-529-0013", "Serge Garneau"
End Sub














"isabelle" a écrit dans le message de news:
OQJLp%


bonjour,

il y a un exemple ici :
http://www.vbfrance.com/recherche.aspx?tr=source&r=vba+t%e9l%e9phoner
c'est en vb mais facilement convertible en vba
FAIRE SONNER LE TÉLÉPHONE
</codes/FAIRE-SONNER-TELEPHONE_4337.aspx>

isabelle

La-louloutte a écrit :


Je souhaite composer par simple clic un numéro de
téléphone contenu dans une cellule Excel .

Je souhaiterai donc connaitre l'ensemble de la marche à suivre
à mettre en place pour Windows XP, Excel 2003 ET AUSSI
pour Windows Vista Excel 2007.

Merci par avance.



























Merci beaucoup pour vos réponses mais j'avoue que vous me parlez
"chinois".
Je suis complètement perdue.
Quelqu'un peut-il avoir la gentillesse de me guider depuis le départ de la
procédure.
En fait, je vous explique : je voudrais qu'en simple clic sur ma cellule
ou un
bouton dans Excel, cela compose le numéro de téléphone et que je puisse
prendre
l'appel directement via un micro casque ; le tout en reliant le modem
interne de
mon pc à ma livebox.
Le principe fonctionne bien avec l'envoi et réception de fax mais pour
cela je
possède un logiciel spécifique aux fax. C'est pour ça que je suppose que
la
solution doit être possible pour la téléphonie.
Mais je ne suis pas experte en la matière et je m'en remet à vous.
Merci pour votre aide.


Avatar
MichDenis
Merci Isabelle

Je vais essayer.



"isabelle" a écrit dans le message de groupe de discussion :
#zevs$
... et si c'est un hd de portable il te faut un adaptateur ide 2"1/2 à
3"1/2 et tu branche l'adaptateur directement sur un port de carte mere,
isabelle

MichDenis a écrit :
Merci Isabelle, mais que veux-tu dire par "brancher en externe" ?
L'ajouter comme deuxième HD à celui déjà en place ...
sinon comment branche-t-on un disque dur en EXTERNE ?


Salutations.



"isabelle" a écrit dans le message de groupe de discussion :

Salut Denis,

MichDenis a écrit :

Tu n'aurais pas une petite procédure VBA pour récupérer
des données sur un disque dur mort ? ;-




si tu branche le disque en externe sur un pc qui fonctionne, peut-tu le
lire ?

isabelle





Avatar
g_boulanger
Bonjour.

Voir le fichier sur cjoint.com:
http://cjoint.com/?dxe1aCDyyL

Mishell


On 19 mar, 18:33, la-louloutte wrote:


>>>>> La-louloutte a écrit :

>>>>>> Je souhaite composer par simple clic un numéro de
>>>>>>téléphonecontenu dans une celluleExcel.

>>>>>> Je souhaiterai donc connaitre l'ensemble de la marche à suivre
>>>>>> à mettre en place pour Windows XP,Excel2003 ET AUSSI
>>>>>> pour Windows VistaExcel2007.

>>>>>> Merci par avance.

Merci beaucoup pour vos réponses mais j'avoue que vous me parlez "chino is".
Je suis complètement perdue.
Quelqu'un peut-il avoir la gentillesse de me guider depuis le départ de la
procédure.
En fait, je vous explique : je voudrais qu'en simple clic sur ma cellule ou un
bouton dansExcel, cela compose le numéro detéléphoneet que je puiss e prendre
l'appel directement via un micro casque ; le tout en reliant le modem int erne de
mon pc à ma livebox.
Le principe fonctionne  bien avec l'envoi et réception de fax mais po ur cela je
possède un logiciel spécifique aux fax. C'est pour ça que je suppos e que la
solution doit être possible pour la téléphonie.
Mais je ne suis pas experte en la matière et je m'en remet à vous.
Merci pour votre aide.


1 2 3