Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.86/29: Рейтинг темы: голосов - 29, средняя оценка - 4.86
1 / 1 / 0
Регистрация: 19.07.2017
Сообщений: 16
1

Как связать две ячейки в Excel 2016

20.07.2017, 14:08. Показов 5661. Ответов 4

Author24 — интернет-сервис помощи студентам
Добрый день, друзья!
Подскажите как связать две ячейки в excel 2016?
Есть ячейка А1 на Листе1 и ячека В1 на Листе2. При редактировании первой ячейки(А1 на листе1) необходимо что бы и во второй(В1 на листе2) поменялось значение и наоборот, при редактировании второй ячейки(В1 на листе2) менялось значение в первой(А1 на листе1).
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.07.2017, 14:08
Ответы с готовыми решениями:

Как связать Access 2016 и RAD studio
Нужно соединить RAD studio и access 2016, RAD пишет что может соединиться только с 2003 годом,но у...

Можно ли в Excel сложить две ячейки А1 и В1 и результат вывести в А1
Добрый день! Подскажите пожалуйста можно ли в Excel сложить две ячейки А1 и В1 и результат вывести...

Excel : Выделенную ячейку скопировать параллельно по строке через две соседние ячейки вправо
12. Excel : Выделенную ячейку скопировать параллельно по строке через две соседние ячейки вправо.

Как выбрать ширину и высоту ячейки Excel? Перенос текста внутри ячейки
Как выбрать ширину и высоту ячейки C# Excel*и перенос текста внутри ячейки или внутри диапазона,...

4
6 / 23 / 2
Регистрация: 29.01.2013
Сообщений: 174
20.07.2017, 22:50 2
так можно сделать только с ВБА
формулами это сделать невозможно
0
1 / 1 / 0
Регистрация: 19.07.2017
Сообщений: 16
21.07.2017, 14:01  [ТС] 3
Мне вот и нужно с ВБА. Подскажите как так сделать? Только это нужно для всех ячеек столбца А и столбца В соответственно.
0
Динохромный
1400 / 763 / 284
Регистрация: 22.12.2015
Сообщений: 2,387
21.07.2017, 15:03 4
Лучший ответ Сообщение было отмечено lamewax как решение

Решение

lamewax, если речь действительно про:
Цитата Сообщение от lamewax Посмотреть сообщение
При редактировании первой ячейки(А1 на листе1)
т.е. когда в ячейку вбили новое значение (а не например это значение было вычислено формулой, так как изменилась ячейка-аргумент не из первой колонки), то в VBA редакторе в Лист1 нужно вставить следующий код:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim rngObj As Range
    Dim i As Long
    If Not Intersect(Target, Me.Columns(1)) Is Nothing Then
        For Each rngObj In Intersect(Target, Me.Columns(1)).Cells
            i = rngObj.Row
            If Not ThisWorkbook.Worksheets.Item("Лист2").Cells(i, 1).Value = rngObj.Value Then ThisWorkbook.Worksheets.Item("Лист2").Cells(i, 1).Value = rngObj.Value
            
        Next
    End If
End Sub
В Лист2 соответственно такой:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim rngObj As Range
    Dim i As Long
    If Not Intersect(Target, Me.Columns(1)) Is Nothing Then
        For Each rngObj In Intersect(Target, Me.Columns(1)).Cells
            i = rngObj.Row
            If Not ThisWorkbook.Worksheets.Item("Лист1").Cells(i, 1).Value = rngObj.Value Then ThisWorkbook.Worksheets.Item("Лист1").Cells(i, 1).Value = rngObj.Value
            
        Next
    End If
End Sub
Предполагается, что столбец А не должен содержать формул. Если формулы в столбцах А этих листов все же предполагаются - опишите задачу подробнее.
1
1 / 1 / 0
Регистрация: 19.07.2017
Сообщений: 16
24.07.2017, 13:25  [ТС] 5
Огромное спасибо! То, что надо!
0
24.07.2017, 13:25
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.07.2017, 13:25
Помогаю со студенческими работами здесь

Как связать ячейки с 2 листов
Добрый день! Подскажите, пожалуйста, как связать ячейки из 2 листов? Заранее, спасибо!

Как связать две таблицы
Добрый день! Помогите, пожалуйста, связать 2 таблице на главной форме. Чтобы при выборе данной из...

Как связать две таблицы?
Существуют две таблицы. (1) содержит колонки: id, фамилия, должность. (2) содержит колонки: id,...

Как связать две таблицы?
Как связать 2 таблицы в одном LINQ to SQL запросе? никак понять не могу блин


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru