Проблемы с циклом VBA For Next не работают
Я пытаюсь обернуть голову вокруг фрагмента кода, который работал для меня в прошлом и не работал сейчас в другом приложении. По сути, необходимо удалить все строки, содержащие информацию в определенном столбце, а остальные оставить нетронутыми. Когда я запускаю макрос, код выполняется без проблем, а просто удаляет некоторые строки со значениями, а не все. При запуске кода несколько раз подряд он в конечном итоге делает то, что задумано, но на самом деле это не удобно. Вот код:
Исходный файл имеет некоторые проблемы с форматированием, все, что предшествует присвоению iCol значения столбца, — это исправление формата, поэтому, пожалуйста, игнорируйте. iRow начинается с 2, чтобы избежать удаления заголовков файлов.
Любые идеи о том, почему цикл For не работает, как задумано?
2 ответа
Я надеюсь, что следующее поможет вам в вашей проблеме:
- Я обновил твой скрипт
- Добавлен комментарий, чтобы вы могли лучше понять и улучшить его в будущем
Я надеюсь, что это поможет вам. Всего наилучшего!
Как уже говорилось в комментариях, недостаток в вашем коде не был зациклен назад
Но я тем самым даю вам решение без зацикливания и использования только одной строки, благодаря методу SpecialCells объекта Range , определяющему его для фильтрации ячеек с некоторым «постоянным» (т.е. не производным от формул) значением
Это предполагает, что у вас всегда есть хотя бы одно значение ниже строки 1
Если это не так, просто добавьте проверку:
Просматривая весь код, вы должны придерживаться хорошей практики, чтобы избежать шаблона Select/Selection, Activate/ActiveXXX и всегда полностью квалифицировать диапазоны вплоть до родительских объектов их рабочих листов (если не рабочих книг), как показано ниже:
все объекты диапазона ( Columns() , Rows , Range , Cells ) ссылаются Worksheets(«MilestoneDueDate») через эту точку ( . ) перед ними
iCol устанавливается с помощью метода Find() в максимально ограниченном диапазоне
Источник
Не работает цикл Do While
Добрый день!
В написании макросов новичок-самоучка, поэтому не судите строго
Нужна помощь в написании макроса для обработки выгрузки.
Суть: есть книга Excel c двумя листами, один из которых — выгрузка по всем сотрудниками организации (выгрузка очень большая, свыше 15 000 сотрудников ) .
На втором листе должен формироваться список сотрудников, которые работают в аппарате организации со стажем больше или равным 13 лет.
Мой вариант макроса:
Проблема в этом макросе: макрос корректно отбирает сотрудников из выгрузки,которые соответствуют двум условиям, но на втором листе не формируется список сотрудников..
Подскажите, в чем проблема?
Заранее большое спасибо за помощь!
Помощь в написании контрольных, курсовых и дипломных работ здесь.
Вложения
| Пример.rar (15.8 Кб, 2 просмотров) |
Цикл: как работает цикл в цикле
Не могу понять как работает цикл в цикле например: repeat begin lalalala if что-то1<>100 then.
Я создал тему с нуля. И мне нужно было чтоб на главной странице(Главная).
Цикл работает неправильно, в то время как POST работает
Всем привет! Я хотел написать под php скрипт с авторизацией, брут, на своем сайте(подбор пароля).
Создать программу по всем 3 видам циклов. цикл с параметром,цикл с условием,цикл,и цикл с предусловием.
Найти сумму чисел 1 в квадрате до 10 c квадрате. операцию возведению в степень не использовать.
Решение
Если нашли нужную строку заполняем первый лист («Список») нужными данными, выйдем из второго цикла, курсор j остается на следующем строке листа («Выгрузка»), при следующих поисках j продолжается с текущего места.
coderxx, , большое Вам спасибо за помощь!
На работе часто сталкиваюсь с подобной задачей и очень хочется научиться оптимизировать работу с выгрузками. Но, к сожалению, адаптировать макрос под новую задачу не получилось и не понимаю почему… ведь все делала по Вашему образцу, только изменила некоторые условия.
Задача: есть выгрузка по составленным планам развития сотрудниками (какую компетенцию они развивают) — «Выгрузка». И есть список сотрудников с перечнем компетенций, которые они должны развить — «Сотрудники». Задача заключается в том, чтобы определить составил ли сотрудник план развития по нужной компетенции или нет (пример во вложении)
Мой вариант макроса:
Источник
Не работает цикл For. Next
Помощь в написании контрольных, курсовых и дипломных работ здесь.
Вложения
| Путевой лист ИКС прописная.7z (52.3 Кб, 1 просмотров) |
Цикл: как работает цикл в цикле
Не могу понять как работает цикл в цикле например: repeat begin lalalala if что-то1<>100 then.
Я создал тему с нуля. И мне нужно было чтоб на главной странице(Главная).
Цикл работает неправильно, в то время как POST работает
Всем привет! Я хотел написать под php скрипт с авторизацией, брут, на своем сайте(подбор пароля).
Создать программу по всем 3 видам циклов. цикл с параметром,цикл с условием,цикл,и цикл с предусловием.
Найти сумму чисел 1 в квадрате до 10 c квадрате. операцию возведению в степень не использовать.
Потому что не отслеживаете откуда берёте Cells(счетчик, 1)
Добавлено через 3 минуты
Спасибо, все работает!
Добавлено через 26 секунд
Спасибо, все заработало!
Цикл for не работает
начал учить с++ дошол к циклам, написал вот такой код, а он видает только число 11, подскажите в.
Не работает цикл
Подскажите, пожалуйста, как организовать цикл, для смены вопроса: На сервере нахожу нужный вопрос.
Не работает цикл for
Здравствуйте! подчеркивает i glBegin(GL_LINE_STRIP); double PI = 3.14159265358979323846;.
Здравствуйте,недавно начал изучать С, но знаю паскаль и питон. Пишу сюда первый раз. Столкнулся с.
Подскажите, почему в функции Viewfull() цикл срабатывает только на половину while (m1!=m2 &&.
Не работает цикл for
Всем привет! Необходимо было написать реализацию RSA, однако возникли проблемы с циклом for: for.
Источник
Не правильно работает цикл
Помощь в написании контрольных, курсовых и дипломных работ здесь.
Не правильно работает цикл
Sub prog5() Dim y As Single, x As Single, sum As Single sum = 0 y = 0 For x = -1 To 2 Step 0.5.
Я создал тему с нуля. И мне нужно было чтоб на главной странице(Главная).
Здравствуйте. В прикрепленном файле функция расчета с циклом while. Почему-то продолжает считать.
Не правильно работает вложенный цикл
Проблема в том,что сначала отрабатывает один цикл, потом другой. А должно быть в первом шаге зашел.
5-я строка
if arrTemp0(i, pole1) = arrTemp1(i) then
тут вижу еще один массив arrTemp1(i) — а он определен?
Добавлено через 26 минут
добавлю, что во 2 строке на arrTemp1 есть ссылка как на простую переменную а не массив
Да. arrTemp1 — массив уникальных значений, полученных из массива arrTemp0. Дело а том, что код работает, но почему-то не правильно суммирует значения. Если вместо arrTemp1(i) в пятой строке написать конкретное значение, например «Вася», то подсчет сумм происходит правильно.
Источник
Цикл перестает работать через некоторое время!
Помощь в написании контрольных, курсовых и дипломных работ здесь.
Через некоторое время перестает работать интернет
Переустановил комп, столкнулся с такой проблемой, что через некоторое время перестает работать.
Через некоторое время перестаёт работать кулер на БП. При перезагрузке не включается опять
Подскажите плз.Недавно столкнулся вот с такой проблемой. 3 года назад купил себе БП Thermaltake.
Canon mf3010 через некоторое время перестает сканировать
Проблема в том, что включаешь комп, включаешь мфу и все отлично работает, но через n-ое кол-во.
VPN Перестает идти передача данных через некоторое время
Здравствуйте OSX 10.10, хакинтош После подключения к VPN, через пару часов, а иногда и.
Решение
Счетчик- количество строк, пришедших с сервера!
Я вот, что подумал: а может ли процедура отсановиться, если я в редакторе VBA по коду лазаю, но при этом ничего не меняю!
Сабж происходит на win7 x64 что на старой, что на свежеустановленной винде. Пробовал ставить разные.
Через какое-то время перестает работать хук
использую хук WH_KEYBOARD_LL.Через некоторое время хук умирает(перестает работать),что делать.
XFX Radeon HD 6850 1gb GDDR5 стала работать хуже через некоторое время.
недавно приобрёл видеокарту XFX Radeon HD 6850 1GB GDDR5, и сразу начал проверять её в играх таких.
Цикл перестает работать
При обозначении переменной S с абсолютным значением в условии If для прекращения цикла ,весь этот.
Источник