关闭

word 宏 加粗

标签: word
1124人阅读 评论(0) 收藏 举报
分类:

word 宏加粗


Sub table自动()
'
' table自动 宏
For i = 1 To ActiveDocument.Tables.Count


    ActiveDocument.Tables(i).Style = "comac"
      ActiveDocument.Tables(i).Rows(1).Cells(1).Range.Font.Bold = True
      ActiveDocument.Tables(i).Rows(1).Cells(2).Range.Font.Bold = True
Next




End Sub

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:255722次
    • 积分:3662
    • 等级:
    • 排名:第9406名
    • 原创:94篇
    • 转载:53篇
    • 译文:2篇
    • 评论:24条
    最新评论