update C1

src/module/Common_Functions.bas

@@ -319,3 +319,7 @@ Public Function FormatDateInput(ByVal inputStr As String) As String
         FormatDateInput = inputStr
     End If
 End Function
+
+Function ColNumToLetter(colNum As Long) As String
+    ColNumToLetter = Split(Cells(1, colNum).Address, "$")(1)
+End Function

src/module/Common_Global_Cache.bas

@@ -381,6 +381,24 @@ Private Sub RefreshSheetDict()
     Set sheetConfDict = CreateObject("Scripting.Dictionary")
     Dim sheetConf As Object
 
+    ' C1
+    Set sheetConf = CreateObject("Scripting.Dictionary")
+    
+    sheetConf("StartCol") = "C"
+    sheetConf("EndCol") = "BC"
+    sheetConf("ErrorCol") = "BD"
+    sheetConf("StartRow") = 8
+    sheetConf("HeaderRow") = 6
+    sheetConf("RefreshCacheName") = ""
+    sheetConf("CSV_Encoding") = "shift_jis"
+    sheetConf("HasHeader") = True
+    sheetConf("ExpectedColumnCount") = 54
+    sheetConf("HeaderColumns") = Array("C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N")
+    sheetConf("AlwaysQuote") = False
+    sheetConf("FilterRow") = 7
+
+    Set sheetConfDict("C1") = sheetConf
+
     ' M1
     Set sheetConf = CreateObject("Scripting.Dictionary")
     
@@ -495,15 +513,15 @@ Private Sub RefreshSheetDict()
     sheetConf("StartCol") = "C"
     sheetConf("EndCol") = "F"
     sheetConf("ErrorCol") = ""
-    sheetConf("StartRow") = 7
+    sheetConf("StartRow") = 6
     sheetConf("HeaderRow") = ""
     sheetConf("RefreshCacheName") = "RefreshO1Cache"
     sheetConf("CSV_Encoding") = "utf-8"
     sheetConf("HasHeader") = False
-    sheetConf("ExpectedColumnCount") = 7
-    sheetConf("HeaderColumns") = Array("C", "D", "E", "F", "G", "H", "I")
+    sheetConf("ExpectedColumnCount") = 4
+    sheetConf("HeaderColumns") = Array()
     sheetConf("AlwaysQuote") = True
-    sheetConf("FilterRow") = 6
+    sheetConf("FilterRow") = 5
 
     Set sheetConfDict("O1") = sheetConf
 
@@ -513,15 +531,15 @@ Private Sub RefreshSheetDict()
     sheetConf("StartCol") = "C"
     sheetConf("EndCol") = "O"
     sheetConf("ErrorCol") = ""
-    sheetConf("StartRow") = 7
+    sheetConf("StartRow") = 6
     sheetConf("HeaderRow") = ""
     sheetConf("RefreshCacheName") = "RefreshO2Cache"
     sheetConf("CSV_Encoding") = "utf-8"
     sheetConf("HasHeader") = False
-    sheetConf("ExpectedColumnCount") = 7
-    sheetConf("HeaderColumns") = Array("C", "D", "E", "F", "G", "H", "I")
+    sheetConf("ExpectedColumnCount") = 13
+    sheetConf("HeaderColumns") = Array()
     sheetConf("AlwaysQuote") = True
-    sheetConf("FilterRow") = 6
+    sheetConf("FilterRow") = 5
 
     Set sheetConfDict("O2") = sheetConf
 End Sub