Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
VBA посчитать кол-во заполненных строк или ячеек
 
#1
15.05.2014 19:39:49
Подскажите, как, открыв макросом стороннюю книгу, можно на определенном ее листе посчитать кол-во заполненных ячеек в столбце A.
 
 
 
#2
15.05.2014 19:44:08
где конкретный пример?
 
 
 
#3
15.05.2014 19:59:03
Set wb2 = Workbooks.Open("C:\Users\U_M06TT\Desktop\Excel\Качество\Март 2014.xls", 0, 1)   'открыл книгу
Далее необходимо посчитать кол-во заполненных ячеек в файле Март 2014.xls   sheets("данные").range("A:A")

Скажите что еще написать, я в этом не оч силен.
 
 
 
#4
15.05.2014 20:31:10
Нашел решение, всем спасибо!
Код
ThisWorkbook.Worksheets("данные".Activate 
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate 
k = ActiveCell.Row    'номер последней заполненной строки
 
 
 
#5
16.05.2014 01:48:48
так кол-во заполненных
Код
Msgbox "Кол-во заполненных ячеек в столбце А: " & Worksheetfunction.CountA(Columns(1))
так номер последней строки
Код
Msgbox "Номер последней заполненной строки: " & Cells(Rows.Count,1).end(xlup).row
Изменено: Scripter - 16.05.2014 08:58:46
 
 
 
#6
16.05.2014 13:43:49
А если необходимо открыв книгу, посчитать Кол-во заполненных ячеек, предварительно выбрав лист, как использовать Worksheetfunction.CountA(Columns(1))
 
 
 
#7
16.05.2014 17:44:27
Если нужно чтоб при открытии книги срабатывал код, то нужно поместить код в "Эта книга"



Если вам нужно посчитать ВСЕ заполненные (не найти последнюю строку) ячейки на листе:
Скрытый текст
В определенном столбце
Скрытый текст
или
Скрытый текст
Найти последнюю строку на листе, если последнее значение которое увеличивает диапазон может быть в любом столбце
Скрытый текст
Найти последнюю строку на листе по определенному полю
Скрытый текст
Изменено: Scripter - 16.05.2014 17:48:46
 
 
 
Страницы: 1
Наверх