The following code takes about 20 seconds to process,

Sheets("RecordOfRounds").Range("AllRecords"). _
AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("RecordOfRounds").Range("Fil terCriteria"), _
CopyToRange:=Sheets("HomeCourse").Range("FilterDes tination"), _
Unique:=False

Names are as follows:-
AllRecords
=OFFSET(RecordOfRounds!$A$52,0,0,COUNTA(RecordOfRo unds!$A$52:$A$65536),194)
FilterCriteria =RecordOfRounds!$A$1:$E$2
FilterDestination =OFFSET(HomeCourse!$A$52,0,0,1,194)


The following code processes almost instantaneously,

Sheets("RecordOfRoundsDetailed").Range("AllRecords Detailed"). _
AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("RecordOfRoundsDetailed").Ra nge("FilterCriteriaDetailed"),
_
CopyToRange:=Sheets("HomeDetailed").Range("FilterD estinationDetailed"),
_
Unique:=False

Names are as follows:-
AllRecordsDetailed
=OFFSET(RecordOfRoundsDetailed!$A$52,0,0,COUNTA(Re cordOfRoundsDetailed!$A$52:$A$65536),221)
FilterCriteriaDetailed =RecordOfRoundsDetailed!$A$1:$E$2
FilterDestinationDetailed =OFFSET(HomeDetailed!$A$52,0,0,1,221)

The data involved in both cases is almost the same - why should the first
case take so long?
Any help appreciated.
Sandy