返回列表 上一主題 發帖

excel可以設定儲存條件嗎?

葉國洲

帖子
31 
主題
0 
精華
0 
積分
31 
點名
0  
作業系統
win10 
軟體版本
office 2016 
閱讀權限
10 
性別
男 
註冊時間
2016-10-4 
最後登錄
2017-10-17 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 »
發表於 2016-11-12 14:23 | 顯示全部帖子
供參考,恐有不周

TOP

葉國洲

帖子
31 
主題
0 
精華
0 
積分
31 
點名
0  
作業系統
win10 
軟體版本
office 2016 
閱讀權限
10 
性別
男 
註冊時間
2016-10-4 
最後登錄
2017-10-17 

論壇榮譽勳章論壇贊助勳章
2#
發表於 2016-11-12 14:27 | 顯示全部帖子
[attach]25769[/attach]不好意思,新人還不清楚回復的操作

TOP

葉國洲

帖子
31 
主題
0 
精華
0 
積分
31 
點名
0  
作業系統
win10 
軟體版本
office 2016 
閱讀權限
10 
性別
男 
註冊時間
2016-10-4 
最後登錄
2017-10-17 

論壇榮譽勳章論壇贊助勳章
3#
發表於 2016-11-12 14:49 | 顯示全部帖子
  1. [attach]25769[/attach]
複製代碼

TOP

葉國洲

帖子
31 
主題
0 
精華
0 
積分
31 
點名
0  
作業系統
win10 
軟體版本
office 2016 
閱讀權限
10 
性別
男 
註冊時間
2016-10-4 
最後登錄
2017-10-17 

論壇榮譽勳章論壇贊助勳章
4#
發表於 2016-11-12 14:50 | 顯示全部帖子
  1. Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  2. If 工作表3.Range("c104") < 0.4 Then
  3. MsgBox "數字很可觀喔,是不是預算有问題??"
  4. Cancel = True
  5. End If
  6. End Sub
複製代碼

TOP

葉國洲

帖子
31 
主題
0 
精華
0 
積分
31 
點名
0  
作業系統
win10 
軟體版本
office 2016 
閱讀權限
10 
性別
男 
註冊時間
2016-10-4 
最後登錄
2017-10-17 

論壇榮譽勳章論壇贊助勳章
5#
發表於 2016-11-18 14:52 | 顯示全部帖子
回復 6# VANESSA
修改好了請參考[attach]25841[/attach]

TOP

葉國洲

帖子
31 
主題
0 
精華
0 
積分
31 
點名
0  
作業系統
win10 
軟體版本
office 2016 
閱讀權限
10 
性別
男 
註冊時間
2016-10-4 
最後登錄
2017-10-17 

論壇榮譽勳章論壇贊助勳章
6#
發表於 2016-11-18 15:24 | 顯示全部帖子
回復 6# VANESSA
附件上傳不了,直接步驟說明
1.按Alt+F11進入VBE頁面,左邊窗口Thisworkbook左鍵按兩下
再貼上下面程式
  1. Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  2. If Range("c104") <= 0.04 Then
  3. MsgBox "C104 數字<=4%,無法存檔"
  4. cancle = True
  5. End If
  6. End Sub
複製代碼

TOP

        靜思自在 : 太陽光大、父母恩大、君子量大，小人氣大。
返回列表 上一主題