Две входные ячейки равны друг другу

Question

Можно ли создать две входные ячейки, которые равны друг другу без кода VBA, например. A1 = A5 и A5 = A1. Поэтому, когда я изменяю значение А1, оно влияет на А5, а изменение А5 также меняет А1.

Answer 1

Строго говоря, это возможно, если на листе используется итеративный расчет с использованием =B1 в A5 и =A5 в B1. Однако ввод данных в любую ячейку перезапишет формулу, поэтому будет работать только один раз.

Answer 2

Поместите следующий макрос событий в область кода рабочего листа:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim A1 As Range, A5 As Range
    Set A1 = Range("A1")
    Set A5 = Range("A5")
    If Not Intersect(A1, Target) Is Nothing Then
        Application.EnableEvents = False
            A1.Copy A5
        Application.EnableEvents = True
        Exit Sub
    End If

    If Not Intersect(A5, Target) Is Nothing Then
        Application.EnableEvents = False
            A5.Copy A1
        Application.EnableEvents = True
        Exit Sub
    End If
End Sub

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

1. щелкните правой кнопкой мыши имя вкладки в нижней части окна Excel
2. выберите Просмотр кода - откроется окно VBE
3. вставьте материал и закройте окно VBE

Если у вас есть какие-либо вопросы, сначала попробуйте их на пробном листе.

Если вы сохраните книгу, макрос будет сохранен вместе с ней. Если вы используете версию Excel позже, чем 2003, вы должны сохранить файл в формате .xlsm, а не .xlsx

К Удалить Макрос:

1. вызвать окна VBE, как указано выше
2. очистить код
3. закрыть окно VBE

Чтобы узнать больше о макросах в целом, см .:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

и

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

Чтобы узнать больше о макросах событий (код листа), см .:

http://www.mvps.org/dmcritchie/excel/event.htm

Для работы должны быть включены макросы!

Answer 3

Нет, это не так. Это потребует VBA.

Ячейка может иметь формулу или пользовательское значение, но не оба одновременно.

Единственный способ - VBA.

Вы можете иметь третью ячейку, скажем, B1. Затем попросите пользователя изменить B1 и приравнять A1 и A5 к B1:

=B1

Тогда пользователю нужно только изменить одну ячейку, а остальные обновятся.