НЕ могу вставить в Excel таблицу гиперссылку из Delphi

← →
GekaNaz © (2005-07-28 18:18) [0]

Это то, до чего я смог догадаться, но выходит ошибка Acces violation, подскажите, как вставить гиперссылку, на VB знаю как делается(в макросе подсмотрел) а в дельфях не могу :(

ISheet.Hyperlinks.Add(ISheet.Cells.Item[3,3],"http://fox.tomsk.ru/cat/?id=3334","www");

← →
Reindeer Moss Eater © (2005-07-28 18:35) [1]

Гиперссылка здесь не виновата.
У тебя ISheet никуда не указывает.

← →
GekaNaz © (2005-07-29 08:46) [2]

А если я делаю так? разве никуда не указывает ?

ISheet: Excel8TLB._Worksheet;
begin
ISheet := IWorkbook.Worksheets.Item[1] as Excel8TLB._Worksheet;

← →
КиТаЯц © (2005-07-29 09:20) [3]

var XL: Variant; ... begin ... XL := CreateOleObject("Excel.Application"); ... XL.Workbooks.Add; ... XL.Range["A1","A1"].Select; //XL.Selection.Font.Size:=8; XL.ActiveSheet.Hyperlinks.Add( Anchor:=XL.Selection, Address:="http://www.games.telcosoft.ru/", ScreenTip:="Официальный сайт программы"+_+Application.Title //TextToDisplay:="Почаще сюда заглядывайте :)" ); ...

Проверено на OfficeXP

← →
GekaNaz © (2005-07-29 09:52) [4]

[Error] main.pas(2527): Undeclared identifier: "Hyperlinks"

у меня тоже Office XP но выскакивает ошибка

← →
КиТаЯц © (2005-07-29 13:14) [5]

>GekaNaz © (29.07.05 09:52) [4]

Странно сие... Попробуй

uses ComObj{, ExcelXP}; // отключить "лишние" юниты кроме ComObj

← →
GekaNaz © (2005-07-29 13:23) [6]

Уже решил проблему... :(

with ISheet do Hyperlinks.Add(Range["A1", EmptyParam],
"http://www.delphikingdom.com/",
EmptyParam);
а проблема была в том, что этот код я писал выше определения переменной ISheet. Просто прога была давно писана... аж сам заблудился.

Только вот теперь надо отобразить вместо адреса в ячейке другой текст, не получается, если в качестве последнего параметра задать строку, то она выводится вместе с адресом URL

Подскажите пожалуйста, где взять библиотеку
unit Excel8TLB;(), только для поновее, для 2000-го хотябы

GekaNaz © (30.07.05 12:27)
Подскажите пожалуйста, где взять библиотеку
unit Excel8TLB;(), только для поновее, для 2000-го хотябы

если на твоей машине установлен хотябы офис2000, то импортировать:
project->import type library...->выбрать Microsoft Excel номер_версии Object Library->Create Unit
если каталог по умолчанию не изменял, то добавить $(DELPHI)\Imports; в пути поиска твоего проекта

НЕ могу вставить в Excel таблицу гиперссылку из Delphi Найти похожие ветки