返回列表 上一主題 發帖

[發問] EXCEL設定某日期到檔案無法開啟

taiwan16699

帖子
6 
主題
3 
精華
0 
積分
10 
點名
0  
作業系統
Windows 7 
軟體版本
1 
閱讀權限
10 
註冊時間
2013-5-2 
最後登錄
2019-11-21 

論壇贊助勳章
1# 跳轉到 »
發表於 2015-5-5 16:59 | 顯示全部帖子
If Date > DateValue("2015/05/01") Then
        MsgBox ("已超使用期間，不可使用。請求助開發者!!")
        Exit Sub
    End If

    Q1 = Application.InputBox(prompt:="請輸入製作者名稱：")
    If Q1 = "Vercent" Then
    Else: MsgBox "密碼錯誤，即將退出！"
    ActiveWorkbook.Close savechanges = False
    End If

TOP

        靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言，就如鑽石般珍貴；但對愚人來說，卻像是一把泥土，一點價值也沒有。
返回列表 上一主題