在另一个子

时间:2015-08-13 21:06:23

标签: excel vba

在下面的代码中,我让用户选择一个单元格并将该值放入用户表单中的文本框中,并输入" Ready for Return"进入细胞13列以上。

不是每次选择单元格时都输入字符串,我希望只有在按下命令按钮时才输入字符串。基本上,我想将部分UserInput1.Offset(0, 13) = "Request Cancelled"放在userform中的命令按钮子下。反正有没有引用另一个子输入框的范围?谢谢!

Private Sub TextBox1_DropButtonClick()

Application.DisplayAlerts = False
Worksheets("Sample Transfer Log").Activate
Set UserInput1 = Application.InputBox(prompt:="Please select a sample transfer request # for return", Title:="Select Request #", Type:=8)
If UserInput1 = False Then
   Exit Sub
Else
    TextBox1.Text = UserInput1
    UserInput1.Offset(0, 13) = "Ready for Return"
    Application.DisplayAlerts = True
End If

End Sub

1 个答案:

答案 0 :(得分:1)

Sorceri在评论中指出:

  

您需要将值保留在全局变量中以便在另一个子

中访问