Excel VBA 的自動化抓取並重新排列的功能疑問？

請問各位前輩

如果我有一份 "重新排列.xlsm" 檔，希望可以自 "5666.csv" 檔擷取資料

"5666.csv" 檔內的資料排列方式是，每日會在2列新插入一列新的數值，範圍從 B2:BB2，然後B1是插入的日期

希望轉到 "重新排列.xlsm" 後，

數值放入 A2:J2 (10格)，然後 A4:J4 (10格)，然後 A6:J6 (10格)，然後 A8:J8 (10格).... 依此類推

但是要能夠判斷 B1 是否等於今日的日期，若否，所有的數值希望能夠出現"ERROR"

像這樣的功能，要如何去實現阿？