1、全部靠左:
For Each c As col In Tables("表A").Cols c.TextAlign = TextAlignEnum.LeftNext
2、千分位:
For Each c As Col In Tables("表A").Cols If c.DataCol.IsNumeric Then c.DataCol.SetFormat("#,##0.00") End IfNext
3、格式符号设置为:#,##0.00