Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.06.2015, 12:39   #1
aliali75
Новичок
Джуниор
 
Регистрация: 06.05.2015
Сообщений: 1
По умолчанию связанные значения двух ячеек

на странице нужно связать значения ячеек двух столбцов, таким образом, чтобы если изменить значение одной, автоматом изменялась и значение второй. если изменить во второй ячейке, то меняется значение и в первой.
aliali75 вне форума Ответить с цитированием
Старый 08.06.2015, 12:43   #2
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Нужен макрос на событие изменения ячейки.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 08.06.2015, 12:47   #3
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

Ви замечательно описали ситуацию, которая в Екселе называется циклическая ссылка:

имеем две ячейки, назовем их А и В. Значение в А должно вычисляться, если изменилось значение в В и наоборот, значение в В должно вычисляться, если изменилось значение в А, так?

Допустим,
как-то изменилось значение в А - нужно автоматически поправить В,
но теперь изменилось значение В - нужно автоматически поправить А,
но теперь изменилось значение А - нужно автоматически поправить В
...
продолжать?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 08.06.2015, 12:53   #4
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Одно другому не мешает:
Код:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
    Application.EnableEvents = False
    Select Case Target
    Case [a1]: [b1] = [a1] * 2
    Case [b1]: [a1] = [b1] + 3
    End Select
    Application.EnableEvents = True
End Sub
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 08.06.2015, 13:05   #5
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

не мешает, но не решает поставленной задачи:
вносить изменения в зависимую ячейку, когда изменилось значение в управляющей ячейке
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 08.06.2015, 13:15   #6
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Задачу из #1 оно полностью решает. Правда только для двух ячеек, а не для двух миллионов - но про миллионы там не было ни слова.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 08.06.2015, 13:20   #7
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

даже для двух ячеек:
Цитата:
чтобы если изменить значение одной, автоматом изменялась и значение второй. если изменить во второй ячейке, то меняется значение и в первой
на каком шаге остановить эти взаимные автоматические изменения 2-х ячеек из-за автоматических изменений в них?

хотя...
"если изменить" - это не "если изменилось"
на если изменить - макрос рулит))) и он уже написан выше.
а вот поможет ли он ТС - это большой вопрос
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете

Последний раз редактировалось IgorGO; 08.06.2015 в 13:24.
IgorGO вне форума Ответить с цитированием
Старый 08.06.2015, 13:22   #8
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Я понял так - мы вручную меняем одну ячейку - ну и на этом стоп (вторая изменилась).
Меняем вручную вторую - тоже стоп.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подсчет с двух ячеек Витальян Microsoft Office Excel 25 18.12.2013 20:06
Вывод нужного значения при сравнении данных двух ячеек sjkz Microsoft Office Excel 14 21.08.2013 14:26
Как найти все N-значения и заменить их на значения из 2-х ячеек? Smile2007 Microsoft Office Excel 10 09.12.2010 09:34
сранение двух ячеек marc-nikita Microsoft Office Excel 6 07.04.2010 20:29
как разделить значения ячеек по формату ячеек? ARIRAN Microsoft Office Excel 6 11.12.2009 15:30