This commit is contained in:
updsv7
2026-04-23 11:14:41 +09:00
parent 710845ff55
commit c6d53813e3
20 changed files with 292 additions and 217 deletions

View File

@@ -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