金千里會計．EXCEL會計帳-[麻辣家族〕 - Excel程式區

alex06695

小學生 Rank: 1

帖子: 2
主題: 0
精華: 0
積分: 7
點名: 0
作業系統: Windows 10 專業版
軟體版本: 22H2
閱讀權限: 10
性別: 男
來自: 新北市中和區
註冊時間: 2024-3-7
最後登錄: 2024-3-24

13^# 跳轉到 »

發表於 2024-3-24 11:35 | 只看該作者

回復 12# 准提部林

感謝大大回復
這EXCEL真的對我們的工作幫助很大

萬分感謝

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2843
主題: 10
精華: 0
積分: 2899
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2025-7-17

12^#

發表於 2024-3-24 10:12 | 只看該作者

回復 11# alex06695

謝謝提醒這重要的bug，公式少算了１位，改了／／附件已更新：
若已使用中，可自行更改／／
按 Ctrl+z, 解開保護，在〔會計傳票〕工作表H4儲存格修改如下／／
=CHOOSE(MAX(bType+1,1),"會計傳票","現金收入傳票","現金支出傳票","轉帳傳票")

TOP

alex06695

小學生 Rank: 1

帖子: 2
主題: 0
精華: 0
積分: 7
點名: 0
作業系統: Windows 10 專業版
軟體版本: 22H2
閱讀權限: 10
性別: 男
來自: 新北市中和區
註冊時間: 2024-3-7
最後登錄: 2024-3-24

11^#

發表於 2024-3-22 21:39 | 只看該作者

我在使用的時候，似乎有發現這版本有一個BUG

KEY傳票的時候，系統會自動判斷該張是現金支出傳票或現金收入傳票
這功能的判斷是相反的。

還請版大大協助確認，是否有這樣的問題

TOP

nicole1012

中學生 Rank: 2

帖子: 2
主題: 0
精華: 0
積分: 52
點名: 43
作業系統: win10
軟體版本: Office2021
閱讀權限: 20
註冊時間: 2024-1-12
最後登錄: 2025-3-26

2024年全勤獎章

10^#

發表於 2024-3-13 09:41 | 只看該作者

總算找到版大的資訊,之前檔案都沒了,感謝還能在這找到救星

TOP

ianlcc

中學生 Rank: 2

帖子: 37
主題: 15
精華: 0
積分: 58
點名: 0
作業系統: WIN XP＆WIN 7 PRO
軟體版本: OFFICE 2003＆AUTOCAD 2008
閱讀權限: 20
性別: 男
來自: TAIWAN
註冊時間: 2010-5-2
最後登錄: 2024-3-15

9^#

發表於 2024-3-5 10:05 | 只看該作者

這個會計小工具很實用
如果是個人使用的話非常的方便
對於買賣、記帳
謝謝樓主的分享

TOP

Andy2483

　暱稱: 厚臉皮的學生

大學生 Rank: 4

帖子: 1447
主題: 40
精華: 0
積分: 1471
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2025-5-5

8^#

發表於 2023-11-30 13:00 | 只看該作者

回復 7# 准提部林

謝謝前輩指導,這很多知識都是沒看過的,謝謝前輩

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2843
主題: 10
精華: 0
積分: 2899
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2025-7-17

7^#

發表於 2023-11-30 12:37 | 只看該作者

回復 6# Andy2483

謝謝詳細的註解~~
這檔案開始寫的時候, 初入EXCEL, 公式只會MATCH,VLOOKUP...等基本用法,
VBA也是用錄製取得再改寫, 陸續再進階而已, 所以都是淺而易懂的!!!

本帖目的不是以學習程式碼為主要, 而是對於"會計帳"的操作使用, 若有心得可以提供出來!!!
避免本帖回覆文字太多太長, 造成閱讀的耗時,
若有興趣將整個程式碼加入註解, 建議以附檔方式上傳為宜!!!

TOP

Andy2483

　暱稱: 厚臉皮的學生

大學生 Rank: 4

帖子: 1447
主題: 40
精華: 0
積分: 1471
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2025-5-5

6^#

發表於 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