With hfg1
'设置行号
For intI = 1 To .Rows - 1
.ColWidth(0) = 400
.TextMatrix(intI, 0) = intI
Next
'设置列号
For intI = 1 To .Cols - 1
.ColAlignmentFixed(intI) = 4
.ColAlignment(intI) = 4
.TextMatrix(0, intI) = intI
Next
End With
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请
点击举报。