ok ich hab das problem jetzt selber gelößt und zwar läuft der Code wenn man Hyperlinks als Array auffasst.
Delphi-Quellcode:
FExcel := CreateOleObject('Excel.Application');
FExcelWorkBook := FExcel.Workbooks.Open(AFilePath);
ACount := FExcelWorkbook.ActiveSheet.Hyperlinks.Count;
AHypLink := FExcelWorkbook.ActiveSheet.Hyperlinks[1];
bei Word jedoch funktioniert es auch so
AHypLink := FWord.ActiveDocument.Hyperlinks.Item(AHypLinkIdx);
Das ist komisch, ist aber so g.
Gruß
Wenn das Meer unruhig ist und der Wind die Wellen treibt, erfreut es, vom Strand aus die Mühen eines Anderen zu beobachten.