Stránka 1 z 1

Vytáčení čísel přímo z Excelu nebo LibreOffice Calc

Napsal: pon 16. bře 2015 23:05:43
od xsouku04
Aby bylo možné volat telefonní čísla z webového prohlížeče nebo jiných programů, je třeba nainstalovat SIP program microsip, který si instaluje vlastní protokol "SIP", nebo si vlastní protokol registrovat ručně.
Doporučuji začít registrací "odorik:" protokolu.
Poté stačí otevřít v internetovém prohlížeči zadat do políčka s adresou odorik:608424631 nebo sip:608424631 a dojde k automatického vytočení zadaného telefonního čísla.

Existují dva nezávislé způsoby:

1) Pomocí nového sloupečku "volat přes Odorik"
V LibreOffice Calc použijte funkci: =HYPERLINK(CONCATENATE("odorik:";C3);"volat přes Odorik")
V českém Microsoft Excelu použijete funkci: =HYPERTEXTOVÝ.ODKAZ(CONCATENATE("odorik:";C3);"volat přes Odorik")
Kde C3 odkazuje na buňku (nahradíte podle Vaší tabulky), ve které je uloženo telefonní číslo. V LibreOffice je během kliknutí nutné držet zmáčknutou klávesu CTRL, což je rozumné opatření proti omylům, kdy buňku chcete např. jen editovat. V LibreOffice - aby bylo zřejmé, že buňka je klikací, můžete její text podtrhnout a obarvit na modro - v Excelu není třeba, provede se samo.

Obrázek
uri
Obrázek

Postup je též nyní popsán na wiki:
http://www.odorik.cz/w/siptapi:registra ... soft_excel

2) Pomocí makra - není potřeba nijak měnit vzhled tabulky - testováno jen s LibreOffice. Makro přiřadíte v menu "Nástroje" -> "Přizpůsobit" -> "Klávesnice" nějaké klávesové zkratce - např. F3. (U Funkce Kategorie vyberte "Makra LibreOffice" a poté najdete název svého makra.)
Potom už stačí najet na buňku, kde je telefonní číslo a zmáčknout F3 a hovor je objednán.

Kód: Vybrat vše

Option Explicit

Sub CallfromToolbar

Dim oSvc as object
Dim Cell as object
Dim TelNumber as string

Cell = ThisComponent.getCurrentSelection 'ThisComponent is the document that calls the macro

'The If statement is an attempt to check that the current selection is a single cell and not a range or a shape
If Cell.supportsService("com.sun.star.table.Cell") then
   TelNumber = Cell.String
   oSvc = createUnoService("com.sun.star.system.SystemShellExecute")
'   oSvc.execute(ConvertToUrl("c:\odorik\rubyw.exe"), "c:\odorik\odorik_callback.rb odorik:"+ TelNumber, 0)
   oSvc.execute(ConvertToUrl("odorik:"+ TelNumber), "", 0)
'   oSvc.execute(ConvertToUrl("skype:"+ SkypeIdentifier +"?call"), "", 0) 'the new one
Else
   Print "Vyberte prosim jen jedinou bunku"
End If

End sub
Makro bylo sestaveno a vyzkoušeno na základě těchto informací. Testováno s LibreOffice 4.4.1.2 a Windows 7.

Kromě uri "Odorik:", "Callto:" či "Skype:" můžete též zavolat přímo VoIP program s parametrem.
Editor Maker najdete:
Nástroje -> Makra -> Správce Maker ->LibreOffice Basic

V Google doc sice existuje také funkce hyperlink, vypadá to ale, že méně používaná URL nepodporuje. Jelikož nevidím žádný logický důvod, proč by měla některá URL fungovat a jiná nikoli, lze to považovat nejspíš za bug.

O tom jak pohodlně objednávat hovory z Firefoxu, Google Chrome, Thunderbirdu nebo Outlooku, jsme psali v minulé novince.

Re: Vytáčení čísel přímo z tabulky LibreOffice Calc

Napsal: úte 17. bře 2015 0:24:32
od mobilemanic
Teda, Vy se vyblbnete :-D

Re: Vytáčení čísel přímo z Excelu nebo LibreOffice Calc

Napsal: čtv 03. led 2019 18:23:32
od xsouku04
Nyní přibyl i návod jak snadno vytáčet telefonní čísla z tabulek uložených online pomocí google spreadsheet.

Google spreadsheet je něco jako excelovská tabulka, ale je celá uložena online a je možné ji snadno sdílet v týmu více lidí.

Google spreadsheet má ale umělé omezení, kdy je možné z tabulky klikat jen na vybraná url. Proto zde máme návod jak tohle umělé omezení obejít.

http://www.odorik.cz/w/siptapi:registra ... preadsheet

Pokud si nainstalujete např. program microsip, protokol sip:telefoni_cislo ze zaregistruje automaticky.