返回列表 上一主題 發帖

[發問] 關於msgbox的用法

[發問] 關於msgbox的用法

我的工作表上有設一個表單清除的命令式按鈕
程式內容:
Sub 表單清除()
Dim Y&
With Sheets("報表")
  Y = .[A65536].End(xlUp).Row - 2
  .Range("A3:R" & Y).ClearContents
End With
With Sheets("請款單")
  .Range("a:h").Clear
End With
End Sub
我想要設當這按鈕按下會跳出視窗問是否已另存新黨了?是!就執行清除的程式內容,否就跳回工作表!
爬文 是用msgbox,但我不知道應該寫在按鈕內還是工作表內
那又該如何寫?用法網路上面都有但是不知道該如何帶入?

        靜思自在 : 願要大、志要堅、氣要柔、心要細。
返回列表 上一主題