Remove numeric check for I column

This commit is contained in:
updsv7
2026-04-13 15:57:51 +09:00
parent aab3708a22
commit 9343709420

View File

@@ -306,8 +306,8 @@ Sub validateDetailData(ByVal ws As Worksheet, ByVal rowNum As Long)
Exit Sub Exit Sub
End If End If
If Trim(ws.Cells(rowNum, 9).Value) = "" Or Not IsNumeric(ws.Cells(rowNum, 9).Value) Then If Trim(ws.Cells(rowNum, 9).Value) = "" Then
ws.Cells(rowNum, 17).Value = "I column is required and must be numeric" ws.Cells(rowNum, 17).Value = "I column is required"
Exit Sub Exit Sub
End If End If