XL 2016 Gérer une application à partir d'excel

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,
Tout d'abord, je vous souhaite un très beau dimanche,
J'ai une question "très particulière" et bien évidemment, mon niveau ne me permets pas de solutionner mon besoin.

Dans le cadre se mon boulot, les opérations sont répétitives.
Chaque "seconde" gagnée est importante !
Je cherche à automatiser au maxi l'envoi de sms.

J'ai cherché sur le net et j'ai trouvé peu de fils à ce sujet.
Toutefois, j'ai trouvé cette faq : https://excel.developpez.com/faq/?page=Automation
Mais je ne m'en sors pas.

Alors, je me tourne vers mes magiciens préférés qui m'ont sorti tellement de fois de l'embarras.
J'ai réussi, avec votre aide, à coder pour automatiser jusqu'à la préparation du n° de tel et du texte à envoyer.

J'aimerais pouvoir aller jusqu'au bout, c'est à dire :
Jusqu'à ce que soient copiés dans le logiciel d'envoi du sms
1 - le n°,
2 - le texte à envoyer,

J'ai fait un petit fichier gif qui, je l'espère, vous montrera mieux mon attente.
Ce fichier gif est issu de l'excellent logiciel LICEcap que patricktoulon a eu la gentillesse de me faire connaître.

Voici la procédure :
Au prélable :
- le classeur de travail est ouvert,
- le logiciel CallPad est ouvert,

Acheminement :
1 - clic dans la colonne K à partir de la ligne 7 pour ouvrir l'UF et choisir le type de sms,
2 - afficher le CallPad pour faire CTRL V à l'emplacement du N° -sélectionner sms + clic la où sera copié le texte,
3 - clic sur le bouton "copie texte" (dans la feuille Textes SMS qui s'est affichée),
4 - afficher le CallPad pour faire CTRL V,
5 - et peut-être (je continue de rêver) le clic sur "envoyer" si tout ça est fiable à 100%)

Je joins 3 fichiers :
- classeur de travail,
- photo du CallPad qui montre où est le bouton "sms",
sms_bouton.jpg
- le gif qui montre le cheminement.
test.gif


Voilà certainement une codification particulière et si c'est possible, ce serait génial pour mon travail et serait certainement utiles pour d'autres.

Merci déjà pour m'avoir lu :)
Amicalement,
lionel
 

Pièces jointes

  • isitelImmobRdV_test_allege.xlsm
    144 KB · Affichages: 10
Dernière édition:

eriiic

XLDnaute Barbatruc
Merci pour ton lien ... je vais y aller dès que j'ai un moment en courant LOL
J'y suis allé :
Flûte, je viens d'essayer = Invalid parameters
ça marche chez toi ?
Oh !!! faut suivre un peu, et lire le lien que tu as toi-même fourni ;-)
C'est ainsi que la doc de ton API te dit de fabriquer le lien permettant l'envoi d'un SMS.
Tu remplaces <ligne keyyo>, <destination> et <contenu du sms> par n° du demandeur, n° du demandé et texte SMS
eric
 

eriiic

XLDnaute Barbatruc
Le soucis c'est que je n'ai plus d'excel pour le moment.
J'ai voulu faire une réparation 'approfondie' proposée par office. En fait de réparation il m'a tout désinstallé (c'est sûr, plus de bugs comme ça) et impossible de le réinstaller pour l'instant.
Tu peux déjà tester manuellement en te fabriquant l'adresse dans ton navigateur préféré et voir si c'est ok.
<ligne keyyo> doit être un n° déclaré chez eux.
Ensuite tu cherches ici ou dans google comment ouvrir un lien en vba.
eric
 

eriiic

XLDnaute Barbatruc
Bonjour,

bon, j'ai récupéré mon Office. Très blagueur MS...
Pas de retour sur la proposition de Dranreb...

A tout hasard essaie qq chose comme ça pour voir :
VB:
Sub test()
    Dim ddeur As String, dde As String, txt As String
    ddeur = "0123456789"    ' ligne keyyo déclarée
    dde = "0612345678"    ' n° demandé
    txt = "test SMS"
    ThisWorkbook.FollowHyperlink "https://ssl.keyyo.com/sendsms.html?ACCOUNT=& ddeur & " & CALLEE = " & dde & " & MSG = " & txt, , True"
End Sub

Là c'est juste pour tester si le lien est correct et si le sms part.
A près il faudra sans doute ajouter la fermeture du navigateur ouvert mais là je ne sais pas trop faire.
Sinon essaie en direct dans la barre d'adresse du navigateur :
Lien supprimé SMS
en mettant des n° réels, que tu saches si la syntaxe est correcte et si ton système le traite bien.
eric
 

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour eriiiic, le Forum,

Merci eriiiic pour ce que tu fais.
Pour l'instant, je ne peux pas travailler sur le sujet car mon assistante est très malade et je suis dans débordé de travail.
Dès que possible, je reprends pour voir si je suis capable, avec votre aide d'avancer.

Belle journée à toutes et à tous,
lionel,
 

Discussions similaires

Statistiques des forums

Discussions
312 110
Messages
2 085 388
Membres
102 882
dernier inscrit
Sultan94