Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Stlačte tlačidlo " Alt " a " F11 " súčasne . Vyberte " modul " v menu " Vložiť " , otvorí sa dialógové okno 
 2 
 Vložte nasledujúci kód do okna : . 
 
 Funkcia getAddress ( HyperlinkCell ako rozsah ) 
 
 getAddress = Nahradiť _ 
 
 ( . HyperlinkCell.Hyperlinks ( 1 ) Adresa , " mailto : " , " " ) 
 
 End Function 
 3 
 Stlačte tlačidlo " Alt " a " Q " súčasne uložiť funkciu . 
 4 
 Kliknite na ľubovoľnú bunku , do ktorej chcete extrahovať hypertextové prepojenie . 
 5 
 Zadajte nasledujúci kód , ktorý nahradil " XX " s bunkou obsadené hypertextové prepojenie : 
 
 = getAddress ( XX ) 
              
Copyright © počítačové znalosti Všetky práva vyhradené