excel按钮代码怎么写( 二 )


Private Sub ListBox1_Click()
If ListBox1.Value = "http://www.xuexi88.com/zhishi/op1" Then Range("H2") = Range("H3")
If ListBox1.Value = "http://www.xuexi88.com/zhishi/op2" Then Range("H2") = Range("H4")
End Sub
至于ListBox选项前,是否需要单选框,请在ListBox属性中设置~

excel按钮代码怎么写

文章插图