VBA to distribute data in column into columns and rows

I have a spreadsheet attached that contains data in column A (sheet "Column"). I would like to know if I can use VBA fill the data into a table that is five columns wide to make it look like (sheet "Distributed'). The quantity of items in column A will vary so the number of rows on the "Distributed" sheet will also vary. Eventually this table will be copied into a Word document.