Kode VBA untuk menambahkan kolom baru di tabel
Dim Table As ListObject
Set Table = Sheet1.ListObjects("Table1")
Table.ListColumns.Add 2
Table.HeaderRowRange(2) = "New header"
ThevarRaj