在一张纸上构建表，其中包含来自多个纸张和不同列长度的数据

I need to build a table on one sheet by pulling data from 15 sheets (1 at a time). These sheets are separated by date. The date is in one cell. The other data "Name", "Shift", "Station", "Product", "Package", "Capacity" and "Performance" can have varying column lengths from sheet to sheet (as we move across the dates). On building the table I want to record the date on every row that matches the data taken from its sheet. I started with the code below by trying to select the first data cell of each data column and want to move down the column until there is a blank cell and select that portion to transfer it to the table. This is going to be a long code and I want get one thing right at a time, I will ask more questions as it develops. This is my first one-- How can I adjust the code to select the column to pick up information by selecting data until I get to a blank cell?I need to build a table on one sheet by pulling