Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Макрос. Цикл. Заменить значения в ячейках.
 
Доброе утро, уважаемые форумчане.
Сделал простой цикл по замене значений в ячейках, а он не работает. Помогите, пожалуйста, поправить дело.
Цикл. Макрос должен в LF1:LT21 (жёлтых ячейках) значения, встречающиеся в LF1:LT1 заменить на соответствующее из LF11:LT11.
Спасибо за внимание.
 
Здравствуйте.
Как-то не очень понятно задание - сами пишете диапазон для ЗАМЕНЫ с 1 по 21 строку, а значения брать из 11 строки того же диапазона?
Кому решение нужно - тот пример и рисует.
 
И Вам доброе. Вот в этой строке Вы что пытаетесь получить? Сейчас переменной lColumn присваивается значение ячейки (1, 332), т.е. буква о, ну соответственно какой может быть цикл от 318 до о? Если Вам нужен номер столбца, то смысла в этой переменной вообще нет., пишите сразу For i=318 To 332
Код
lColumn = Cells(1, 332)
Изменено: Sanja - 22 Апр 2015 09:35:44
Согласие есть продукт при полном непротивлении сторон.
 
Код
'lColumn = Cells(1, 332) 'последний (LT).
For i = 318 To 332 'от LF до LT. 
Sanja, спасибо. Дошло.
 
Ну и дальше Вы проверяете ячейку (4,i) на наличие данных. 4-я строка у Вас пустая, поэтому там до замены не доходит в принципе
Согласие есть продукт при полном непротивлении сторон.
 
Да, это я уже исправил. Спасибо.
Страницы: 1
Читают тему (гостей: 1)