VBA - 1004アドバンストフィルタを使用するとエラーが発生する

Question

以下のアドバンスフィルタを実行すると、1004エラーが発生します。

私は、なぜLRI変数が変数の値に相当する数値に置き換えられたときにスクリプトが正常に動作するかわからないのです。

私はLRI変数の設定方法を説明しました。どんな助けもありがとう。

With Sheets("SheetName") 
    LRI = .Range("A:A") _ 
     .Find(What:="*", _ 
     SearchOrder:=xlByRows, _ 
     SearchDirection:=xlPrevious).Row 
End With 

With Sheets("SheetName") 
     Range("A30:U62").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _ 
      .Range("Q1:Q" & LRI), Unique:=False 
End With 

Answer 1

私はスクリプトを実行しているときにLRI変数を設定していました。