Попросить пользователя выбрать ячейку в VBA

Question

Я пишу скрипт vba, который, когда ячейка была выбрана - например, $ 53, - я щелкаю правой кнопкой мыши и выбираю макрос на панели команд.

Когда макрос запускается, я хочу спроситьпользователь выбирает ячейку с помощью мыши - скажем, $ F $ 66 - и возвращает адрес макросу.

Любые подсказки, пожалуйста?

Answer 1

Рассмотрим:

Public Function Pick_a_Cell() As String
    Dim r As Range
    On Error Resume Next
        Set r = Application.InputBox(Prompt:="Please select a cell", Type:=8)
    On Error GoTo 0
    If r Is Nothing Then
        Pick_a_Cell = "Cancelled"
    Else
        Pick_a_Cell = r.Address
    End If
End Function

Sub MAIN()
    x = Pick_a_Cell()
    MsgBox x
End Sub