Добрый день! Задача такова: имеются 2 списка. При клике на любую ячейку, например, А1 "хлеб" в 1-м списке, нужно чтобы во 2-м списке выделилась ячейка с таким же названием "хлеб". Файл приложил.
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim cellFinded As Range
With ThisWorkbook.Worksheets("Б")
Set cellFinded = .Cells.Find(Target.Value, , , xlWhole, , , False, False)
If Not cellFinded Is Nothing Then .Select: cellFinded.Select
End With
End Sub
Формула массива (ФМ) вводится Ctrl+Shift+Enter Memento mori