Игнорировать скрытые строки в электронной таблице после применения автофильтра

Question

Я пытаюсь найти код, который будет игнорировать скрытые строки в электронной таблице, которая используется для автоматического заполнения PDF-форм после того, как пользователь отфильтрует данные.Я не хочу удалять скрытые строки или информацию, которую пользователь ввел в скрытые строки.

Я нашел несколько работающих кодов, однако я не могу их протестировать должным образом, так как не уверен, что я "добавив указанный код в правильную часть кода.Мне посоветовали использовать .SpecialCells (xlCellTypeVisible), как показано ниже, но я не получил никакой обратной связи относительно того, где вставить этот код и почему.

Sub TableFilt()
Dim PayorName As String
Dim LastRow As Long
With Sheet1
 LastRow = .Range("A99999").End(xlUp).Row
 If LastRow < 12 Then LastRow = 12
 If .Range("A11").Value = "Enter Payor Name to Filter" Then PayorName = 
 Empty Else: PayorName = .Range("A11").Value
 .Range("A12:DS" & LastRow).Select
 Selection.AutoFilter
   With .Range("A12:DS" & LastRow)
     If PayorName <> Empty Then .AutoFilter Field:=1, Criteria1:="=*" & 
   PayorName & "*"
  End With
.Range("12:12").EntireRow.Hidden = True
End With
End Sub

Я бы хотел, чтобы пользователь имелвозможность создавать PDF после использования автофильтра, не беспокоясь о том, что скрытые строки будут удалены или информация будет стерта после создания необходимых PDF-файлов и очистки их фильтра.Может кто-нибудь, пожалуйста, посоветуйте?Спасибо!