Hallo?
Naja... ich versteh nicht warum ein code einen ganzen tag lang funktioniert und dann gehts am nächsten tag nimmer. -.-
Und zwar öffne ich Excel, suche mit folgendem Code einen hyperlink:
Delphi-Quellcode:
try
Excel.Workbooks.Open('K:\2011\1_Projekte\12_Tomi\Werkstattnummern_2011.xlsx'); //open the excel workbook
if Excel.Range['I863', 'I863'].Hyperlinks.Count > 0 then //check if exist hyperlinks in the range
pfad := Excel.Range['I863', 'I863'].Hyperlinks[1].Address;
ShowMessage(Excel.Range['I863', 'I863'].Hyperlinks[1].Address); //show the hyperlink
finally
//
end;
und dann möchte ich mit folgendem Code das Verzeichnis öffnen:
ShellExecute(0, 'open', PChar(pfad), nil, nil, SW_ShowNormal);
und es passiert nichts -.- ... das ist doch ein witz oder?