Delete Rows That Contain Data From User Defined Dynamic List Within Workbook

I have a financial dataset which I need to "clean" before manipulating/analysing.

Each row of the data represents a completed transaction and the first step is to delete rows that are done with particular (internal) clients; the client data (the client's name) is in Column D.

Currently, I delete the unwanted data by autofilter and delete (code below), however this means the clients to be deleted are only defined within the code. I would prefer to have a worksheet within the workbook where the user defines the clients by adding or subtracting their name from a list.

I have created a dynamic range for the client list by inserting a Named variable along the lines of "=OFFSET(!$B$3,1,0,COUNTA($B$3:$B$200)-1," which works fine.

However how do I work this list into my code so that it works when new clients are added or deleted?

Current code for deleting unwanted client data:

Sub filterdelete()

Dim LastRow As Long
LastRow = ActiveSheet.UsedRange.Rows.Count

With Range(Range("D1"), Range("D" & LastRow))

[Code] .....