diff --git a/.VSCodeCounter/2026-04-16_18-53-36/details.md b/.VSCodeCounter/2026-04-16_18-53-36/details.md deleted file mode 100644 index 041c8e7..0000000 --- a/.VSCodeCounter/2026-04-16_18-53-36/details.md +++ /dev/null @@ -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) \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-16_18-53-36/diff-details.md b/.VSCodeCounter/2026-04-16_18-53-36/diff-details.md deleted file mode 100644 index b547934..0000000 --- a/.VSCodeCounter/2026-04-16_18-53-36/diff-details.md +++ /dev/null @@ -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 \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-16_18-53-36/diff.csv b/.VSCodeCounter/2026-04-16_18-53-36/diff.csv deleted file mode 100644 index 9dd3055..0000000 --- a/.VSCodeCounter/2026-04-16_18-53-36/diff.csv +++ /dev/null @@ -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 \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-16_18-53-36/diff.txt b/.VSCodeCounter/2026-04-16_18-53-36/diff.txt deleted file mode 100644 index 8902025..0000000 --- a/.VSCodeCounter/2026-04-16_18-53-36/diff.txt +++ /dev/null @@ -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 | -+----------------------------------------------------+-------------------------------+------------+------------+------------+------------+ \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-16_18-53-36/results.csv b/.VSCodeCounter/2026-04-16_18-53-36/results.csv deleted file mode 100644 index 0513082..0000000 --- a/.VSCodeCounter/2026-04-16_18-53-36/results.csv +++ /dev/null @@ -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 \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-16_18-53-36/results.json b/.VSCodeCounter/2026-04-16_18-53-36/results.json deleted file mode 100644 index e6fbb54..0000000 --- a/.VSCodeCounter/2026-04-16_18-53-36/results.json +++ /dev/null @@ -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}} \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-16_18-53-36/results.txt b/.VSCodeCounter/2026-04-16_18-53-36/results.txt deleted file mode 100644 index 2dfa53a..0000000 --- a/.VSCodeCounter/2026-04-16_18-53-36/results.txt +++ /dev/null @@ -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 | -+------------------------------------------------------------------+-------------------------------+------------+------------+------------+------------+ \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-23_10-41-31/details.md b/.VSCodeCounter/2026-04-23_10-41-31/details.md new file mode 100644 index 0000000..da81289 --- /dev/null +++ b/.VSCodeCounter/2026-04-23_10-41-31/details.md @@ -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) \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-23_10-41-31/diff-details.md b/.VSCodeCounter/2026-04-23_10-41-31/diff-details.md new file mode 100644 index 0000000..e665461 --- /dev/null +++ b/.VSCodeCounter/2026-04-23_10-41-31/diff-details.md @@ -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 \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-23_10-41-31/diff.csv b/.VSCodeCounter/2026-04-23_10-41-31/diff.csv new file mode 100644 index 0000000..fffd30c --- /dev/null +++ b/.VSCodeCounter/2026-04-23_10-41-31/diff.csv @@ -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 \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-16_18-53-36/diff.md b/.VSCodeCounter/2026-04-23_10-41-31/diff.md similarity index 50% rename from .VSCodeCounter/2026-04-16_18-53-36/diff.md rename to .VSCodeCounter/2026-04-23_10-41-31/diff.md index 33c17f1..570fd3b 100644 --- a/.VSCodeCounter/2026-04-16_18-53-36/diff.md +++ b/.VSCodeCounter/2026-04-23_10-41-31/diff.md @@ -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) \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-23_10-41-31/diff.txt b/.VSCodeCounter/2026-04-23_10-41-31/diff.txt new file mode 100644 index 0000000..7efabc0 --- /dev/null +++ b/.VSCodeCounter/2026-04-23_10-41-31/diff.txt @@ -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 | ++------------------------------------------------------------------+-------------------------------+------------+------------+------------+------------+ \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-23_10-41-31/results.csv b/.VSCodeCounter/2026-04-23_10-41-31/results.csv new file mode 100644 index 0000000..dedf570 --- /dev/null +++ b/.VSCodeCounter/2026-04-23_10-41-31/results.csv @@ -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 \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-23_10-41-31/results.json b/.VSCodeCounter/2026-04-23_10-41-31/results.json new file mode 100644 index 0000000..72089cd --- /dev/null +++ b/.VSCodeCounter/2026-04-23_10-41-31/results.json @@ -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}} \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-16_18-53-36/results.md b/.VSCodeCounter/2026-04-23_10-41-31/results.md similarity index 58% rename from .VSCodeCounter/2026-04-16_18-53-36/results.md rename to .VSCodeCounter/2026-04-23_10-41-31/results.md index b5c8f95..83afde3 100644 --- a/.VSCodeCounter/2026-04-16_18-53-36/results.md +++ b/.VSCodeCounter/2026-04-23_10-41-31/results.md @@ -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) \ No newline at end of file diff --git a/.VSCodeCounter/2026-04-23_10-41-31/results.txt b/.VSCodeCounter/2026-04-23_10-41-31/results.txt new file mode 100644 index 0000000..6342628 --- /dev/null +++ b/.VSCodeCounter/2026-04-23_10-41-31/results.txt @@ -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 | ++---------------------------------------------------------+-------------------------------+------------+------------+------------+------------+ \ No newline at end of file diff --git a/src/module/Common_Button.bas b/src/module/Common_Button.bas index 7c75820..086266d 100644 --- a/src/module/Common_Button.bas +++ b/src/module/Common_Button.bas @@ -135,7 +135,9 @@ Private Sub Do_Validation(ws As Excel.Worksheet) ElseIf errorCount > 0 Then MsgBox "Validation complete. Errors: " & errorCount, vbInformation Else - RefreshCache(ws.CodeName) + If ws.CodeName <> "C1" Then + RefreshCache(ws.CodeName) + End If MsgBox "Validation complete. Errors: 0", vbInformation End If diff --git a/src/sheet/C1.cls b/src/sheet/C1.cls index 3388ee6..cedff26 100644 --- a/src/sheet/C1.cls +++ b/src/sheet/C1.cls @@ -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 @@ -136,7 +141,7 @@ Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 9 Then Dim cellI As Range For Each cellI In Target - Call CreateAddress2Dropdown(cellI.Row) + Call CreateAddress2Dropdown(cellI.Row) 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 diff --git a/通勤手当テンプレート.xlsm b/通勤手当テンプレート.xlsm new file mode 100644 index 0000000..a5b207f Binary files /dev/null and b/通勤手当テンプレート.xlsm differ diff --git a/通勤手当テンプレート_案.xlsm b/通勤手当テンプレート_案.xlsm deleted file mode 100644 index d112af3..0000000 Binary files a/通勤手当テンプレート_案.xlsm and /dev/null differ