updsv7/vba
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix bug

Browse Source
This commit is contained in:
updsv7
2026-04-23 11:14:41 +09:00
parent 710845ff55
commit c6d53813e3
20 changed files with 292 additions and 217 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
.VSCodeCounter/2026-04-16_18-53-36/details.md
View File

@@ -1,29 +0,0 @@
# Details
Date : 2026-04-16 18:53:36
Directory d:\\Project\\upds7\\vba\\src
Total : 14 files, 2127 codes, 248 comments, 437 blanks, all 2812 lines
[Summary](results.md) / Details / [Diff Summary](diff.md) / [Diff Details](diff-details.md)
## Files
| filename | language | code | comment | blank | total |
| :--- | :--- | ---: | ---: | ---: | ---: |
| [src/module/Generic\_Master\_Common.bas](/src/module/Generic_Master_Common.bas) | Visual Basic for Applications | 58 | 12 | 17 | 87 |
| [src/module/Global\_Cache.bas](/src/module/Global_Cache.bas) | Visual Basic for Applications | 195 | 43 | 69 | 307 |
| [src/module/Module\_Common.bas](/src/module/Module_Common.bas) | Visual Basic for Applications | 171 | 23 | 35 | 229 |
| [src/module/Read\_Common.bas](/src/module/Read_Common.bas) | Visual Basic for Applications | 153 | 17 | 19 | 189 |
| [src/module/Test\_Cache.bas](/src/module/Test_Cache.bas) | Visual Basic for Applications | 159 | 4 | 25 | 188 |
| [src/module/Write\_Common.bas](/src/module/Write_Common.bas) | Visual Basic for Applications | 106 | 11 | 21 | 138 |
| [src/thisWorkbook/Master\_M1\_Kukan.bas](/src/thisWorkbook/Master_M1_Kukan.bas) | Visual Basic for Applications | 234 | 25 | 53 | 312 |
| [src/thisWorkbook/Master\_M2\_Kukan\_detail.bas](/src/thisWorkbook/Master_M2_Kukan_detail.bas) | Visual Basic for Applications | 176 | 32 | 45 | 253 |
| [src/thisWorkbook/Master\_O1\_address.bas](/src/thisWorkbook/Master_O1_address.bas) | Visual Basic for Applications | 35 | 4 | 13 | 52 |
| [src/thisWorkbook/Master\_O2\_507.bas](/src/thisWorkbook/Master_O2_507.bas) | Visual Basic for Applications | 12 | 1 | 4 | 17 |
| [src/thisWorkbook/Master\_Z1\_222.bas](/src/thisWorkbook/Master_Z1_222.bas) | Visual Basic for Applications | 140 | 5 | 27 | 172 |
| [src/thisWorkbook/Master\_Z2\_223.bas](/src/thisWorkbook/Master_Z2_223.bas) | Visual Basic for Applications | 126 | 5 | 25 | 156 |
| [src/thisWorkbook/Master\_Z3\_224.bas](/src/thisWorkbook/Master_Z3_224.bas) | Visual Basic for Applications | 133 | 5 | 26 | 164 |
| [src/thisWorkbook/Tukin\_C1.bas](/src/thisWorkbook/Tukin_C1.bas) | Visual Basic for Applications | 429 | 61 | 58 | 548 |
[Summary](results.md) / Details / [Diff Summary](diff.md) / [Diff Details](diff-details.md)

27
.VSCodeCounter/2026-04-16_18-53-36/diff-details.md
View File

@@ -1,27 +0,0 @@
# Diff Details
Date : 2026-04-16 18:53:36
Directory d:\\Project\\upds7\\vba\\src
Total : 12 files, -6366 codes, 0 comments, -42 blanks, all -6408 lines
[Summary](results.md) / [Details](details.md) / [Diff Summary](diff.md) / Diff Details
## Files
| filename | language | code | comment | blank | total |
| :--- | :--- | ---: | ---: | ---: | ---: |
| [README.md](/README.md) | Markdown | -20 | 0 | -1 | -21 |
| [src/data/222交通機関名区分.csv](/src/data/222%E4%BA%A4%E9%80%9A%E6%A9%9F%E9%96%A2%E5%90%8D%E5%8C%BA%E5%88%86.csv) | CSV | -3 | 0 | 0 | -3 |
| [src/data/223通勤\_決定事項区分.csv](/src/data/223%E9%80%9A%E5%8B%A4_%E6%B1%BA%E5%AE%9A%E4%BA%8B%E9%A0%85%E5%8C%BA%E5%88%86.csv) | CSV | -3 | 0 | -1 | -4 |
| [src/data/224通勤\_手当月額の決定区分.csv](/src/data/224%E9%80%9A%E5%8B%A4_%E6%89%8B%E5%BD%93%E6%9C%88%E9%A1%8D%E3%81%AE%E6%B1%BA%E5%AE%9A%E5%8C%BA%E5%88%86.csv) | CSV | -12 | 0 | -1 | -13 |
| [src/data/507発信者.csv](/src/data/507%E7%99%BA%E4%BF%A1%E8%80%85.csv) | CSV | -2 | 0 | -1 | -3 |
| [src/data/区間.csv](/src/data/%E5%8C%BA%E9%96%93.csv) | CSV | -75 | 0 | 0 | -75 |
| [src/data/区間詳細.csv](/src/data/%E5%8C%BA%E9%96%93%E8%A9%B3%E7%B4%B0.csv) | CSV | -20 | 0 | 0 | -20 |
| [src/module/Test\_Cache.bas](/src/module/Test_Cache.bas) | Visual Basic for Applications | 10 | 0 | 0 | 10 |
| [src/thisWorkbook/Tukin\_C1.bas](/src/thisWorkbook/Tukin_C1.bas) | Visual Basic for Applications | 7 | 0 | 0 | 7 |
| [~$通勤手当テンプレート\_案.xlsm](/~$%E9%80%9A%E5%8B%A4%E6%89%8B%E5%BD%93%E3%83%86%E3%83%B3%E3%83%97%E3%83%AC%E3%83%BC%E3%83%88_%E6%A1%88.xlsm) | Excel | -1 | 0 | 0 | -1 |
| [通勤手当テンプレート\_案.xlsm](/%E9%80%9A%E5%8B%A4%E6%89%8B%E5%BD%93%E3%83%86%E3%83%B3%E3%83%97%E3%83%AC%E3%83%BC%E3%83%88_%E6%A1%88.xlsm) | Excel | -2,349 | 0 | -20 | -2,369 |
| [通勤手当テンプレート\_案.xlsx](/%E9%80%9A%E5%8B%A4%E6%89%8B%E5%BD%93%E3%83%86%E3%83%B3%E3%83%97%E3%83%AC%E3%83%BC%E3%83%88_%E6%A1%88.xlsx) | Excel | -3,898 | 0 | -18 | -3,916 |
[Summary](results.md) / [Details](details.md) / [Diff Summary](diff.md) / Diff Details

14
.VSCodeCounter/2026-04-16_18-53-36/diff.csv
View File

@@ -1,14 +0,0 @@
"filename", "language", "Visual Basic for Applications", "Markdown", "Excel", "CSV", "comment", "blank", "total"
"d:\Project\upds7\vba\README.md", "Markdown", 0, -20, 0, 0, 0, -1, -21
"d:\Project\upds7\vba\src\data\222交通機関名区分.csv", "CSV", 0, 0, 0, -3, 0, 0, -3
"d:\Project\upds7\vba\src\data\223通勤_決定事項区分.csv", "CSV", 0, 0, 0, -3, 0, -1, -4
"d:\Project\upds7\vba\src\data\224通勤_手当月額の決定区分.csv", "CSV", 0, 0, 0, -12, 0, -1, -13
"d:\Project\upds7\vba\src\data\507発信者.csv", "CSV", 0, 0, 0, -2, 0, -1, -3
"d:\Project\upds7\vba\src\data\区間.csv", "CSV", 0, 0, 0, -75, 0, 0, -75
"d:\Project\upds7\vba\src\data\区間詳細.csv", "CSV", 0, 0, 0, -20, 0, 0, -20
"d:\Project\upds7\vba\src\module\Test_Cache.bas", "Visual Basic for Applications", 10, 0, 0, 0, 0, 0, 10
"d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas", "Visual Basic for Applications", 7, 0, 0, 0, 0, 0, 7
"d:\Project\upds7\vba\~$通勤手当テンプレート_案.xlsm", "Excel", 0, 0, -1, 0, 0, 0, -1
"d:\Project\upds7\vba\通勤手当テンプレート_案.xlsm", "Excel", 0, 0, -2349, 0, 0, -20, -2369
"d:\Project\upds7\vba\通勤手当テンプレート_案.xlsx", "Excel", 0, 0, -3898, 0, 0, -18, -3916
"Total", "-", 17, -20, -6248, -115, 0, -42, -6408
1 filename language Visual Basic for Applications Markdown Excel CSV comment blank total
2 d:\Project\upds7\vba\README.md Markdown 0 -20 0 0 0 -1 -21
3 d:\Project\upds7\vba\src\data\222交通機関名区分.csv CSV 0 0 0 -3 0 0 -3
4 d:\Project\upds7\vba\src\data\223通勤_決定事項区分.csv CSV 0 0 0 -3 0 -1 -4
5 d:\Project\upds7\vba\src\data\224通勤_手当月額の決定区分.csv CSV 0 0 0 -12 0 -1 -13
6 d:\Project\upds7\vba\src\data\507発信者.csv CSV 0 0 0 -2 0 -1 -3
7 d:\Project\upds7\vba\src\data\区間.csv CSV 0 0 0 -75 0 0 -75
8 d:\Project\upds7\vba\src\data\区間詳細.csv CSV 0 0 0 -20 0 0 -20
9 d:\Project\upds7\vba\src\module\Test_Cache.bas Visual Basic for Applications 10 0 0 0 0 0 10
10 d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas Visual Basic for Applications 7 0 0 0 0 0 7
11 d:\Project\upds7\vba\~$通勤手当テンプレート_案.xlsm Excel 0 0 -1 0 0 0 -1
12 d:\Project\upds7\vba\通勤手当テンプレート_案.xlsm Excel 0 0 -2349 0 0 -20 -2369
13 d:\Project\upds7\vba\通勤手当テンプレート_案.xlsx Excel 0 0 -3898 0 0 -18 -3916
14 Total - 17 -20 -6248 -115 0 -42 -6408

43
.VSCodeCounter/2026-04-16_18-53-36/diff.txt
View File

@@ -1,43 +0,0 @@
Date : 2026-04-16 18:53:36
Directory : d:\Project\upds7\vba\src
Total : 12 files, -6366 codes, 0 comments, -42 blanks, all -6408 lines
Languages
+-------------------------------+------------+------------+------------+------------+------------+
| language | files | code | comment | blank | total |
+-------------------------------+------------+------------+------------+------------+------------+
| Visual Basic for Applications | 2 | 17 | 0 | 0 | 17 |
| Markdown | 1 | -20 | 0 | -1 | -21 |
| CSV | 6 | -115 | 0 | -3 | -118 |
| Excel | 3 | -6,248 | 0 | -38 | -6,286 |
+-------------------------------+------------+------------+------------+------------+------------+
Directories
+----------------------------------------------------+------------+------------+------------+------------+------------+
| path | files | code | comment | blank | total |
+----------------------------------------------------+------------+------------+------------+------------+------------+
| . | 12 | -6,366 | 0 | -42 | -6,408 |
| .. | 4 | -6,268 | 0 | -39 | -6,307 |
| data | 6 | -115 | 0 | -3 | -118 |
| module | 1 | 10 | 0 | 0 | 10 |
| thisWorkbook | 1 | 7 | 0 | 0 | 7 |
+----------------------------------------------------+------------+------------+------------+------------+------------+
Files
+----------------------------------------------------+-------------------------------+------------+------------+------------+------------+
| filename | language | code | comment | blank | total |
+----------------------------------------------------+-------------------------------+------------+------------+------------+------------+
| d:\Project\upds7\vba\README.md | Markdown | -20 | 0 | -1 | -21 |
| d:\Project\upds7\vba\src\data\222交通機関名区分.csv | CSV | -3 | 0 | 0 | -3 |
| d:\Project\upds7\vba\src\data\223通勤_決定事項区分.csv | CSV | -3 | 0 | -1 | -4 |
| d:\Project\upds7\vba\src\data\224通勤_手当月額の決定区分.csv | CSV | -12 | 0 | -1 | -13 |
| d:\Project\upds7\vba\src\data\507発信者.csv | CSV | -2 | 0 | -1 | -3 |
| d:\Project\upds7\vba\src\data\区間.csv | CSV | -75 | 0 | 0 | -75 |
| d:\Project\upds7\vba\src\data\区間詳細.csv | CSV | -20 | 0 | 0 | -20 |
| d:\Project\upds7\vba\src\module\Test_Cache.bas | Visual Basic for Applications | 10 | 0 | 0 | 10 |
| d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas | Visual Basic for Applications | 7 | 0 | 0 | 7 |
| d:\Project\upds7\vba\~$通勤手当テンプレート_案.xlsm | Excel | -1 | 0 | 0 | -1 |
| d:\Project\upds7\vba\通勤手当テンプレート_案.xlsm | Excel | -2,349 | 0 | -20 | -2,369 |
| d:\Project\upds7\vba\通勤手当テンプレート_案.xlsx | Excel | -3,898 | 0 | -18 | -3,916 |
| Total | | -6,366 | 0 | -42 | -6,408 |
+----------------------------------------------------+-------------------------------+------------+------------+------------+------------+

16
.VSCodeCounter/2026-04-16_18-53-36/results.csv
View File

@@ -1,16 +0,0 @@
"filename", "language", "Visual Basic for Applications", "comment", "blank", "total"
"d:\Project\upds7\vba\src\module\Generic_Master_Common.bas", "Visual Basic for Applications", 58, 12, 17, 87
"d:\Project\upds7\vba\src\module\Global_Cache.bas", "Visual Basic for Applications", 195, 43, 69, 307
"d:\Project\upds7\vba\src\module\Module_Common.bas", "Visual Basic for Applications", 171, 23, 35, 229
"d:\Project\upds7\vba\src\module\Read_Common.bas", "Visual Basic for Applications", 153, 17, 19, 189
"d:\Project\upds7\vba\src\module\Test_Cache.bas", "Visual Basic for Applications", 159, 4, 25, 188
"d:\Project\upds7\vba\src\module\Write_Common.bas", "Visual Basic for Applications", 106, 11, 21, 138
"d:\Project\upds7\vba\src\thisWorkbook\Master_M1_Kukan.bas", "Visual Basic for Applications", 234, 25, 53, 312
"d:\Project\upds7\vba\src\thisWorkbook\Master_M2_Kukan_detail.bas", "Visual Basic for Applications", 176, 32, 45, 253
"d:\Project\upds7\vba\src\thisWorkbook\Master_O1_address.bas", "Visual Basic for Applications", 35, 4, 13, 52
"d:\Project\upds7\vba\src\thisWorkbook\Master_O2_507.bas", "Visual Basic for Applications", 12, 1, 4, 17
"d:\Project\upds7\vba\src\thisWorkbook\Master_Z1_222.bas", "Visual Basic for Applications", 140, 5, 27, 172
"d:\Project\upds7\vba\src\thisWorkbook\Master_Z2_223.bas", "Visual Basic for Applications", 126, 5, 25, 156
"d:\Project\upds7\vba\src\thisWorkbook\Master_Z3_224.bas", "Visual Basic for Applications", 133, 5, 26, 164
"d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas", "Visual Basic for Applications", 429, 61, 58, 548
"Total", "-", 2127, 248, 437, 2812
1 filename language Visual Basic for Applications comment blank total
2 d:\Project\upds7\vba\src\module\Generic_Master_Common.bas Visual Basic for Applications 58 12 17 87
3 d:\Project\upds7\vba\src\module\Global_Cache.bas Visual Basic for Applications 195 43 69 307
4 d:\Project\upds7\vba\src\module\Module_Common.bas Visual Basic for Applications 171 23 35 229
5 d:\Project\upds7\vba\src\module\Read_Common.bas Visual Basic for Applications 153 17 19 189
6 d:\Project\upds7\vba\src\module\Test_Cache.bas Visual Basic for Applications 159 4 25 188
7 d:\Project\upds7\vba\src\module\Write_Common.bas Visual Basic for Applications 106 11 21 138
8 d:\Project\upds7\vba\src\thisWorkbook\Master_M1_Kukan.bas Visual Basic for Applications 234 25 53 312
9 d:\Project\upds7\vba\src\thisWorkbook\Master_M2_Kukan_detail.bas Visual Basic for Applications 176 32 45 253
10 d:\Project\upds7\vba\src\thisWorkbook\Master_O1_address.bas Visual Basic for Applications 35 4 13 52
11 d:\Project\upds7\vba\src\thisWorkbook\Master_O2_507.bas Visual Basic for Applications 12 1 4 17
12 d:\Project\upds7\vba\src\thisWorkbook\Master_Z1_222.bas Visual Basic for Applications 140 5 27 172
13 d:\Project\upds7\vba\src\thisWorkbook\Master_Z2_223.bas Visual Basic for Applications 126 5 25 156
14 d:\Project\upds7\vba\src\thisWorkbook\Master_Z3_224.bas Visual Basic for Applications 133 5 26 164
15 d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas Visual Basic for Applications 429 61 58 548
16 Total - 2127 248 437 2812

1
.VSCodeCounter/2026-04-16_18-53-36/results.json
View File

@@ -1 +0,0 @@
{"file:///d%3A/Project/upds7/vba/src/thisWorkbook/Master_M2_Kukan_detail.bas":{"language":"Visual Basic for Applications","code":176,"comment":32,"blank":45},"file:///d%3A/Project/upds7/vba/src/thisWorkbook/Master_O2_507.bas":{"language":"Visual Basic for Applications","code":12,"comment":1,"blank":4},"file:///d%3A/Project/upds7/vba/src/thisWorkbook/Master_O1_address.bas":{"language":"Visual Basic for Applications","code":35,"comment":4,"blank":13},"file:///d%3A/Project/upds7/vba/src/thisWorkbook/Master_Z1_222.bas":{"language":"Visual Basic for Applications","code":140,"comment":5,"blank":27},"file:///d%3A/Project/upds7/vba/src/thisWorkbook/Master_M1_Kukan.bas":{"language":"Visual Basic for Applications","code":234,"comment":25,"blank":53},"file:///d%3A/Project/upds7/vba/src/module/Global_Cache.bas":{"language":"Visual Basic for Applications","code":195,"comment":43,"blank":69},"file:///d%3A/Project/upds7/vba/src/thisWorkbook/Tukin_C1.bas":{"language":"Visual Basic for Applications","code":429,"comment":61,"blank":58},"file:///d%3A/Project/upds7/vba/src/module/Module_Common.bas":{"language":"Visual Basic for Applications","code":171,"comment":23,"blank":35},"file:///d%3A/Project/upds7/vba/src/thisWorkbook/Master_Z2_223.bas":{"language":"Visual Basic for Applications","code":126,"comment":5,"blank":25},"file:///d%3A/Project/upds7/vba/src/module/Generic_Master_Common.bas":{"language":"Visual Basic for Applications","code":58,"comment":12,"blank":17},"file:///d%3A/Project/upds7/vba/src/thisWorkbook/Master_Z3_224.bas":{"language":"Visual Basic for Applications","code":133,"comment":5,"blank":26},"file:///d%3A/Project/upds7/vba/src/module/Read_Common.bas":{"language":"Visual Basic for Applications","code":153,"comment":17,"blank":19},"file:///d%3A/Project/upds7/vba/src/module/Test_Cache.bas":{"language":"Visual Basic for Applications","code":159,"comment":4,"blank":25},"file:///d%3A/Project/upds7/vba/src/module/Write_Common.bas":{"language":"Visual Basic for Applications","code":106,"comment":11,"blank":21}}

40
.VSCodeCounter/2026-04-16_18-53-36/results.txt
View File

@@ -1,40 +0,0 @@
Date : 2026-04-16 18:53:36
Directory : d:\Project\upds7\vba\src
Total : 14 files, 2127 codes, 248 comments, 437 blanks, all 2812 lines
Languages
+-------------------------------+------------+------------+------------+------------+------------+
| language | files | code | comment | blank | total |
+-------------------------------+------------+------------+------------+------------+------------+
| Visual Basic for Applications | 14 | 2,127 | 248 | 437 | 2,812 |
+-------------------------------+------------+------------+------------+------------+------------+
Directories
+------------------------------------------------------------------+------------+------------+------------+------------+------------+
| path | files | code | comment | blank | total |
+------------------------------------------------------------------+------------+------------+------------+------------+------------+
| . | 14 | 2,127 | 248 | 437 | 2,812 |
| module | 6 | 842 | 110 | 186 | 1,138 |
| thisWorkbook | 8 | 1,285 | 138 | 251 | 1,674 |
+------------------------------------------------------------------+------------+------------+------------+------------+------------+
Files
+------------------------------------------------------------------+-------------------------------+------------+------------+------------+------------+
| filename | language | code | comment | blank | total |
+------------------------------------------------------------------+-------------------------------+------------+------------+------------+------------+
| d:\Project\upds7\vba\src\module\Generic_Master_Common.bas | Visual Basic for Applications | 58 | 12 | 17 | 87 |
| d:\Project\upds7\vba\src\module\Global_Cache.bas | Visual Basic for Applications | 195 | 43 | 69 | 307 |
| d:\Project\upds7\vba\src\module\Module_Common.bas | Visual Basic for Applications | 171 | 23 | 35 | 229 |
| d:\Project\upds7\vba\src\module\Read_Common.bas | Visual Basic for Applications | 153 | 17 | 19 | 189 |
| d:\Project\upds7\vba\src\module\Test_Cache.bas | Visual Basic for Applications | 159 | 4 | 25 | 188 |
| d:\Project\upds7\vba\src\module\Write_Common.bas | Visual Basic for Applications | 106 | 11 | 21 | 138 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_M1_Kukan.bas | Visual Basic for Applications | 234 | 25 | 53 | 312 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_M2_Kukan_detail.bas | Visual Basic for Applications | 176 | 32 | 45 | 253 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_O1_address.bas | Visual Basic for Applications | 35 | 4 | 13 | 52 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_O2_507.bas | Visual Basic for Applications | 12 | 1 | 4 | 17 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_Z1_222.bas | Visual Basic for Applications | 140 | 5 | 27 | 172 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_Z2_223.bas | Visual Basic for Applications | 126 | 5 | 25 | 156 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_Z3_224.bas | Visual Basic for Applications | 133 | 5 | 26 | 164 |
| d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas | Visual Basic for Applications | 429 | 61 | 58 | 548 |
| Total | | 2,127 | 248 | 437 | 2,812 |
+------------------------------------------------------------------+-------------------------------+------------+------------+------------+------------+

34
.VSCodeCounter/2026-04-23_10-41-31/details.md Normal file
View File

@@ -0,0 +1,34 @@
# Details
Date : 2026-04-23 10:41:31
Directory d:\\Project\\upds7\\vba\\src
Total : 19 files, 3122 codes, 483 comments, 650 blanks, all 4255 lines
[Summary](results.md) / Details / [Diff Summary](diff.md) / [Diff Details](diff-details.md)
## Files
| filename | language | code | comment | blank | total |
| :--- | :--- | ---: | ---: | ---: | ---: |
| [src/init\_module/Import\_modules.bas](/src/init_module/Import_modules.bas) | Visual Basic for Applications | 156 | 13 | 30 | 199 |
| [src/init\_module/Test\_Cache.bas](/src/init_module/Test_Cache.bas) | Visual Basic for Applications | 161 | 12 | 26 | 199 |
| [src/module/Common\_Button.bas](/src/module/Common_Button.bas) | Visual Basic for Applications | 257 | 29 | 73 | 359 |
| [src/module/Common\_File\_Utils.bas](/src/module/Common_File_Utils.bas) | Visual Basic for Applications | 262 | 43 | 43 | 348 |
| [src/module/Common\_Functions.bas](/src/module/Common_Functions.bas) | Visual Basic for Applications | 371 | 42 | 74 | 487 |
| [src/module/Common\_Global\_Cache.bas](/src/module/Common_Global_Cache.bas) | Visual Basic for Applications | 456 | 51 | 80 | 587 |
| [src/module/Common\_Selector.bas](/src/module/Common_Selector.bas) | Visual Basic for Applications | 122 | 22 | 18 | 162 |
| [src/sheet/C1.cls](/src/sheet/C1.cls) | Visual Basic for Applications | 664 | 83 | 100 | 847 |
| [src/sheet/M1.cls](/src/sheet/M1.cls) | Visual Basic for Applications | 124 | 20 | 24 | 168 |
| [src/sheet/M2.cls](/src/sheet/M2.cls) | Visual Basic for Applications | 294 | 53 | 54 | 401 |
| [src/sheet/O1.cls](/src/sheet/O1.cls) | Visual Basic for Applications | 0 | 5 | 1 | 6 |
| [src/sheet/O2.cls](/src/sheet/O2.cls) | Visual Basic for Applications | 0 | 6 | 1 | 7 |
| [src/sheet/T1.cls](/src/sheet/T1.cls) | Visual Basic for Applications | 28 | 13 | 14 | 55 |
| [src/sheet/T2.cls](/src/sheet/T2.cls) | Visual Basic for Applications | 64 | 19 | 32 | 115 |
| [src/sheet/T3.cls](/src/sheet/T3.cls) | Visual Basic for Applications | 40 | 15 | 20 | 75 |
| [src/sheet/Z1.cls](/src/sheet/Z1.cls) | Visual Basic for Applications | 33 | 15 | 17 | 65 |
| [src/sheet/Z2.cls](/src/sheet/Z2.cls) | Visual Basic for Applications | 28 | 13 | 14 | 55 |
| [src/sheet/Z3.cls](/src/sheet/Z3.cls) | Visual Basic for Applications | 30 | 14 | 14 | 58 |
| [src/sheet/Z4.cls](/src/sheet/Z4.cls) | Visual Basic for Applications | 32 | 15 | 15 | 62 |
[Summary](results.md) / Details / [Diff Summary](diff.md) / [Diff Details](diff-details.md)

48
.VSCodeCounter/2026-04-23_10-41-31/diff-details.md Normal file
View File

@@ -0,0 +1,48 @@
# Diff Details
Date : 2026-04-23 10:41:31
Directory d:\\Project\\upds7\\vba\\src
Total : 33 files, 995 codes, 235 comments, 213 blanks, all 1443 lines
[Summary](results.md) / [Details](details.md) / [Diff Summary](diff.md) / Diff Details
## Files
| filename | language | code | comment | blank | total |
| :--- | :--- | ---: | ---: | ---: | ---: |
| [src/init\_module/Import\_modules.bas](/src/init_module/Import_modules.bas) | Visual Basic for Applications | 156 | 13 | 30 | 199 |
| [src/init\_module/Test\_Cache.bas](/src/init_module/Test_Cache.bas) | Visual Basic for Applications | 161 | 12 | 26 | 199 |
| [src/module/Common\_Button.bas](/src/module/Common_Button.bas) | Visual Basic for Applications | 257 | 29 | 73 | 359 |
| [src/module/Common\_File\_Utils.bas](/src/module/Common_File_Utils.bas) | Visual Basic for Applications | 262 | 43 | 43 | 348 |
| [src/module/Common\_Functions.bas](/src/module/Common_Functions.bas) | Visual Basic for Applications | 371 | 42 | 74 | 487 |
| [src/module/Common\_Global\_Cache.bas](/src/module/Common_Global_Cache.bas) | Visual Basic for Applications | 456 | 51 | 80 | 587 |
| [src/module/Common\_Selector.bas](/src/module/Common_Selector.bas) | Visual Basic for Applications | 122 | 22 | 18 | 162 |
| [src/module/Generic\_Master\_Common.bas](/src/module/Generic_Master_Common.bas) | Visual Basic for Applications | -58 | -12 | -17 | -87 |
| [src/module/Global\_Cache.bas](/src/module/Global_Cache.bas) | Visual Basic for Applications | -195 | -43 | -69 | -307 |
| [src/module/Module\_Common.bas](/src/module/Module_Common.bas) | Visual Basic for Applications | -171 | -23 | -35 | -229 |
| [src/module/Read\_Common.bas](/src/module/Read_Common.bas) | Visual Basic for Applications | -153 | -17 | -19 | -189 |
| [src/module/Test\_Cache.bas](/src/module/Test_Cache.bas) | Visual Basic for Applications | -159 | -4 | -25 | -188 |
| [src/module/Write\_Common.bas](/src/module/Write_Common.bas) | Visual Basic for Applications | -106 | -11 | -21 | -138 |
| [src/sheet/C1.cls](/src/sheet/C1.cls) | Visual Basic for Applications | 664 | 83 | 100 | 847 |
| [src/sheet/M1.cls](/src/sheet/M1.cls) | Visual Basic for Applications | 124 | 20 | 24 | 168 |
| [src/sheet/M2.cls](/src/sheet/M2.cls) | Visual Basic for Applications | 294 | 53 | 54 | 401 |
| [src/sheet/O1.cls](/src/sheet/O1.cls) | Visual Basic for Applications | 0 | 5 | 1 | 6 |
| [src/sheet/O2.cls](/src/sheet/O2.cls) | Visual Basic for Applications | 0 | 6 | 1 | 7 |
| [src/sheet/T1.cls](/src/sheet/T1.cls) | Visual Basic for Applications | 28 | 13 | 14 | 55 |
| [src/sheet/T2.cls](/src/sheet/T2.cls) | Visual Basic for Applications | 64 | 19 | 32 | 115 |
| [src/sheet/T3.cls](/src/sheet/T3.cls) | Visual Basic for Applications | 40 | 15 | 20 | 75 |
| [src/sheet/Z1.cls](/src/sheet/Z1.cls) | Visual Basic for Applications | 33 | 15 | 17 | 65 |
| [src/sheet/Z2.cls](/src/sheet/Z2.cls) | Visual Basic for Applications | 28 | 13 | 14 | 55 |
| [src/sheet/Z3.cls](/src/sheet/Z3.cls) | Visual Basic for Applications | 30 | 14 | 14 | 58 |
| [src/sheet/Z4.cls](/src/sheet/Z4.cls) | Visual Basic for Applications | 32 | 15 | 15 | 62 |
| [src/thisWorkbook/Master\_M1\_Kukan.bas](/src/thisWorkbook/Master_M1_Kukan.bas) | Visual Basic for Applications | -234 | -25 | -53 | -312 |
| [src/thisWorkbook/Master\_M2\_Kukan\_detail.bas](/src/thisWorkbook/Master_M2_Kukan_detail.bas) | Visual Basic for Applications | -176 | -32 | -45 | -253 |
| [src/thisWorkbook/Master\_O1\_address.bas](/src/thisWorkbook/Master_O1_address.bas) | Visual Basic for Applications | -35 | -4 | -13 | -52 |
| [src/thisWorkbook/Master\_O2\_507.bas](/src/thisWorkbook/Master_O2_507.bas) | Visual Basic for Applications | -12 | -1 | -4 | -17 |
| [src/thisWorkbook/Master\_Z1\_222.bas](/src/thisWorkbook/Master_Z1_222.bas) | Visual Basic for Applications | -140 | -5 | -27 | -172 |
| [src/thisWorkbook/Master\_Z2\_223.bas](/src/thisWorkbook/Master_Z2_223.bas) | Visual Basic for Applications | -126 | -5 | -25 | -156 |
| [src/thisWorkbook/Master\_Z3\_224.bas](/src/thisWorkbook/Master_Z3_224.bas) | Visual Basic for Applications | -133 | -5 | -26 | -164 |
| [src/thisWorkbook/Tukin\_C1.bas](/src/thisWorkbook/Tukin_C1.bas) | Visual Basic for Applications | -429 | -61 | -58 | -548 |
[Summary](results.md) / [Details](details.md) / [Diff Summary](diff.md) / Diff Details

35
.VSCodeCounter/2026-04-23_10-41-31/diff.csv Normal file
View File

@@ -0,0 +1,35 @@
"filename", "language", "Visual Basic for Applications", "comment", "blank", "total"
"d:\Project\upds7\vba\src\init_module\Import_modules.bas", "Visual Basic for Applications", 156, 13, 30, 199
"d:\Project\upds7\vba\src\init_module\Test_Cache.bas", "Visual Basic for Applications", 161, 12, 26, 199
"d:\Project\upds7\vba\src\module\Common_Button.bas", "Visual Basic for Applications", 257, 29, 73, 359
"d:\Project\upds7\vba\src\module\Common_File_Utils.bas", "Visual Basic for Applications", 262, 43, 43, 348
"d:\Project\upds7\vba\src\module\Common_Functions.bas", "Visual Basic for Applications", 371, 42, 74, 487
"d:\Project\upds7\vba\src\module\Common_Global_Cache.bas", "Visual Basic for Applications", 456, 51, 80, 587
"d:\Project\upds7\vba\src\module\Common_Selector.bas", "Visual Basic for Applications", 122, 22, 18, 162
"d:\Project\upds7\vba\src\module\Generic_Master_Common.bas", "Visual Basic for Applications", -58, -12, -17, -87
"d:\Project\upds7\vba\src\module\Global_Cache.bas", "Visual Basic for Applications", -195, -43, -69, -307
"d:\Project\upds7\vba\src\module\Module_Common.bas", "Visual Basic for Applications", -171, -23, -35, -229
"d:\Project\upds7\vba\src\module\Read_Common.bas", "Visual Basic for Applications", -153, -17, -19, -189
"d:\Project\upds7\vba\src\module\Test_Cache.bas", "Visual Basic for Applications", -159, -4, -25, -188
"d:\Project\upds7\vba\src\module\Write_Common.bas", "Visual Basic for Applications", -106, -11, -21, -138
"d:\Project\upds7\vba\src\sheet\C1.cls", "Visual Basic for Applications", 664, 83, 100, 847
"d:\Project\upds7\vba\src\sheet\M1.cls", "Visual Basic for Applications", 124, 20, 24, 168
"d:\Project\upds7\vba\src\sheet\M2.cls", "Visual Basic for Applications", 294, 53, 54, 401
"d:\Project\upds7\vba\src\sheet\O1.cls", "Visual Basic for Applications", 0, 5, 1, 6
"d:\Project\upds7\vba\src\sheet\O2.cls", "Visual Basic for Applications", 0, 6, 1, 7
"d:\Project\upds7\vba\src\sheet\T1.cls", "Visual Basic for Applications", 28, 13, 14, 55
"d:\Project\upds7\vba\src\sheet\T2.cls", "Visual Basic for Applications", 64, 19, 32, 115
"d:\Project\upds7\vba\src\sheet\T3.cls", "Visual Basic for Applications", 40, 15, 20, 75
"d:\Project\upds7\vba\src\sheet\Z1.cls", "Visual Basic for Applications", 33, 15, 17, 65
"d:\Project\upds7\vba\src\sheet\Z2.cls", "Visual Basic for Applications", 28, 13, 14, 55
"d:\Project\upds7\vba\src\sheet\Z3.cls", "Visual Basic for Applications", 30, 14, 14, 58
"d:\Project\upds7\vba\src\sheet\Z4.cls", "Visual Basic for Applications", 32, 15, 15, 62
"d:\Project\upds7\vba\src\thisWorkbook\Master_M1_Kukan.bas", "Visual Basic for Applications", -234, -25, -53, -312
"d:\Project\upds7\vba\src\thisWorkbook\Master_M2_Kukan_detail.bas", "Visual Basic for Applications", -176, -32, -45, -253
"d:\Project\upds7\vba\src\thisWorkbook\Master_O1_address.bas", "Visual Basic for Applications", -35, -4, -13, -52
"d:\Project\upds7\vba\src\thisWorkbook\Master_O2_507.bas", "Visual Basic for Applications", -12, -1, -4, -17
"d:\Project\upds7\vba\src\thisWorkbook\Master_Z1_222.bas", "Visual Basic for Applications", -140, -5, -27, -172
"d:\Project\upds7\vba\src\thisWorkbook\Master_Z2_223.bas", "Visual Basic for Applications", -126, -5, -25, -156
"d:\Project\upds7\vba\src\thisWorkbook\Master_Z3_224.bas", "Visual Basic for Applications", -133, -5, -26, -164
"d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas", "Visual Basic for Applications", -429, -61, -58, -548
"Total", "-", 995, 235, 213, 1443
1 filename language Visual Basic for Applications comment blank total
2 d:\Project\upds7\vba\src\init_module\Import_modules.bas Visual Basic for Applications 156 13 30 199
3 d:\Project\upds7\vba\src\init_module\Test_Cache.bas Visual Basic for Applications 161 12 26 199
4 d:\Project\upds7\vba\src\module\Common_Button.bas Visual Basic for Applications 257 29 73 359
5 d:\Project\upds7\vba\src\module\Common_File_Utils.bas Visual Basic for Applications 262 43 43 348
6 d:\Project\upds7\vba\src\module\Common_Functions.bas Visual Basic for Applications 371 42 74 487
7 d:\Project\upds7\vba\src\module\Common_Global_Cache.bas Visual Basic for Applications 456 51 80 587
8 d:\Project\upds7\vba\src\module\Common_Selector.bas Visual Basic for Applications 122 22 18 162
9 d:\Project\upds7\vba\src\module\Generic_Master_Common.bas Visual Basic for Applications -58 -12 -17 -87
10 d:\Project\upds7\vba\src\module\Global_Cache.bas Visual Basic for Applications -195 -43 -69 -307
11 d:\Project\upds7\vba\src\module\Module_Common.bas Visual Basic for Applications -171 -23 -35 -229
12 d:\Project\upds7\vba\src\module\Read_Common.bas Visual Basic for Applications -153 -17 -19 -189
13 d:\Project\upds7\vba\src\module\Test_Cache.bas Visual Basic for Applications -159 -4 -25 -188
14 d:\Project\upds7\vba\src\module\Write_Common.bas Visual Basic for Applications -106 -11 -21 -138
15 d:\Project\upds7\vba\src\sheet\C1.cls Visual Basic for Applications 664 83 100 847
16 d:\Project\upds7\vba\src\sheet\M1.cls Visual Basic for Applications 124 20 24 168
17 d:\Project\upds7\vba\src\sheet\M2.cls Visual Basic for Applications 294 53 54 401
18 d:\Project\upds7\vba\src\sheet\O1.cls Visual Basic for Applications 0 5 1 6
19 d:\Project\upds7\vba\src\sheet\O2.cls Visual Basic for Applications 0 6 1 7
20 d:\Project\upds7\vba\src\sheet\T1.cls Visual Basic for Applications 28 13 14 55
21 d:\Project\upds7\vba\src\sheet\T2.cls Visual Basic for Applications 64 19 32 115
22 d:\Project\upds7\vba\src\sheet\T3.cls Visual Basic for Applications 40 15 20 75
23 d:\Project\upds7\vba\src\sheet\Z1.cls Visual Basic for Applications 33 15 17 65
24 d:\Project\upds7\vba\src\sheet\Z2.cls Visual Basic for Applications 28 13 14 55
25 d:\Project\upds7\vba\src\sheet\Z3.cls Visual Basic for Applications 30 14 14 58
26 d:\Project\upds7\vba\src\sheet\Z4.cls Visual Basic for Applications 32 15 15 62
27 d:\Project\upds7\vba\src\thisWorkbook\Master_M1_Kukan.bas Visual Basic for Applications -234 -25 -53 -312
28 d:\Project\upds7\vba\src\thisWorkbook\Master_M2_Kukan_detail.bas Visual Basic for Applications -176 -32 -45 -253
29 d:\Project\upds7\vba\src\thisWorkbook\Master_O1_address.bas Visual Basic for Applications -35 -4 -13 -52
30 d:\Project\upds7\vba\src\thisWorkbook\Master_O2_507.bas Visual Basic for Applications -12 -1 -4 -17
31 d:\Project\upds7\vba\src\thisWorkbook\Master_Z1_222.bas Visual Basic for Applications -140 -5 -27 -172
32 d:\Project\upds7\vba\src\thisWorkbook\Master_Z2_223.bas Visual Basic for Applications -126 -5 -25 -156
33 d:\Project\upds7\vba\src\thisWorkbook\Master_Z3_224.bas Visual Basic for Applications -133 -5 -26 -164
34 d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas Visual Basic for Applications -429 -61 -58 -548
35 Total - 995 235 213 1443

19
.VSCodeCounter/2026-04-16_18-53-36/diff.md → .VSCodeCounter/2026-04-23_10-41-31/diff.md
View File

@@ -1,28 +1,25 @@
# Diff Summary
Date : 2026-04-16 18:53:36
Date : 2026-04-23 10:41:31
Directory d:\\Project\\upds7\\vba\\src
Total : 12 files, -6366 codes, 0 comments, -42 blanks, all -6408 lines
Total : 33 files, 995 codes, 235 comments, 213 blanks, all 1443 lines
[Summary](results.md) / [Details](details.md) / Diff Summary / [Diff Details](diff-details.md)
## Languages
| language | files | code | comment | blank | total |
| :--- | ---: | ---: | ---: | ---: | ---: |
| Visual Basic for Applications | 2 | 17 | 0 | 0 | 17 |
| Markdown | 1 | -20 | 0 | -1 | -21 |
| CSV | 6 | -115 | 0 | -3 | -118 |
| Excel | 3 | -6,248 | 0 | -38 | -6,286 |
| Visual Basic for Applications | 33 | 995 | 235 | 213 | 1,443 |
## Directories
| path | files | code | comment | blank | total |
| :--- | ---: | ---: | ---: | ---: | ---: |
| . | 12 | -6,366 | 0 | -42 | -6,408 |
| .. | 4 | -6,268 | 0 | -39 | -6,307 |
| data | 6 | -115 | 0 | -3 | -118 |
| module | 1 | 10 | 0 | 0 | 10 |
| thisWorkbook | 1 | 7 | 0 | 0 | 7 |
| . | 33 | 995 | 235 | 213 | 1,443 |
| init_module | 2 | 317 | 25 | 56 | 398 |
| module | 11 | 626 | 77 | 102 | 805 |
| sheet | 12 | 1,337 | 271 | 306 | 1,914 |
| thisWorkbook | 8 | -1,285 | -138 | -251 | -1,674 |
[Summary](results.md) / [Details](details.md) / Diff Summary / [Diff Details](diff-details.md)

61
.VSCodeCounter/2026-04-23_10-41-31/diff.txt Normal file
View File

@@ -0,0 +1,61 @@
Date : 2026-04-23 10:41:31
Directory : d:\Project\upds7\vba\src
Total : 33 files, 995 codes, 235 comments, 213 blanks, all 1443 lines
Languages
+-------------------------------+------------+------------+------------+------------+------------+
| language | files | code | comment | blank | total |
+-------------------------------+------------+------------+------------+------------+------------+
| Visual Basic for Applications | 33 | 995 | 235 | 213 | 1,443 |
+-------------------------------+------------+------------+------------+------------+------------+
Directories
+------------------------------------------------------------------+------------+------------+------------+------------+------------+
| path | files | code | comment | blank | total |
+------------------------------------------------------------------+------------+------------+------------+------------+------------+
| . | 33 | 995 | 235 | 213 | 1,443 |
| init_module | 2 | 317 | 25 | 56 | 398 |
| module | 11 | 626 | 77 | 102 | 805 |
| sheet | 12 | 1,337 | 271 | 306 | 1,914 |
| thisWorkbook | 8 | -1,285 | -138 | -251 | -1,674 |
+------------------------------------------------------------------+------------+------------+------------+------------+------------+
Files
+------------------------------------------------------------------+-------------------------------+------------+------------+------------+------------+
| filename | language | code | comment | blank | total |
+------------------------------------------------------------------+-------------------------------+------------+------------+------------+------------+
| d:\Project\upds7\vba\src\init_module\Import_modules.bas | Visual Basic for Applications | 156 | 13 | 30 | 199 |
| d:\Project\upds7\vba\src\init_module\Test_Cache.bas | Visual Basic for Applications | 161 | 12 | 26 | 199 |
| d:\Project\upds7\vba\src\module\Common_Button.bas | Visual Basic for Applications | 257 | 29 | 73 | 359 |
| d:\Project\upds7\vba\src\module\Common_File_Utils.bas | Visual Basic for Applications | 262 | 43 | 43 | 348 |
| d:\Project\upds7\vba\src\module\Common_Functions.bas | Visual Basic for Applications | 371 | 42 | 74 | 487 |
| d:\Project\upds7\vba\src\module\Common_Global_Cache.bas | Visual Basic for Applications | 456 | 51 | 80 | 587 |
| d:\Project\upds7\vba\src\module\Common_Selector.bas | Visual Basic for Applications | 122 | 22 | 18 | 162 |
| d:\Project\upds7\vba\src\module\Generic_Master_Common.bas | Visual Basic for Applications | -58 | -12 | -17 | -87 |
| d:\Project\upds7\vba\src\module\Global_Cache.bas | Visual Basic for Applications | -195 | -43 | -69 | -307 |
| d:\Project\upds7\vba\src\module\Module_Common.bas | Visual Basic for Applications | -171 | -23 | -35 | -229 |
| d:\Project\upds7\vba\src\module\Read_Common.bas | Visual Basic for Applications | -153 | -17 | -19 | -189 |
| d:\Project\upds7\vba\src\module\Test_Cache.bas | Visual Basic for Applications | -159 | -4 | -25 | -188 |
| d:\Project\upds7\vba\src\module\Write_Common.bas | Visual Basic for Applications | -106 | -11 | -21 | -138 |
| d:\Project\upds7\vba\src\sheet\C1.cls | Visual Basic for Applications | 664 | 83 | 100 | 847 |
| d:\Project\upds7\vba\src\sheet\M1.cls | Visual Basic for Applications | 124 | 20 | 24 | 168 |
| d:\Project\upds7\vba\src\sheet\M2.cls | Visual Basic for Applications | 294 | 53 | 54 | 401 |
| d:\Project\upds7\vba\src\sheet\O1.cls | Visual Basic for Applications | 0 | 5 | 1 | 6 |
| d:\Project\upds7\vba\src\sheet\O2.cls | Visual Basic for Applications | 0 | 6 | 1 | 7 |
| d:\Project\upds7\vba\src\sheet\T1.cls | Visual Basic for Applications | 28 | 13 | 14 | 55 |
| d:\Project\upds7\vba\src\sheet\T2.cls | Visual Basic for Applications | 64 | 19 | 32 | 115 |
| d:\Project\upds7\vba\src\sheet\T3.cls | Visual Basic for Applications | 40 | 15 | 20 | 75 |
| d:\Project\upds7\vba\src\sheet\Z1.cls | Visual Basic for Applications | 33 | 15 | 17 | 65 |
| d:\Project\upds7\vba\src\sheet\Z2.cls | Visual Basic for Applications | 28 | 13 | 14 | 55 |
| d:\Project\upds7\vba\src\sheet\Z3.cls | Visual Basic for Applications | 30 | 14 | 14 | 58 |
| d:\Project\upds7\vba\src\sheet\Z4.cls | Visual Basic for Applications | 32 | 15 | 15 | 62 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_M1_Kukan.bas | Visual Basic for Applications | -234 | -25 | -53 | -312 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_M2_Kukan_detail.bas | Visual Basic for Applications | -176 | -32 | -45 | -253 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_O1_address.bas | Visual Basic for Applications | -35 | -4 | -13 | -52 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_O2_507.bas | Visual Basic for Applications | -12 | -1 | -4 | -17 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_Z1_222.bas | Visual Basic for Applications | -140 | -5 | -27 | -172 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_Z2_223.bas | Visual Basic for Applications | -126 | -5 | -25 | -156 |
| d:\Project\upds7\vba\src\thisWorkbook\Master_Z3_224.bas | Visual Basic for Applications | -133 | -5 | -26 | -164 |
| d:\Project\upds7\vba\src\thisWorkbook\Tukin_C1.bas | Visual Basic for Applications | -429 | -61 | -58 | -548 |
| Total | | 995 | 235 | 213 | 1,443 |
+------------------------------------------------------------------+-------------------------------+------------+------------+------------+------------+

21
.VSCodeCounter/2026-04-23_10-41-31/results.csv Normal file
View File

@@ -0,0 +1,21 @@
"filename", "language", "Visual Basic for Applications", "comment", "blank", "total"
"d:\Project\upds7\vba\src\init_module\Import_modules.bas", "Visual Basic for Applications", 156, 13, 30, 199
"d:\Project\upds7\vba\src\init_module\Test_Cache.bas", "Visual Basic for Applications", 161, 12, 26, 199
"d:\Project\upds7\vba\src\module\Common_Button.bas", "Visual Basic for Applications", 257, 29, 73, 359
"d:\Project\upds7\vba\src\module\Common_File_Utils.bas", "Visual Basic for Applications", 262, 43, 43, 348
"d:\Project\upds7\vba\src\module\Common_Functions.bas", "Visual Basic for Applications", 371, 42, 74, 487
"d:\Project\upds7\vba\src\module\Common_Global_Cache.bas", "Visual Basic for Applications", 456, 51, 80, 587
"d:\Project\upds7\vba\src\module\Common_Selector.bas", "Visual Basic for Applications", 122, 22, 18, 162
"d:\Project\upds7\vba\src\sheet\C1.cls", "Visual Basic for Applications", 664, 83, 100, 847
"d:\Project\upds7\vba\src\sheet\M1.cls", "Visual Basic for Applications", 124, 20, 24, 168
"d:\Project\upds7\vba\src\sheet\M2.cls", "Visual Basic for Applications", 294, 53, 54, 401
"d:\Project\upds7\vba\src\sheet\O1.cls", "Visual Basic for Applications", 0, 5, 1, 6
"d:\Project\upds7\vba\src\sheet\O2.cls", "Visual Basic for Applications", 0, 6, 1, 7
"d:\Project\upds7\vba\src\sheet\T1.cls", "Visual Basic for Applications", 28, 13, 14, 55
"d:\Project\upds7\vba\src\sheet\T2.cls", "Visual Basic for Applications", 64, 19, 32, 115
"d:\Project\upds7\vba\src\sheet\T3.cls", "Visual Basic for Applications", 40, 15, 20, 75
"d:\Project\upds7\vba\src\sheet\Z1.cls", "Visual Basic for Applications", 33, 15, 17, 65
"d:\Project\upds7\vba\src\sheet\Z2.cls", "Visual Basic for Applications", 28, 13, 14, 55
"d:\Project\upds7\vba\src\sheet\Z3.cls", "Visual Basic for Applications", 30, 14, 14, 58
"d:\Project\upds7\vba\src\sheet\Z4.cls", "Visual Basic for Applications", 32, 15, 15, 62
"Total", "-", 3122, 483, 650, 4255
1 filename language Visual Basic for Applications comment blank total
2 d:\Project\upds7\vba\src\init_module\Import_modules.bas Visual Basic for Applications 156 13 30 199
3 d:\Project\upds7\vba\src\init_module\Test_Cache.bas Visual Basic for Applications 161 12 26 199
4 d:\Project\upds7\vba\src\module\Common_Button.bas Visual Basic for Applications 257 29 73 359
5 d:\Project\upds7\vba\src\module\Common_File_Utils.bas Visual Basic for Applications 262 43 43 348
6 d:\Project\upds7\vba\src\module\Common_Functions.bas Visual Basic for Applications 371 42 74 487
7 d:\Project\upds7\vba\src\module\Common_Global_Cache.bas Visual Basic for Applications 456 51 80 587
8 d:\Project\upds7\vba\src\module\Common_Selector.bas Visual Basic for Applications 122 22 18 162
9 d:\Project\upds7\vba\src\sheet\C1.cls Visual Basic for Applications 664 83 100 847
10 d:\Project\upds7\vba\src\sheet\M1.cls Visual Basic for Applications 124 20 24 168
11 d:\Project\upds7\vba\src\sheet\M2.cls Visual Basic for Applications 294 53 54 401
12 d:\Project\upds7\vba\src\sheet\O1.cls Visual Basic for Applications 0 5 1 6
13 d:\Project\upds7\vba\src\sheet\O2.cls Visual Basic for Applications 0 6 1 7
14 d:\Project\upds7\vba\src\sheet\T1.cls Visual Basic for Applications 28 13 14 55
15 d:\Project\upds7\vba\src\sheet\T2.cls Visual Basic for Applications 64 19 32 115
16 d:\Project\upds7\vba\src\sheet\T3.cls Visual Basic for Applications 40 15 20 75
17 d:\Project\upds7\vba\src\sheet\Z1.cls Visual Basic for Applications 33 15 17 65
18 d:\Project\upds7\vba\src\sheet\Z2.cls Visual Basic for Applications 28 13 14 55
19 d:\Project\upds7\vba\src\sheet\Z3.cls Visual Basic for Applications 30 14 14 58
20 d:\Project\upds7\vba\src\sheet\Z4.cls Visual Basic for Applications 32 15 15 62
21 Total - 3122 483 650 4255

1
.VSCodeCounter/2026-04-23_10-41-31/results.json Normal file
View File

@@ -0,0 +1 @@
{"file:///d%3A/Project/upds7/vba/src/sheet/Z4.cls":{"language":"Visual Basic for Applications","code":32,"comment":15,"blank":15},"file:///d%3A/Project/upds7/vba/src/sheet/Z2.cls":{"language":"Visual Basic for Applications","code":28,"comment":13,"blank":14},"file:///d%3A/Project/upds7/vba/src/sheet/Z3.cls":{"language":"Visual Basic for Applications","code":30,"comment":14,"blank":14},"file:///d%3A/Project/upds7/vba/src/sheet/Z1.cls":{"language":"Visual Basic for Applications","code":33,"comment":15,"blank":17},"file:///d%3A/Project/upds7/vba/src/sheet/T3.cls":{"language":"Visual Basic for Applications","code":40,"comment":15,"blank":20},"file:///d%3A/Project/upds7/vba/src/sheet/T1.cls":{"language":"Visual Basic for Applications","code":28,"comment":13,"blank":14},"file:///d%3A/Project/upds7/vba/src/sheet/T2.cls":{"language":"Visual Basic for Applications","code":64,"comment":19,"blank":32},"file:///d%3A/Project/upds7/vba/src/sheet/O2.cls":{"language":"Visual Basic for Applications","code":0,"comment":6,"blank":1},"file:///d%3A/Project/upds7/vba/src/sheet/M1.cls":{"language":"Visual Basic for Applications","code":124,"comment":20,"blank":24},"file:///d%3A/Project/upds7/vba/src/sheet/O1.cls":{"language":"Visual Basic for Applications","code":0,"comment":5,"blank":1},"file:///d%3A/Project/upds7/vba/src/sheet/C1.cls":{"language":"Visual Basic for Applications","code":664,"comment":83,"blank":100},"file:///d%3A/Project/upds7/vba/src/module/Common_Functions.bas":{"language":"Visual Basic for Applications","code":371,"comment":42,"blank":74},"file:///d%3A/Project/upds7/vba/src/sheet/M2.cls":{"language":"Visual Basic for Applications","code":294,"comment":53,"blank":54},"file:///d%3A/Project/upds7/vba/src/module/Common_File_Utils.bas":{"language":"Visual Basic for Applications","code":262,"comment":43,"blank":43},"file:///d%3A/Project/upds7/vba/src/module/Common_Button.bas":{"language":"Visual Basic for Applications","code":257,"comment":29,"blank":73},"file:///d%3A/Project/upds7/vba/src/init_module/Import_modules.bas":{"language":"Visual Basic for Applications","code":156,"comment":13,"blank":30},"file:///d%3A/Project/upds7/vba/src/init_module/Test_Cache.bas":{"language":"Visual Basic for Applications","code":161,"comment":12,"blank":26},"file:///d%3A/Project/upds7/vba/src/module/Common_Global_Cache.bas":{"language":"Visual Basic for Applications","code":456,"comment":51,"blank":80},"file:///d%3A/Project/upds7/vba/src/module/Common_Selector.bas":{"language":"Visual Basic for Applications","code":122,"comment":22,"blank":18}}

13
.VSCodeCounter/2026-04-16_18-53-36/results.md → .VSCodeCounter/2026-04-23_10-41-31/results.md
View File

@@ -1,23 +1,24 @@
# Summary
Date : 2026-04-16 18:53:36
Date : 2026-04-23 10:41:31
Directory d:\\Project\\upds7\\vba\\src
Total : 14 files, 2127 codes, 248 comments, 437 blanks, all 2812 lines
Total : 19 files, 3122 codes, 483 comments, 650 blanks, all 4255 lines
Summary / [Details](details.md) / [Diff Summary](diff.md) / [Diff Details](diff-details.md)
## Languages
| language | files | code | comment | blank | total |
| :--- | ---: | ---: | ---: | ---: | ---: |
| Visual Basic for Applications | 14 | 2,127 | 248 | 437 | 2,812 |
| Visual Basic for Applications | 19 | 3,122 | 483 | 650 | 4,255 |
## Directories
| path | files | code | comment | blank | total |
| :--- | ---: | ---: | ---: | ---: | ---: |
| . | 14 | 2,127 | 248 | 437 | 2,812 |
| module | 6 | 842 | 110 | 186 | 1,138 |
| thisWorkbook | 8 | 1,285 | 138 | 251 | 1,674 |
| . | 19 | 3,122 | 483 | 650 | 4,255 |
| init_module | 2 | 317 | 25 | 56 | 398 |
| module | 5 | 1,468 | 187 | 288 | 1,943 |
| sheet | 12 | 1,337 | 271 | 306 | 1,914 |
Summary / [Details](details.md) / [Diff Summary](diff.md) / [Diff Details](diff-details.md)

46
.VSCodeCounter/2026-04-23_10-41-31/results.txt Normal file
View File

@@ -0,0 +1,46 @@
Date : 2026-04-23 10:41:31
Directory : d:\Project\upds7\vba\src
Total : 19 files, 3122 codes, 483 comments, 650 blanks, all 4255 lines
Languages
+-------------------------------+------------+------------+------------+------------+------------+
| language | files | code | comment | blank | total |
+-------------------------------+------------+------------+------------+------------+------------+
| Visual Basic for Applications | 19 | 3,122 | 483 | 650 | 4,255 |
+-------------------------------+------------+------------+------------+------------+------------+
Directories
+---------------------------------------------------------+------------+------------+------------+------------+------------+
| path | files | code | comment | blank | total |
+---------------------------------------------------------+------------+------------+------------+------------+------------+
| . | 19 | 3,122 | 483 | 650 | 4,255 |
| init_module | 2 | 317 | 25 | 56 | 398 |
| module | 5 | 1,468 | 187 | 288 | 1,943 |
| sheet | 12 | 1,337 | 271 | 306 | 1,914 |
+---------------------------------------------------------+------------+------------+------------+------------+------------+
Files
+---------------------------------------------------------+-------------------------------+------------+------------+------------+------------+
| filename | language | code | comment | blank | total |
+---------------------------------------------------------+-------------------------------+------------+------------+------------+------------+
| d:\Project\upds7\vba\src\init_module\Import_modules.bas | Visual Basic for Applications | 156 | 13 | 30 | 199 |
| d:\Project\upds7\vba\src\init_module\Test_Cache.bas | Visual Basic for Applications | 161 | 12 | 26 | 199 |
| d:\Project\upds7\vba\src\module\Common_Button.bas | Visual Basic for Applications | 257 | 29 | 73 | 359 |
| d:\Project\upds7\vba\src\module\Common_File_Utils.bas | Visual Basic for Applications | 262 | 43 | 43 | 348 |
| d:\Project\upds7\vba\src\module\Common_Functions.bas | Visual Basic for Applications | 371 | 42 | 74 | 487 |
| d:\Project\upds7\vba\src\module\Common_Global_Cache.bas | Visual Basic for Applications | 456 | 51 | 80 | 587 |
| d:\Project\upds7\vba\src\module\Common_Selector.bas | Visual Basic for Applications | 122 | 22 | 18 | 162 |
| d:\Project\upds7\vba\src\sheet\C1.cls | Visual Basic for Applications | 664 | 83 | 100 | 847 |
| d:\Project\upds7\vba\src\sheet\M1.cls | Visual Basic for Applications | 124 | 20 | 24 | 168 |
| d:\Project\upds7\vba\src\sheet\M2.cls | Visual Basic for Applications | 294 | 53 | 54 | 401 |
| d:\Project\upds7\vba\src\sheet\O1.cls | Visual Basic for Applications | 0 | 5 | 1 | 6 |
| d:\Project\upds7\vba\src\sheet\O2.cls | Visual Basic for Applications | 0 | 6 | 1 | 7 |
| d:\Project\upds7\vba\src\sheet\T1.cls | Visual Basic for Applications | 28 | 13 | 14 | 55 |
| d:\Project\upds7\vba\src\sheet\T2.cls | Visual Basic for Applications | 64 | 19 | 32 | 115 |
| d:\Project\upds7\vba\src\sheet\T3.cls | Visual Basic for Applications | 40 | 15 | 20 | 75 |
| d:\Project\upds7\vba\src\sheet\Z1.cls | Visual Basic for Applications | 33 | 15 | 17 | 65 |
| d:\Project\upds7\vba\src\sheet\Z2.cls | Visual Basic for Applications | 28 | 13 | 14 | 55 |
| d:\Project\upds7\vba\src\sheet\Z3.cls | Visual Basic for Applications | 30 | 14 | 14 | 58 |
| d:\Project\upds7\vba\src\sheet\Z4.cls | Visual Basic for Applications | 32 | 15 | 15 | 62 |
| Total | | 3,122 | 483 | 650 | 4,255 |
+---------------------------------------------------------+-------------------------------+------------+------------+------------+------------+

2
src/module/Common_Button.bas
View File

@@ -135,7 +135,9 @@ Private Sub Do_Validation(ws As Excel.Worksheet)
ElseIf errorCount > 0 Then
MsgBox "Validation complete. Errors: " & errorCount, vbInformation
Else
If ws.CodeName <> "C1" Then
RefreshCache(ws.CodeName)
End If
MsgBox "Validation complete. Errors: 0", vbInformation
End If

55
src/sheet/C1.cls
View File

@@ -18,6 +18,10 @@
' ============================================================
' Column arrays for 4 kukan sections
' ============================================================
Const CSHAINNO_COL As String = "C"
Const ADDRESS1_COL As String = "I"
Const ADDRESS2_COL As String = "J"
Private Function KUKAN_CODE_COLS() As Variant
KUKAN_CODE_COLS = Array(19, 26, 33, 40) ' S, Z, AG, AN
End Function
@@ -108,10 +112,11 @@ Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Dim cell As Range
For Each cell In Target
If Trim(cell.Value) = "" Then
Dim cshainno As String: cshainno = Trim(cell.Value)
If cshainno = "" Then
Call ClearRowData(cell.Row)
Else
Call CreateAddress1Dropdown(cell.Row)
Call CreateAddress1Dropdown(cell.Row, cshainno)
End If
Next
End If
@@ -312,18 +317,19 @@ Private Sub FillKukanFromM1(ByVal rowNum As Long, ByVal idx As Long)
End Sub
' triggered by c clomun cshainno input
Private Sub CreateAddress1Dropdown(ByVal rowNum As Long)
' when cshainno does not exist in o1, clear dropdownList and value
' when cshainno exist in o1, create dropdownList and value
Private Sub CreateAddress1Dropdown(ByVal rowNum As Long, ByVal cshainno As String)
Dim o1Cache As Object: Set o1Cache = GetCache("O1")
Dim empNo As String
empNo = Trim(Me.Cells(rowNum, 3).Value)
If empNo = "" Then Exit Sub
Me.Range("I" & rowNum).Validation.Delete
Me.Range("I" & rowNum).Value = ""
Me.Range("J" & rowNum).Validation.Delete
Me.Range("J" & rowNum).Value = ""
' Build dropdown list from O1 cache: get all E values for the C
Dim dropdownList As String
If o1Cache.Exists(empNo) Then
If o1Cache.Exists(cshainno) Then
Dim innerDict As Object
Set innerDict = o1Cache(empNo)
Set innerDict = o1Cache(cshainno)
Dim eKey As Variant
For Each eKey In innerDict.Keys
If dropdownList = "" Then
@@ -349,33 +355,26 @@ End Sub
' triggered by address1 select O1 cache
Private Sub CreateAddress2Dropdown(ByVal rowNum As Long)
' Clear address2 contents
Me.Range(ADDRESS2_COL & rowNum).Validation.Delete
Me.Range(ADDRESS2_COL & rowNum).Value = ""
' obtain cshainno, address1, o1Cache
Dim o1Cache As Object: Set o1Cache = GetCache("O1")
Dim empNo As String
empNo = Trim(Me.Cells(rowNum, 3).Value)
If empNo = "" Then
Me.Range("J" & rowNum).Validation.Delete
Me.Range("J" & rowNum).Value = ""
Exit Sub
End If
Dim addr1 As String
addr1 = Trim(Me.Cells(rowNum, 9).Value)
Me.Range("J" & rowNum).Value = ""
If addr1 = "" Then
Me.Range("J" & rowNum).Validation.Delete
Dim cshainno As String: cshainno = Trim(Me.Cells(rowNum, CSHAINNO_COL).Value)
Dim address1 As String: address1 = Trim(Me.Cells(rowNum, ADDRESS1_COL).Value)
If cshainno = "" OR address1 = "" Then
Exit Sub
End If
' Build dropdown list from O1 cache
Dim dropdownList As String
If o1Cache.Exists(empNo) Then
If o1Cache.Exists(cshainno) Then
Dim innerDict As Object
Set innerDict = o1Cache(empNo)
Set innerDict = o1Cache(cshainno)
If innerDict.Exists(addr1) Then
If innerDict.Exists(address1) Then
Dim addr2Dict As Object
Set addr2Dict = innerDict(addr1)
Set addr2Dict = innerDict(address1)
Dim addr2Key As Variant
For Each addr2Key In addr2Dict.Keys

BIN
通勤手当テンプレート.xlsm Normal file
View File

Binary file not shown.

BIN
通勤手当テンプレート_案.xlsm
View File

Binary file not shown.