Поиск дат в заголовке ListObject — Excel VBA

Я пытаюсь создать динамическую таблицу, которая будет содержать данные за несколько часов. В первых нескольких столбцах будут указаны имена, проекты, роли и т. Д., А затем будут указаны даты (с интервалом в 1 неделю). Информация для этой таблицы будет автоматически заполнена с другого листа. У меня проблемы с функцией, которая:
1 — прочитать дату с другого листа
2 — посмотрите в строку заголовка таблицы, чтобы определить, существует ли дата. Условие должно выполнять код на основе следующих критериев:

Если дата существует, верните позицию столбца даты, чтобы строки можно было заполнить данными.

Если дата не существует, найдите позицию недели до и недели после и вставьте новый столбец с заголовком даты. Затем верните позицию столбца даты, чтобы строки можно было заполнить данными.

В моем коде до сих пор я пытался объявить дату ввода как вариант long, date и double, но мне не повезло. Я пробовал использовать функцию Application.Match, но мне не очень повезло. Я также попытался назначить массив с классом даты, чтобы заставить работать функцию сопоставления. У меня такое чувство, что я неправильно ссылаюсь на ListObject.

Пример рассматриваемого типа таблицы. Если, например, я искал 05/04/21, а столбец G не существовал, тогда функция должна иметь возможность распознать это и вставить столбец между 29/03/21 и 12/04/21.

У кого-нибудь есть советы?