ShowAllData Method Returns Error

Thanks Holger,

The problem was here:

  If .AutoFilterMode Then
                .ShowAllData
                .AutoFilterMode = False

Should be:

  If .FilterMode Then
                .ShowAllData

Since I am using advanced filter.

Thanks for your help
Kind regards,
w