Copy filtered data, not header

Ok, let's change the method of LR discovery. Is column A a good option? Is row 1 a good option for LC? It's always visible, right?

Option Explicit

Sub CopySpecial()
Dim LR As Long, LC As Long
Dim ws As Worksheet

For Each ws In Sheets(Array("FLR", "PLC", "KWT", "KRP", "SWS", "KTO"))
    With ws
        LR = .Range("A" & .Rows.Count).End(xlUp).Row
        LC = .Cells(1, .Columns.Count).End(xlToLeft).Column
        
        If LR > 1 Then
            .Range(.Cells(2, 1), .Cells(LR, LC)).SpecialCells(xlCellTypeVisible).Copy _
                Sheets("Log").Cells(Rows.Count, "A").End(xlUp).Offset(1)
        End If
    End With
Next ws

End Sub