Fix - use Rows().Select for entire row

2026-04-13 19:58:51 +09:00
parent 468cabde69
commit cfbbcb1ce7
1 changed files with 1 additions and 1 deletions
--- a/vba_code_common.bas
+++ b/vba_code_common.bas
@@ -178,7 +178,7 @@ Sub ToggleAutoFilter(Optional ByVal filterRow As Long = 6)
        ws.AutoFilterMode = False
    Else
        If filterRow >= 1 Then
-            ws.Range(ws.Cells(filterRow, 1), ws.Cells(filterRow, 20)).Select
+            ws.Rows(filterRow).Select
            ws.Range("A" & filterRow).AutoFilter
        End If
    End If