Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.02.17;
Скачать: [xml.tar.bz2];

Вниз

как получить имя листа Excel   Найти похожие ветки 

 
vvrz   (2008-01-24 12:01) [0]

Открываю нужный  Excel файл:
ExcelApp:=CreateOleObject("Excel.application");
  if OpenDialog1.Execute then
     Edit1.Text:=OpenDialog1.FileName;
workbook:=ExcelApp.workbooks.add(Edit1.Text);
ExcelApp.visible:=True;

Далее мне нужно открыть нужный мне лист и вернуть его имя, типо так:
list:=Workbook.ActiveSheet.Name;
Только вот возвращает пока имя первого листа, а не тот который я открываю.
Как получить имя выбранного листа?


 
DiamondShark ©   (2008-01-24 12:55) [1]


> мне нужно открыть нужный мне лист

"Нужный" -- это какой?
Доступ к листам осуществляется либо по индексу, либо по имени:
Workbook.Sheets(1).Activate
Workbook.Sheets("Лист1").Activate


> Только вот возвращает пока имя первого листа, а не тот который
> я открываю.

В приведённом коде ты никакой лист не "открываешь"


> Как получить имя выбранного листа?

"Выбранного" -- это какого? Кем и каким образом выбранного?
В книге есть просто листы и активный (он же текущий) лист.
Тебе какой надо?


 
vvrz   (2008-01-24 13:41) [2]

"Нужный" - это тот который выберет пользователь.
Пример: пользователь открывает через диалог файл xls, в нем допустим 5 листов, он просматривает содержимое каждого листа, находит лист с нужной информацией и оставляет этот лист активным(текущим), вот имя этого листа и нужно присвоить list.
Следующий файл может содержать, допустим 20 листов.
Имя файла xls, количество и наименование листов заранее не известно.



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

Форум: "Начинающим";
Текущий архив: 2008.02.17;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.054 c
3-1191395182
zorik
2007-10-03 11:06
2008.02.17
MySQL и Delphi


8-1174153247
San ciz
2007-03-17 20:40
2008.02.17
сохранение файла


15-1200306514
Смирнов
2008-01-14 13:28
2008.02.17
Тестирование сервисов


2-1201179793
Darvin
2008-01-24 16:03
2008.02.17
Как сделать окно fsStayOnTop только для своего приложения


15-1200319830
vajo
2008-01-14 17:10
2008.02.17
Проблема работы принера HP 1018 на WinVista Busines.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский