|
Вытащить из Exel.
| ☑ |
0
wade25
05.10.11
✎
13:01
|
Из 2003 все норм если так
ололо = Лист.Cells(4, 2).Value;
Как будет для старшей версии? Или смотреть в другом месте нужно?
|
|
1
wade25
05.10.11
✎
13:45
|
Есть кто? =)
|
|
2
Rie
05.10.11
✎
13:46
|
(1) Где?
(0) А в чём проблема со старшими версиями?
|
|
3
wade25
05.10.11
✎
23:29
|
Т.е. нашел проверку на версии...
Версия = Лев(ExcelПриложение.Version,Найти(ExcelПриложение.Version,".")-1);
Если Версия = "8" тогда
Строки = ExcelПриложение.Cells.CurrentRegion.Rows.Count;
Иначе
Строки = ExcelЛист.Cells.SpecialCells(xlCellTypeLastCell).Row;
Конецесли;
Т.е.тут если восьмерка то он автоматически считывает все строки, а если НЕ 8ка, то нужно указать номер последней строки?
Или я чего путаю, объяснить плз этот код =)
|
|
4
wade25
06.10.11
✎
06:04
|
ап =)
|
|
5
Rie
06.10.11
✎
06:35
|
(3) Так тебе что нужно-то?
Найти последнюю ячейку на листе Excel? Тогда SpecialCells или UsedRange.
Или тебя интересует смежный диапазон ячеек (раз к CurrentRegion обращаешься)?
|
|
6
Песец
06.10.11
✎
07:15
|
(3) СпешлСеллз мог выдавать неправильное количество. Сейчас, по-видимому, исправили.
|
|
7
wade25
06.10.11
✎
09:09
|
(5) Нужно сделать так, что бы вытащить данные из определенных ячеек на листе, если файл 2003 эксель, то все тащит, из 2008 и выше не тянет =)
|
|
8
wade25
06.10.11
✎
09:31
|
Может кто расшифрует строки? =)
(Cells.CurrentRegion.Columns.Count, 13);
(Cells(1,1).SpecialCells(11).Column);
|
|
9
wade25
06.10.11
✎
10:55
|
В общем если
ФайлСтрок = ExcelПриложение.Cells(1,1).SpecialCells(11).Row;
Все норм выводит, но в файле намного больше строк.
Если
ФайлСтрок = ExcelПриложение.Cells(1,1).SpecialCells(3600).Row;
пишет Невозможно получить свойство SpecialCells класса Range
Возможно не верно указано имя листа.
В чем ошибка?
|
|