欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: excel自動將后兩位數(shù)加粗并設(shè)為黑體 [打印本頁]

作者: xiongda 時間: 2015-5-27 01:11
標題: excel自動將后兩位數(shù)加粗并設(shè)為黑體
自動將后兩位數(shù)加粗并設(shè)為黑體（QZ原創(chuàng)，記錄用）

代碼如下：
Sub Qz1()
With ActiveCell.Characters(Start:=1, Length:=11).Font
      .Name = "宋體"
      .FontStyle = "常規(guī)"
      .Size = 20
      .Strikethrough = False
      .Superscript = False
      .Subscript = False
      .OutlineFont = False
      .Shadow = False
      .Underline = xlUnderlineStyleNone
      .ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=12, Length:=2).Font
      .Name = "黑體"
      .FontStyle = "加粗"
      .Size = 20
      .Strikethrough = False
      .Superscript = False
      .Subscript = False
      .OutlineFont = False
      .Shadow = False
      .Underline = xlUnderlineStyleNone
      .ColorIndex = xlAutomatic
End With
End Sub

歡迎光臨 (http://m.raoushi.com/bbs/)