|
v8: количество строк в Excel? |
☑ |
0
chavalito
17.01.07
✎
17:42
|
Как получить количество строк в Excel?
|
|
1
Scooter
17.01.07
✎
17:45
|
Лист = Excel.Worksheets(1);
//Лист.Cells.SpecialCells(11).Select();//xlCellTypeLastCell = 11;
КолСтрок = Лист.Cells(1,1).SpecialCells(11).Row;
Если КолСтрок < 2 Тогда
Сообщить("В документе Excel лист № 1 пустой!!!");
Возврат;
КонецЕсли;
|
|
2
Neco
17.01.07
✎
17:54
|
Или
Строк = Excel.Cells.CurrentRegion.Rows.Count;
|
|
3
chavalito
17.01.07
✎
18:10
|
Спасибо.
Scooter, что передается в качестве параметра SpecialCells(11), почему 11?
|
|
4
Scooter
17.01.07
✎
18:16
|
(3)ну ты спросил
яндекс знает, VBA
|
|
5
Ковычки
17.01.07
✎
19:12
|
//*******************************************
Функция ПоследняяСтрока(Лист)
Вверх=-4162;
ПоследняяСтрокаВсе=Мин(Лист.Cells.SpecialCells(11).Row,65535);
ПоследняяКолонка=Лист.Cells.SpecialCells(11).Column.Count;
//РабочаяОбласть=Лист.Range(Лист.Cells(1,1),Лист.Cells(ПоследняяСтрока,ПоследняяКолонка));
ПоследняяСтрока = 0;
Для к=1 по ПоследняяКолонка Цикл
ПосленяяВрем=Лист.Cells(ПоследняяСтрокаВсе+1, к).End(Вверх).Row;
ПоследняяСтрока =Макс(ПосленяяВрем, ПоследняяСтрока );
КонецЦикла;
Возврат ПоследняяСтрока;
КонецФункции
|
|
6
Анцеранана
17.01.07
✎
19:34
|
(3) Передается значение типа XlCellType :
Const xlCellTypeLastCell = 11
Думаю слова LastCell расшифровывать не надо.
(Посмотрел в "Яндексе" который в Excele. ObjectBrowser называется)
|
|
7
Ковычки
17.01.07
✎
19:49
|
(6) варианты (1)(2) невсегда верно найдут последнюю заполненную ячейку...
|
|
8
zbv
17.01.07
✎
19:58
|
Так еще можно:
Excel.ActiveSheet.UsedRange.Rows.Count
|
|
9
Ковычки
17.01.07
✎
20:04
|
(8) К сожалению это вкорне не верно, в чем и я заблуждался :(
|
|