使用ActiveX Button執行程式碼,Range("A1").Select無法正常執行,程式碼如下:
Private Sub CommandButton1_Click()
Sheets("第二個").Select '--->這一段可以正常執行
Range("A1").Select '--->這一段會無法正常執行,且會出現錯誤訊息,如下圖所示。
End Sub
網上答案
CommandButton1_Click 是工作表1的程序 Range("A1").Select 是指在工作表1的 .Select
Sheets("第二個").Select 後作用中的工作表是 工作表2 所以會錯誤
Private Sub CommandButton1_Click()
With Sheets("第二個")
.Select
.Range("A1").Select
End With
End Sub
沒有留言:
張貼留言