Excel 使用多个inputbox链接表示行的变量

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

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

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

我认为问题来自于行：RowsChosennumber&Chosennumber2。复制

尝试使用应用程序。联合：

---

您这样做是错误的，因为&连接字符串，所以当您输入1和2时，连接是12:

但是Chosennumber和Chosennumber2不是范围，所以您需要UnionRowsChosennumber，RowsChosennumber2.Copy。OP注意：您应该限定要在其上执行程序的工作表，如：Sheet1。RowsChosennumber@M.Schalk这就是我的意思。。。谢谢非常感谢Michat Turczyn和M.Schalk，这是真的，因为我的2输入框与数字、解决方案UnionRowsChosennumber、RowsChosennumber2一起工作。复制效果非常好…@Xavi如果答案对您有帮助，您应该接受左边的绿色复选标记，并根据自己的意见进行投票：

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

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