Link 代表行的变量，有几个输入框

Question

我有一个带有两个输入框的宏。

我想做以下事情：
使用第一个输入框，输入一个数字。
使用第二个输入框，输入第二个数字。
复制与行号相关的行。

例如，用户在第一个输入框输入数字1，在第二个输入框输入数字2。我想同时复制第一行和第二行。
使用我当前的宏，第 12 行被复制。

我认为问题来自行：Rows(Chosennumber & Chosennumber2).Copy

Sub selectlinefiletemplat()
    Dim Chosennumber As Integer
    Dim Chosennumber2 As Integer

    On Error GoTo NothingChosen

    Chosennumber = Application.InputBox( _
      prompt:="Type in a number", _
      Default:="Type your number here", _
      Type:=1)

    Chosennumber2 = Application.InputBox( _
      prompt:="Type in a number", _
      Default:="Type your number here", _
      Type:=1)

    Rows(Chosennumber & Chosennumber2).Copy

    Exit Sub

    NothingChosen:
        MsgBox "You didn't choose anything!"
End Sub

Answer 1

试试 Application.Union:

Application.Union(Rows(Chosennumber), Rows(Chosennumber2)).Copy

你做错了，因为 & 连接字符串，所以当你输入 1 和 2 时，连接是 12 :)

Link 代表行的变量，有几个输入框

Link variables representing rows, with several inputbox

variables

excel

vba

inputbox