Mega Code Archive

 

Categories / VisualBasic Script / File Path

 

To create a table from cells A1

Sub table()     ActiveSheet.ListObjects.add(xlSrcRange, range("$A$1:$F$6"), , xlYes).name = "Table1" End Sub