Главная страница
    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.44 MB
Время: 0.044 c
15-1200365060
zSergey
2008-01-15 05:44
2008.02.17
Разыскивается компонент


15-1200305796
Stilet
2008-01-14 13:16
2008.02.17
Как проинсталить Perl?


2-1200919248
Alex_C
2008-01-21 15:40
2008.02.17
SizeOf для массивов более 32к


2-1200254364
AntonUSAnoV
2008-01-13 22:59
2008.02.17
работа с dbgrid


15-1200161665
Черный Шаман
2008-01-12 21:14
2008.02.17
Высокая, высокая наука.





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский