Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как автоматизировать замену содержимого ячеек - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Как автоматизировать замену содержимого ячеек
Maximan Дата: Четверг, 06.12.2012, 16:04 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Уважаемые гуру помогите решить задачку.
Суть вопроса:
Есть ячейки в которых содержится формула напр. (a1)=B1+1 (a2)=C1+1 (a3)=B1+2 (a4)=B1+1 и т.д. нужно как-то исхитрится и придумать как можно поменять автоматически содержимое формул во всех ячейках на (a1)=Z1+B1+1 (a2)=Z1+C1+1 (a3)=Z1+B1+2 (a4)=Z1+B1+1
Если можно сразу с примером.
Таких ячеек около 600 штук и вручную это очень долго.
Спасибо
 
Ответить
СообщениеУважаемые гуру помогите решить задачку.
Суть вопроса:
Есть ячейки в которых содержится формула напр. (a1)=B1+1 (a2)=C1+1 (a3)=B1+2 (a4)=B1+1 и т.д. нужно как-то исхитрится и придумать как можно поменять автоматически содержимое формул во всех ячейках на (a1)=Z1+B1+1 (a2)=Z1+C1+1 (a3)=Z1+B1+2 (a4)=Z1+B1+1
Если можно сразу с примером.
Таких ячеек около 600 штук и вручную это очень долго.
Спасибо

Автор - Maximan
Дата добавления - 06.12.2012 в 16:04
Serge_007 Дата: Четверг, 06.12.2012, 16:10 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016


К сообщению приложен файл: 7554730.jpg (39.5 Kb) · 8044363.jpg (41.6 Kb) · 8002563.jpg (38.2 Kb)


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение


Автор - Serge_007
Дата добавления - 06.12.2012 в 16:10
AlexM Дата: Четверг, 06.12.2012, 21:24 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация: 1129 ±
Замечаний: 0% ±

Excel 2003
А без "ё" можно?
Сразу "=" заменить на "=z1+"



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
СообщениеА без "ё" можно?
Сразу "=" заменить на "=z1+"

Автор - AlexM
Дата добавления - 06.12.2012 в 21:24
Serge_007 Дата: Четверг, 06.12.2012, 22:11 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Вот что значит шаблонность мышления smile
Таким способом обычно заменяют ссылки на другие книги в формулах, в таком случае без ё не обойтись
Для данной задачи необходимости в лишнем действии конечно нет


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеВот что значит шаблонность мышления smile
Таким способом обычно заменяют ссылки на другие книги в формулах, в таком случае без ё не обойтись
Для данной задачи необходимости в лишнем действии конечно нет

Автор - Serge_007
Дата добавления - 06.12.2012 в 22:11
Maximan Дата: Четверг, 06.12.2012, 22:25 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Парни извините не совсем корректно указал пример вот конкретно эта задача:

Нужно вот это
=ЕСЛИ(Z8<ДВССЫЛ(СЦЕПИТЬ(G3;"P";W8+15));"";ДВССЫЛ(СЦЕПИТЬ(G3;"AV";(W8+15)))))
Заменить на это
=ЕСЛИ(СЦЕПИТЬ(G3;"P";W8+15)>J3;"";ЕСЛИ(Z8<ДВССЫЛ(СЦЕПИТЬ(G3;"P";W8+15));"";ДВССЫЛ(СЦЕПИТЬ(G3;"AV";(W8+15)))))

Число после W8+ всегда увеличивается на 1
 
Ответить
СообщениеПарни извините не совсем корректно указал пример вот конкретно эта задача:

Нужно вот это
=ЕСЛИ(Z8<ДВССЫЛ(СЦЕПИТЬ(G3;"P";W8+15));"";ДВССЫЛ(СЦЕПИТЬ(G3;"AV";(W8+15)))))
Заменить на это
=ЕСЛИ(СЦЕПИТЬ(G3;"P";W8+15)>J3;"";ЕСЛИ(Z8<ДВССЫЛ(СЦЕПИТЬ(G3;"P";W8+15));"";ДВССЫЛ(СЦЕПИТЬ(G3;"AV";(W8+15)))))

Число после W8+ всегда увеличивается на 1

Автор - Maximan
Дата добавления - 06.12.2012 в 22:25
AlexM Дата: Четверг, 06.12.2012, 22:30 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация: 1129 ±
Замечаний: 0% ±

Excel 2003
Пример лучше бы в файле.
Quote (Maximan)
Число после W8+ всегда увеличивается на 1

Само увеличивается?



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
СообщениеПример лучше бы в файле.
Quote (Maximan)
Число после W8+ всегда увеличивается на 1

Само увеличивается?

Автор - AlexM
Дата добавления - 06.12.2012 в 22:30
Maximan Дата: Четверг, 06.12.2012, 22:54 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Ячейки а1 а2 уже с исправлениями, в остальные ниже "а" нужно внести изменения.

К сожалению, всю программу выложить не могу - она на взаимосвязях с другими файлами.
К сообщению приложен файл: 3149054.xlsx (9.4 Kb)
 
Ответить
СообщениеЯчейки а1 а2 уже с исправлениями, в остальные ниже "а" нужно внести изменения.

К сожалению, всю программу выложить не могу - она на взаимосвязях с другими файлами.

Автор - Maximan
Дата добавления - 06.12.2012 в 22:54
AlexM Дата: Четверг, 06.12.2012, 22:57 | Сообщение № 8
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация: 1129 ±
Замечаний: 0% ±

Excel 2003
А тут без "ё" не получается
Замена 1
= заменяем на ёЕСЛИ(СЦЕПИТЬ(G3;"P";W8+15)>J3;"";
Замена 2
)))) меняем на )))))
Замена 3
ё меняем на =

PS. А про ДВССЫЛ в добавлении СЦЕПИТЬ(G3;"P";W8+15) забыли?



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.


Сообщение отредактировал AlexM - Четверг, 06.12.2012, 23:04
 
Ответить
СообщениеА тут без "ё" не получается
Замена 1
= заменяем на ёЕСЛИ(СЦЕПИТЬ(G3;"P";W8+15)>J3;"";
Замена 2
)))) меняем на )))))
Замена 3
ё меняем на =

PS. А про ДВССЫЛ в добавлении СЦЕПИТЬ(G3;"P";W8+15) забыли?

Автор - AlexM
Дата добавления - 06.12.2012 в 22:57
Maximan Дата: Пятница, 07.12.2012, 00:13 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Я наверное слишком глупый, не обессудьте )
Не понял что именно меняем во второй замене?

PS Точно - забыл! Спасибо!
 
Ответить
СообщениеЯ наверное слишком глупый, не обессудьте )
Не понял что именно меняем во второй замене?

PS Точно - забыл! Спасибо!

Автор - Maximan
Дата добавления - 07.12.2012 в 00:13
RAN Дата: Пятница, 07.12.2012, 00:18 | Сообщение № 10
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Quote (Maximan)
Не понял что именно меняем во второй замене?

Нужно взять карандашик и потыкать в скобочки. biggrin


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение
Quote (Maximan)
Не понял что именно меняем во второй замене?

Нужно взять карандашик и потыкать в скобочки. biggrin

Автор - RAN
Дата добавления - 07.12.2012 в 00:18
AlexM Дата: Пятница, 07.12.2012, 00:19 | Сообщение № 11
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация: 1129 ±
Замечаний: 0% ±

Excel 2003
Еще подозрение на ошибку
1. Проверьте условия. Что-то там неправильно.
2. ДВССЫЛ(СЦЕПИТЬ(G3;"AV";(W8+15))) лишние скобки надо так ДВССЫЛ(СЦЕПИТЬ(G3;"AV";W8+15))

Во второй замене меняем 4 скобки на 5 скобок. Хотя если убирать ошибку 2, то во второй замене меняем (W8 на W8



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.


Сообщение отредактировал AlexM - Пятница, 07.12.2012, 00:20
 
Ответить
СообщениеЕще подозрение на ошибку
1. Проверьте условия. Что-то там неправильно.
2. ДВССЫЛ(СЦЕПИТЬ(G3;"AV";(W8+15))) лишние скобки надо так ДВССЫЛ(СЦЕПИТЬ(G3;"AV";W8+15))

Во второй замене меняем 4 скобки на 5 скобок. Хотя если убирать ошибку 2, то во второй замене меняем (W8 на W8

Автор - AlexM
Дата добавления - 07.12.2012 в 00:19
AlexM Дата: Пятница, 07.12.2012, 00:32 | Сообщение № 12
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация: 1129 ±
Замечаний: 0% ±

Excel 2003
И еще при всех заменах все равно руками придется менять число после W8, а чтобы менялось автоматически при протягивании формулы нужны еще замены.
Т.е. формула переделывается полностью, а если с условиями разобраться, то формулу не узнать.
Может ее заново написать и тянуть?



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
СообщениеИ еще при всех заменах все равно руками придется менять число после W8, а чтобы менялось автоматически при протягивании формулы нужны еще замены.
Т.е. формула переделывается полностью, а если с условиями разобраться, то формулу не узнать.
Может ее заново написать и тянуть?

Автор - AlexM
Дата добавления - 07.12.2012 в 00:32
AlexM Дата: Пятница, 07.12.2012, 01:13 | Сообщение № 13
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация: 1129 ±
Замечаний: 0% ±

Excel 2003
Изменил условия, если неправильно, то сделайте как в вашем файле.
Сейчас значение условия дает ИСТИНУ если значение ДВССЫЛ(СЦЕПИТЬ($G$3;"P";$W$8+15 между J3 И Z8, т.е больше Z8 и меньше J3
Code
=ЕСЛИ(И($Z$8<ДВССЫЛ(СЦЕПИТЬ($G$3;"P";$W$8+ЦЕЛОЕ((СТРОКА($A31)-1)/2)));$J$3>ДВССЫЛ(СЦЕПИТЬ($G$3;"P";$W$8+ЦЕЛОЕ((СТРОКА($A31)-1)/2))));ДВССЫЛ(СЦЕПИТЬ($G$3;"A"&ЕСЛИ(ОСТАТ(СТРОКА($A31);2);"V";"Y");$W$8+ЦЕЛОЕ((СТРОКА($A31)-1)/2)));"")

См. файл в отдельном столбце показано как происходит увеличение на единицу и как меняется имя столбца
К сообщению приложен файл: 3149054_new.xls (29.5 Kb)



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.


Сообщение отредактировал AlexM - Пятница, 07.12.2012, 08:14
 
Ответить
СообщениеИзменил условия, если неправильно, то сделайте как в вашем файле.
Сейчас значение условия дает ИСТИНУ если значение ДВССЫЛ(СЦЕПИТЬ($G$3;"P";$W$8+15 между J3 И Z8, т.е больше Z8 и меньше J3
Code
=ЕСЛИ(И($Z$8<ДВССЫЛ(СЦЕПИТЬ($G$3;"P";$W$8+ЦЕЛОЕ((СТРОКА($A31)-1)/2)));$J$3>ДВССЫЛ(СЦЕПИТЬ($G$3;"P";$W$8+ЦЕЛОЕ((СТРОКА($A31)-1)/2))));ДВССЫЛ(СЦЕПИТЬ($G$3;"A"&ЕСЛИ(ОСТАТ(СТРОКА($A31);2);"V";"Y");$W$8+ЦЕЛОЕ((СТРОКА($A31)-1)/2)));"")

См. файл в отдельном столбце показано как происходит увеличение на единицу и как меняется имя столбца

Автор - AlexM
Дата добавления - 07.12.2012 в 01:13
Maximan Дата: Пятница, 07.12.2012, 07:08 | Сообщение № 14
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

О супер, все думал как встроить это в формулу! Огромное спасибо!
 
Ответить
СообщениеО супер, все думал как встроить это в формулу! Огромное спасибо!

Автор - Maximan
Дата добавления - 07.12.2012 в 07:08
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!