命令默认的,改不了。表格创建好了之后,一个一个用手改或者用宏。 代码如下: Sub catmain() Set Tb = CATIA.ActiveDocument.Selection.Item(1).Value For i = 3 To Tb.NumberOfRows For j = 2 To Tb.NumberOfColumns S = Tb.GetCellString(i, j) S = Format(S, "0") Tb.SetCellString i, j, S Next Next End Sub