Fix common module - change ByRef to ByVal

2026-04-13 18:53:49 +09:00
parent 789d652940
commit 5c739dfe55
1 changed files with 1 additions and 1 deletions
--- a/vba_code_common.bas
+++ b/vba_code_common.bas
@@ -21,7 +21,7 @@ Function CleanCSVField(ByVal field As Variant) As String
    CleanCSVField = result
 End Function

-Function ValidateCSVColumnCount(ByRef lines As Variant, ByVal expectedColumns As Long) As Boolean
+Function ValidateCSVColumnCount(ByVal lines As Variant, ByVal expectedColumns As Long) As Boolean
    ValidateCSVColumnCount = True
    
    Dim lineNum As Long