Rename Z1_validateDetailData to Z1_validate, Z1_validateDetailDataButton to Z1_validateButton

src/thisWorkbook/Kotsu_master.bas

@@ -105,7 +105,7 @@ Sub Z1_ExportMasterDetailData()
     MsgBox "CSV export completed. Total data rows: " & rowCount, vbInformation
 End Sub
 
-Sub Z1_validateDetailData(ByVal ws As Worksheet, ByVal rowNum As Long)
+Sub Z1_validate(ByVal ws As Worksheet, ByVal rowNum As Long)
     Dim cValue As String
     cValue = Trim(ws.Cells(rowNum, 3).Value)
     
@@ -188,7 +188,7 @@ Sub Z1_validateDetailData(ByVal ws As Worksheet, ByVal rowNum As Long)
     ws.Cells(rowNum, 2).ClearContents
 End Sub
 
-Sub Z1_validateDetailDataButton()
+Sub Z1_validateButton()
     Dim ws As Worksheet
     Dim lastRow As Long
     Dim r As Long
@@ -204,7 +204,7 @@ Sub Z1_validateDetailDataButton()
     
     errorCount = 0
     For r = 7 To lastRow
-        Call Z1_validateDetailData(ws, r)
+        Call Z1_validate(ws, r)
         If Trim(ws.Cells(r, 2).Value) <> "" Then
             errorCount = errorCount + 1
         End If