Как дважды щелкнуть ячейку, чтобы открыть указанный лист в Excel?

Вы хотите быстро перейти к указанному листу в книге Excel? В этой статье будет представлен метод VBA для открытия указанного рабочего листа двойным щелчком по определенной ячейке в Excel.

Дважды щелкните ячейку, чтобы открыть указанный лист с кодом VBA.

Дважды щелкните ячейку, чтобы открыть указанный лист с кодом VBA.

Чтобы открыть указанный рабочий лист, дважды щелкните ячейку в Excel, сделайте следующее.

1. Щелкните правой кнопкой мыши вкладку листа, содержащую ячейку, которую вы хотите открыть лист, щелкнув по ней. А затем нажмите Просмотреть код из контекстного меню. Смотрите скриншот:

2. В дебюте Microsoft Visual Basic для приложений окна, скопируйте следующий код VBA в окно кода.

Код VBA: дважды щелкните ячейку, чтобы открыть указанный рабочий лист в Excel

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updated by Extendoffice 20180822
Dim xArray, xAValue As Variant
Dim xFNum As Long
Dim xStr, xStrRg, xStrSheetName As String
xRgArray = Array("A1;Sheet2", "A12;Sheet3", "A4;Sheet4", "A100;Sheet5")
On Error Resume Next
For xFNum = LBound(xRgArray) To UBound(xRgArray)
xStr = ""
xStr = xRgArray(xFNum)
xAValue = ""
xAValue = Split(xStr, ";")
xStrRg = ""
xStrRg = xAValue(0)
xStrSheetName = ""
xStrSheetName = xAValue(1)
If Not Intersect(Target, Range(xStrRg)) Is Nothing Then
Sheets(xStrSheetName).Activate
End If
Next
End Sub

Внимание: В коде VBA "A1; Лист2,A12; Лист3,A4; Лист4,A100; Лист5"означает, что двойной щелчок по ячейке A1 откроет Sheet2, двойной щелчок A2 откроет Sheet3 ..., пожалуйста, измените их в соответствии с вашими потребностями.

3. нажмите другой + Q ключи вместе, чтобы закрыть Microsoft Visual Basic для приложений окно.

С этого момента, если дважды щелкнуть ячейку A1 на текущем листе, указанный рабочий лист будет немедленно активирован.

Разблокируйте магию Excel с помощью Kutools AI

• Умное исполнение: выполнение операций с ячейками, анализ данных и создание диаграмм — и все это осуществляется с помощью простых команд.
• Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации рабочих процессов.
• VBA-кодирование: Пишите и внедряйте код VBA без особых усилий.
• Интерпретация формулы: Легкое понимание сложных формул.
• Перевод текста: преодолевайте языковые барьеры в своих таблицах.

Расширьте свои возможности Excel с помощью инструментов на базе искусственного интеллекта. Скачать сейчас и испытайте эффективность, как никогда раньше!

Статьи по теме:

• Как щелкнуть или дважды щелкнуть ячейку, чтобы открыть указанную форму пользователя в Excel?
• Как добавить галочку в ячейку двойным щелчком в Excel?
• Как автоматически добавить / ввести текущую дату / время в ячейку двойным щелчком в Excel?
• Как дважды щелкнуть ячейку и добавить 1 к значению этой ячейки в Excel?
• Как открыть календарь при нажатии на определенную ячейку в Excel?