Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как посчитать количество столбцов в Excel с помошью VBA? / 5 сообщений из 5, страница 1 из 1
07.06.2013, 17:16
    #38290785
msleg
msleg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как посчитать количество столбцов в Excel с помошью VBA?
Как посчитать количество столбцов в Excel с помошью VBA? Строчки я считаю так
Код: vbnet
1.
kol_strok = .Cells(Rows.Count, 1).End(xlUp).Row
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2013, 17:40
    #38290830
Прогер_самоучка
Прогер_самоучка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как посчитать количество столбцов в Excel с помошью VBA?
mslegКак посчитать количество столбцов в Excel с помошью VBA? Строчки я считаю так
Код: vbnet
1.
kol_strok = .Cells(Rows.Count, 1).End(xlUp).Row


iColumn = xlwTest.ActiveSheet.UsedRange.Column + xlwTest.ActiveSheet.UsedRange.Columns.Count - 1

З.Ы. Здесь через акс. Подстройте под себя.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2013, 17:57
    #38290858
Прогер_самоучка
Прогер_самоучка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как посчитать количество столбцов в Excel с помошью VBA?
Прогер_самоучкаmslegКак посчитать количество столбцов в Excel с помошью VBA? Строчки я считаю так
Код: vbnet
1.
kol_strok = .Cells(Rows.Count, 1).End(xlUp).Row


Код: vbnet
1.
iColumn = xlwTest.ActiveSheet.UsedRange.Column + xlwTest.ActiveSheet.UsedRange.Columns.Count - 1



З.Ы. Здесь через акс. Подстройте под себя.
Либо, на ваш манер
Код: vbnet
1.
iColumn=Cells.SpecialCells (xlLastCell).Column
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2013, 20:02
    #38290992
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как посчитать количество столбцов в Excel с помошью VBA?
Если аналогично подсчету строк:
Код: vbnet
1.
lColumnsCnt = .Cells(1, .columns.count).End(xlToLeft).Column



Для инфо: Как определить последнюю ячейку на листе через VBA?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.06.2013, 14:20
    #38291271
msleg
msleg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как посчитать количество столбцов в Excel с помошью VBA?
The_Prist,

Спасибо все получилось
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как посчитать количество столбцов в Excel с помошью VBA? / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 461ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2174746]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 40ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 42ms
get tp. blocked users:
 2ms
others: 334ms
total:  461ms
x
x
Закрыть


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