excel - 从所选范围中提取工作表名称

Question

我必须通过InputBox函数将结果输入到选定的单元格中:

Set OutputStrt = Application.InputBox("Select a cell, where the output should be dropped.", "Output start cell", Type:=8)

当我在不同的工作表中运行代码并希望在不同的工作表中得到结果时，它会将结果放在我最初运行代码的工作表中。

如何获取我通过 Application.InputBox 选择的工作表名称？

例如，当我在输入框中选择:Definitions!$F$38 时，如何获取名称“Definitions”？

Answer 1

试试这个:

Sub test()
    Dim Ws As Worksheet
    Dim OutputStrt As Range
    Set OutputStrt = Application.InputBox("Select a cell, where the output should be dropped.", "Output start cell", Type:=8)
    Set Ws = OutputStrt.Worksheet
    MsgBox Ws.Name
End Sub