返回列表 上一主題 發帖

[分享] 金千里會計．EXCEL會計帳-[麻辣家族〕

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1425 
主題
40 
精華
0 
積分
1449 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2024-4-16 
1# 跳轉到 »
發表於 2023-11-29 08:10 | 顯示全部帖子
本帖最後由 Andy2483 於 2023-12-1 07:12 編輯

回復 1# 准提部林
    謝謝論壇,謝謝前輩分享 金千里會計．EXCEL會計帳
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1425 
主題
40 
精華
0 
積分
1449 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2024-4-16 
2#
發表於 2023-11-30 08:35 | 顯示全部帖子
本帖最後由 Andy2483 於 2023-12-1 07:14 編輯

回復 1# 准提部林
    謝謝論壇,謝謝前輩指導
後學藉此帖學習到活頁簿關閉前的事件,學習心得如下,請前輩再指導
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'↑關閉活頁簿前發生此事件。 如果該活頁簿已經變更過，則在系統詢問使用者是否要儲存變更前，即會發生此事件。
https://learn.microsoft.com/zh-t ... orkbook.beforeclose
If Sheets("科目表").Range("vMode").Value <> 0 Then
'↑如果"科目表"的 "vMode"名稱參照的儲存格(科目表!$F$2) 值不是 0?
   MsgBox "●請完成或取消【會計科目】的編輯作業！     ", 0 + 48, MsgTitle
   '↑跳出提示窗~~
   Sheets("科目表").Select:    Cancel = True: GoTo 1
   '↑令選取 "科目表" 工作表:  令取消關閉活頁簿
   '令跳到標示 1的位置繼續執行
End If
1: End Sub
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1425 
主題
40 
精華
0 
積分
1449 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2024-4-16 
3#
發表於 2023-11-30 13:00 | 顯示全部帖子
回復 7# 准提部林


    謝謝前輩指導,這很多知識都是沒看過的,謝謝前輩
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

        靜思自在 : 做好事不能少我一人，做壞事不能多我一人。
返回列表 上一主題