Hi all
I'm trying to create a function to filter and search through a large table on another sheet, and then post out the results which match the criteria. I've got this, but keep getting a 424 error:
Sub AutoFilterBackoutput()
Dim LRO As Integer
With Worksheets("USD-Bonds")
Worksheets("USD-Bonds").Activate
Expression.AutoFilter(38, "LR Range", "==") = "0-2%"
.Range("$A$6:$AKL$2410").AutoFilter
.Range("$A6:$AL$6").AutoFilter field:=37, Criteria1:="0-2%"
Selection.Copy
Worksheets("Frontsheettempback").Activate
Range("A2").Select
ActiveSheet.Paste
End With
End Sub
What am I missing?
I'm trying to create a function to filter and search through a large table on another sheet, and then post out the results which match the criteria. I've got this, but keep getting a 424 error:
Sub AutoFilterBackoutput()
Dim LRO As Integer
With Worksheets("USD-Bonds")
Worksheets("USD-Bonds").Activate
Expression.AutoFilter(38, "LR Range", "==") = "0-2%"
.Range("$A$6:$AKL$2410").AutoFilter
.Range("$A6:$AL$6").AutoFilter field:=37, Criteria1:="0-2%"
Selection.Copy
Worksheets("Frontsheettempback").Activate
Range("A2").Select
ActiveSheet.Paste
End With
End Sub
What am I missing?