Outlook VBA ignoring filter and deleting all appointments in shared calendar

Question

I have a piece of code that is supposed to find all appointments in a shared calendar between two dates and delete them. However, it ignores the filter and deletes all appointme