Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
15.02.2010, 23:05
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Доброго всем дня. Помогите. Пишу цикл, но для того, что бы цикл окончил работу мне нужно знать номер последней строки с символом № Прикрепляю исходник...Удалять пустые строки нельзя... Заранее спасибо! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
15.02.2010, 23:10
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Vadiks, плохой исходник, очень плохой ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
15.02.2010, 23:11
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Извени, прошляпил...щас исправлюсь... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
15.02.2010, 23:12
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Вот... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
15.02.2010, 23:33
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Также циклом и ищите. в чем проблема? Sub pp() Dim iLastRow As Integer, i As Integer, k As Integer iLastRow = Cells(Rows.Count, 1).End(xlUp).Row For i = 1 To iLastRow If Left(Cells(i, 1), 1) = "№" Then k = i End If Next i MsgBox "Последняя строка с № - " & k End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
15.02.2010, 23:35
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Sub pp() Dim iLastRow As Integer, i As Integer iLastRow = Cells(Rows.Count, 1).End(xlUp).Row For i = iLastRow To 1 Step -1 If Left(Cells(i, 1), 1) = "№" Then MsgBox "Последняя строка с № - " & i Exit For End If Next i End Sub так оптимальней ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.02.2010, 00:07
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Dophin, Спасибо. Работает. Очень помог, я столкнулся с VBA неделю назад.(вообщем с программированием) И честно говоря, то что я хочу сделать, если конечно получится... сам буду в шоке... файл в нужный вид я уже преобразовал, макрос трудится где то около 5 минут... Теперь самое сложное, вывод на экран нужной информации... Очень надеюсь на Вашу поддержку... Еще раз Спасибо!!! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.02.2010, 00:33
|
|||
|---|---|---|---|
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Vadiksмакрос трудится где то около 5 минут... Процедура с временем выполнения 5 минут должна выполнять весьма трудоёмкую задачу... Вы обновление экрана отключали (Application.screenupdating=false)? Кроме того, есть ещё достаточно возможностей оптимизации кода. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.02.2010, 09:48
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Vadiks, Мы Вас поддерживаем ) а 5 минут - либо реально дофига, либо крайне неоптимизированно у Вас там случае нету конструкций? ...Select With Selection .... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.02.2010, 10:59
|
|||
|---|---|---|---|
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Vadiksгде то около 5 минут...удаляйте файл и делайте заново =) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.02.2010, 15:34
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Dophin, Конечно пять минут это очень много, конструкции нет... просто строк у файла. 60 000. И три цикла Goto которые перелапачивают эти 60 000 а за обновление экрана не знал, спасибо. А включается он потом как? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.02.2010, 15:55
|
|||
|---|---|---|---|
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Vadiksтри цикла Goto...Желательно избегать безусловных переходов VadiksА включается он потом как?...= true ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.02.2010, 15:59
|
|||
|---|---|---|---|
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Vadiksпросто строк у файла. 60 000. И три цикла Goto которые перелапачивают эти 60 000циклами For-Next 60000 строк не обрабатывают. в зависимости от задачи или sql-запросами, или встроенными ф-циями excel. например, поиск циклом - откровенная глупость, когда есть встроенный в excel поисковик, работающий в разы быстрее. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
16.02.2010, 16:00
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Vadiks, Application.ScreenUpdating = True ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
17.02.2010, 01:29
|
|||
|---|---|---|---|
|
|||
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
vlth, Goto включается If (условие)Then Goto start Else Goto finish ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
17.02.2010, 02:06
|
|||
|---|---|---|---|
Как узнать номер последней строки в Excel с символом № в VBA |
|||
|
#18+
Vadiks, крайне желательно создавать конструкции без GoTo: его использование считается в программировании "дурным тоном", поскольку затрудняет восприятие кода и его отладку. Его применение допускается для быстрого, в обход ветвлений, выхода в конец процедуры, скажем. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=61&mobile=1&tid=2178475]: |
0ms |
get settings: |
9ms |
get forum list: |
13ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
57ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
39ms |
get tp. blocked users: |
1ms |
| others: | 210ms |
| total: | 342ms |
| 0 / 0 |
