Получение диапазона выбранной ячейки из другого листа в Excel - PullRequest
0 голосов
/ 12 июля 2010

Я пытаюсь настроить Excel таким образом, чтобы значение ячейки, выбранное на первом листе, было установлено равным значению ячейки, дважды щелкнувшей на другом листе.Пока мой код выглядит следующим образом:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)



Dim c As Range

For Each c In Sheet1.Range("M11:M24")
    If IsEmpty(c) Then
        c.Value = Target.Value
        Exit For
    End If
Next c
End Sub

Это устанавливает первую пустую ячейку в диапазоне m11: m24 на содержимое ячейки с двойным щелчком на другой рабочей таблице.Хотя я хочу не статический диапазон "M11: M24", а пользователь вместо этого должен выбрать ячейку на первом листе, щелкнув по ней, перейти на другой лист, дважды щелкнуть ячейку на этом листе и отобразить значениев выбранной ячейке на первом листе.Я думаю, что я мог бы сделать так, чтобы была переменная, настроенная для сохранения ячейки, выбранной в первом листе, а затем просто доступа к ней из другого листа.Но я бы предпочел, чтобы в Excel было встроено прочее, чтобы просто выбрать выбранную ячейку.

Есть ли способ получить выбранную ячейку / диапазон в Excel?

1 Ответ

0 голосов
/ 12 июля 2010

Я решил это легко. Код:

Sheet1.Activate
ActiveCell.Value = Target.Value

Если вы хотите сделать весь выбор, попробуйте

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

    Sheet1.Activate

    Dim r As Range
    Set r = Selection

    r.Value = Target.Value

End Sub
...