INPUTBOX 取消後產生錯誤

　頭銜: 街友一族

論壇貢獻勳章

1^# 跳轉到 »

發表於 2011-4-19 14:52 | 顯示全部帖子

Dim A As Date
A = Application.InputBox("請輸入刪除日期", "刪除資料", Format(Sheet1.Range("A1"), "yyyy/mm/dd"))
If A = False Then End

靜思自在 : 好事要提得起，是非要放得下，成就別人即是成就自己。

INPUTBOX 取消後 產生錯誤