返回列表 上一主題 發帖

copy註解格式的語法 ??

回復 5# t8899

註解物件無法以複製/選擇性貼上格式
但可以取得文字的格式然後到目標區設定格式
  1. Sub ex()
  2. With Range("H1").Comment.Shape
  3.    With .TextFrame.Characters.Font
  4.    MsgBox .FontStyle  '字體粗斜
  5.    MsgBox .ColorIndex  '文字顏色
  6.    MsgBox .Name  '字型
  7.    MsgBox .Size  '文字大小
  8.    End With
  9. End With
  10. End Sub
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言,就如鑽石般珍貴;但對愚人來說,卻像是一把泥土,一點價值也沒有。
返回列表 上一主題