Offset and ShowAllData

[fantasylo]

Dear all

I have the following VBA

Please Login or Register  to view this content.

I have 2 questions.

1) I would like to maintain 2 rows gap between the 2 tables. However, the offset function will delete 1 row. Is there any workaround besides adding a row?

2) Is it possible to ShowAllData after .Offset(1).EntireRow.Delete instead of putting .AutoFilter x2?

Attached below is the excel.

Thanks and appreciate any help.

[PCI]

For question 1

Please Login or Register  to view this content.

[PCI]

And why not

Please Login or Register  to view this content.

[zzzeddy]

Hi fantasylo

..maybe you should look at using SUBTOTAL

see attached example

(you could hide the 'helper' columns)

zeddy

[fantasylo]

Thank you PCI and zzzeddy!

[PCI]

You're welcome and thx for the Rep.