Пакетное копирование и перенос нескольких файлов CVS в один сводный лист Excel

Всем привет,

Это мой первый вопрос на этом форуме, потому что я столкнулся с настоящей головной болью.

Я пытаюсь адаптировать код VB, опубликованный на https://www.extendoffice.com/documents/excel/3388-excel-import-multiple-text-csv-xml-files.html#a2 для импорта нескольких файлов CVS из одного каталога и размещения их на одном рабочем листе Excel.

Все исходные файлы находятся в одной папке.
В исходных файлах есть 3 столбца данных, но нужно импортировать только 1 столбец,
Импортированные данные должны быть транспонированы и помещены в следующую пустую строку на целевом рабочем листе.

Мой измененный код настолько запутан, что я даже не хочу вставлять его сюда, но вы можете найти два примера входных файлов CVS и желаемый выходной файл XLSX.

Спасибо за любую помощь заранее.