ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Чтение из Excel
5 сообщений из 5, страница 1 из 1
Чтение из Excel
    #33832783
Олег Михайлов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Олег Михайлов
Гость
Подскажите пожалуйста, как сделать следующее: существует файл 1.xls,
Set oWorkBook = GetObject("c:\1.xls")
Описан путь к файлу, для считывания.
Необходимо посчитать кол-во строк
...
Рейтинг: 0 / 0
05.07.2006, 14:01
| Ответить | Цитировать | Написать  
Чтение из Excel
    #33832852
ВasiС
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВasiС
Гость
Можно:
1. Банально пересчитать количество непустых строк в какой-либо колонке
2. Есть какая-то функция Excel, которая выдаёт номер последней заполненной строки (не помню как выглядит=(
3. Можно приконнектиться к файлу через ADO и сделать SQL запрос о количестве записей в таблице.

Что конкретно тебя устроит, зависит от твоего желания разобраться и структуры таблицы.
...
Рейтинг: 0 / 0
05.07.2006, 14:22
| Ответить | Цитировать | Написать  
Чтение из Excel
    #33833629
Олег Михайлов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Олег Михайлов
Гость
Каким образом это можно сделать на VB. Я с этим столкнулся впервые
...
Рейтинг: 0 / 0
05.07.2006, 17:15
| Ответить | Цитировать | Написать  
Чтение из Excel
    #33833776
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
Код: plaintext
1.
2.
3.
Set oWorkBook = GetObject("aaa.xls")
for i= 1  to oWorkBook.Worksheets.Count
    Echo oWorkBook.Worksheets(i).UsedRange.Rows.Count
next
...
Рейтинг: 0 / 0
05.07.2006, 17:58
| Ответить | Цитировать | Написать  
Чтение из Excel
    #33833948
Letter_D
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Letter_D
Участник
Количество строк, или последняя заполненная строка?
Это важно.
Если первое, то - вариант от White Owl:
Код: plaintext
Worksheets(i).UsedRange.Rows.Count
Если второе, то так:
Код: plaintext
Worksheets(i).UsedRange.SpecialCells(xlCellTypeLastCell).Row

Ибо UsedRange может начинаться и не с первой строки, ага
...
Рейтинг: 0 / 0
05.07.2006, 18:59
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Чтение из Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/moderation_log.php?user_name=%D0%B8%D0%BA%D0%BE%D0%BD%D0%BE%D1%81%D1%82%D0%B0%D1%81]:
 0ms
get settings:
 6ms
get forum list:
 10ms
get settings:
 5ms
get forum list:
 10ms
get settings:
 6ms
get forum list:
 13ms
get settings:
 6ms
get forum list:
 9ms
get settings:
 7ms
get forum list:
 9ms
get settings:
 7ms
get forum list:
 15ms
get settings:
 8ms
get forum list:
 14ms
get settings:
 7ms
get forum list:
 16ms
get settings:
 6ms
get forum list:
 13ms
get settings:
 8ms
get forum list:
 13ms
get settings:
 9ms
get forum list:
 13ms
get settings:
 7ms
get forum list:
 12ms
get settings:
 5ms
get forum list:
 10ms
get settings:
 8ms
get forum list:
 11ms
get settings:
 5ms
get forum list:
 17ms
get settings:
 8ms
get forum list:
 12ms
get settings:
 5ms
get forum list:
 9ms
get settings:
 7ms
get forum list:
 12ms
get settings:
 10ms
get forum list:
 17ms
get settings:
 9ms
get forum list:
 17ms
get settings:
 9ms
get forum list:
 20ms
get settings:
 8ms
get forum list:
 15ms
get settings:
 9ms
get forum list:
 17ms
get settings:
 12ms
get forum list:
 16ms
get settings:
 11ms
get forum list:
 15ms
get settings:
 8ms
get forum list:
 15ms
get settings:
 9ms
get forum list:
 16ms
get settings:
 9ms
get forum list:
 20ms
get settings:
 8ms
get forum list:
 14ms
get settings:
 9ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 60ms
get topic data:
 14ms
get forum data:
 2ms
get page messages:
 61ms
get tp. blocked users:
 2ms
others: 37236ms
total:  38031ms
созд. / загр.: 38031ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]