Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.08.21;
Скачать: CL | DM;

Вниз

Отркытие Excel файла сразу на нужном листе?   Найти похожие ветки 

 
Сергей Сергеевич   (2005-07-07 20:37) [0]

Добрый день всем.
Как открыть Excel файл на нужном листе через ShellExecute ?


 
Ученик   (2005-07-08 00:05) [1]

:-)


procedure TForm1.Button1Click(Sender: TObject);
begin
 ShellExecute(0, "open", "iexplore.exe", "file:///C:/test.xls#Лист2!A1", "", SW_SHOWMAXIMIZED)
end;


 
Сергей Сергеевич   (2005-07-08 00:26) [2]

Спасибо большое..А можно узнать откуда эта информация...


 
Ученик   (2005-07-08 07:18) [3]

>Сергей Сергеевич   (08.07.05 00:26) [2]
Excel-Вставить-Гиперссылка


 
Сергей Сергеевич   (2005-07-11 15:31) [4]

Вот так работает  ShellExecute(0, "open","iexplore.exe", "file:///C:/test.xls#Лист2!A1", "", SW_SHOWMAXIMIZED)
А так не работает
//  ShellExecute(0, "open", "EXCEL.exe",  "file:///C:/test.xls#Лист2!A2", "", SW_SHOWMAXIMIZED);

Хотя нужен второй случай...
В первом случае,когда открывать через эксплорер дополнительно вылазит диалог сохранения файла или загрузки из места хранения...:(


 
msguns ©   (2005-07-11 17:18) [5]

А почему именно через ShellExecute ?


 
menart ©   (2005-07-11 18:51) [6]

копай в сторону OleObject


 
Ученик   (2005-07-11 22:58) [7]

>Сергей Сергеевич   (11.07.05 15:31) [4]
 Вызов Excel.exe не получился, файл открывается на той странице, которая была активна при сохранении файла, поэтому первый ответ был с :-), если вызов через ShellExecute не принципиален, то можно использовать


uses
 ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
 Excel: Variant;
begin
 Excel := CreateOleObject("Excel.Application");
 Excel.WorkBooks.Open("c:\test.xls").Sheets["Лист2"].Select;
 Excel.Visible := True
end;




Страницы: 1 вся ветка

Текущий архив: 2005.08.21;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.027 c
14-1122443195
Digitman
2005-07-27 09:46
2005.08.21
Проблема FoxPro 2.x ISAM в MS Access 2003


8-1113269569
Медиамэн
2005-04-12 05:32
2005.08.21
Распарсить флэш-файл (swf)


4-1119859178
delphistik
2005-06-27 11:59
2005.08.21
Terminate Task


4-1119719487
ВломПридумывать
2005-06-25 21:11
2005.08.21
Кнопка с картинкой


1-1122895028
Arrows
2005-08-01 15:17
2005.08.21
Мигающая кнопка на панели задач