Hiperlink szerkesztő makró [Megoldva]

Makró készítés, parancsfájl írás és az API használata

Hiperlink szerkesztő makró [Megoldva]

HozzászólásSzerző: brandboy » 2011. december 1., csütörtök 9:51

A témát leválasztottam az "egy probléma - egy téma" fórumszabály alapján.
Zizi64 glob.mod.


Az alábi excelben megtalálható makró open megfelelőjét keresem:

Function GetAddress(HyperlinkCell As Range)
addr = “”
If (HyperlinkCell.Hyperlinks.Count > 0) Then
addr = HyperlinkCell.Hyperlinks(1).Address
End If
GetAddress = addr
End Function

Igazából annyit szeretnék csak,hogy egy URL linkeket tartalmazó listából kinyerni a link szövegét. A fenti makró kódot találtam, és sikeresen alkalmaztam rá excelben.
OOO-ban elvileg a Hyperlink függvény erre van, de azt kipróbálva a link úgynevezett "kedves nevét"(excel súgóból vett terminus) a "hivatkozás szövegét" kapom eredményül a tényleges link helyett.(Amennyiben cellahivatkozákánt adom meg az ominózus adatot).
Segítsen valaki, migrálni a makrót, vagy felhomályosítani,hogy mit csinálok rosszul a hiperhivatkozás függvénnyel ! :knock:
próba.ods
A példa
(60.05 KiB) 258 alkalommal.
A hozzászólást 4 alkalommal szerkesztették, utoljára brandboy 2013. február 12., kedd 11:39-kor.
Libreoffice 3.4.4 a Windows XP-n / Openoffice az Ubuntu-n
brandboy
 
Hozzászólások: 3
Csatlakozott: 2011. december 1., csütörtök 8:45

Hiperlink szerkesztő makró

HozzászólásSzerző: Zizi64 » 2011. december 1., csütörtök 10:16

Üdv!

Légy szíves egy mintafájlt feltölteni ide.
(Demonstrálva, hogy milyen a struktúrája a bemenő adatoknak, - pl.: egy cellában egy hiperlink van? - és mi az a rész pontosan, amit ebből szeretnél kinyerni...)
Sokkal könnyebb az alapján segíteni.
Sok sikert!
Kovács Tibor (Win7x64Prof/W10x64prof: LO6.1.6;
winPenPack/PortableApps: LO3.3.1-6.3.1, AOO4.1.6
Ha megoldódott a probléma, jelöld a témaindító hozzászólásod címe elejének szerkesztésével - tedd hozzá: [Megoldva].
Avatar
Zizi64
Globális moderátorok
 
Hozzászólások: 3468
Csatlakozott: 2008. november 12., szerda 21:22
Tartózkodási hely: Budapest

Re: Hiperlink szerkesztő makró

HozzászólásSzerző: Zizi64 » 2011. december 1., csütörtök 13:46

Innen származó makró kódot tettem a fájlodba és - szerintem - működik:

http://user.services.openoffice.org/en/ ... =21&t=2762

próba2.ods
(65.13 KiB) 262 alkalommal.
Sok sikert!
Kovács Tibor (Win7x64Prof/W10x64prof: LO6.1.6;
winPenPack/PortableApps: LO3.3.1-6.3.1, AOO4.1.6
Ha megoldódott a probléma, jelöld a témaindító hozzászólásod címe elejének szerkesztésével - tedd hozzá: [Megoldva].
Avatar
Zizi64
Globális moderátorok
 
Hozzászólások: 3468
Csatlakozott: 2008. november 12., szerda 21:22
Tartózkodási hely: Budapest

Re: Hiperlink szerkesztő makró

HozzászólásSzerző: brandboy » 2011. december 2., péntek 6:45

Nagyon szépen köszönöm, valóban működik ! :bravo:
De másik munkalapon ill másik állományban már nem !
Libreoffice 3.4.4 a Windows XP-n / Openoffice az Ubuntu-n
brandboy
 
Hozzászólások: 3
Csatlakozott: 2011. december 1., csütörtök 8:45

Re: Hiperlink szerkesztő makró

HozzászólásSzerző: Zizi64 » 2011. december 2., péntek 14:07

Másik munkalapon (de ugyanabban a fájlban) nekem működik gond nélkül (LibO3.4.4).

Másik fájlban természetesen csak akkor működik, ha a makrót is átviszed a másik fájlba, illetve (kipróbáltam) akkor is működni fog, ha az OOo vagy Libo program makrókönyvtárába átemeled (Saját makrók)
Sok sikert!
Kovács Tibor (Win7x64Prof/W10x64prof: LO6.1.6;
winPenPack/PortableApps: LO3.3.1-6.3.1, AOO4.1.6
Ha megoldódott a probléma, jelöld a témaindító hozzászólásod címe elejének szerkesztésével - tedd hozzá: [Megoldva].
Avatar
Zizi64
Globális moderátorok
 
Hozzászólások: 3468
Csatlakozott: 2008. november 12., szerda 21:22
Tartózkodási hely: Budapest

Re: Hiperlink szerkesztő makró

HozzászólásSzerző: brandboy » 2011. december 2., péntek 15:32

Áh, az elrejtett oszlopok megzavartak,így hiába vártam a helyes eredményt a megfelelő helyen,mivel a rejtett mezők meg üresen maradtak. Így hibaüzenet nem volt,csak üres cellák. Egyből én is arra gyanakodtam,hogy a makró biztonsági szinttel,vagy a szervezéssel van a gond, de még banálisabb volt a probléma. :lol:
Libreoffice 3.4.4 a Windows XP-n / Openoffice az Ubuntu-n
brandboy
 
Hozzászólások: 3
Csatlakozott: 2011. december 1., csütörtök 8:45


Vissza: Testreszabás és kibővítés

Ki van itt

Jelenlévő fórumozók: nincs regisztrált felhasználó valamint 1 vendég

cron