返回列表 上一主題 發帖

[發問] (已解決)註解的位置有辦法快速移回相對應的儲存格嗎

  1. Sub Macro1()
  2. For Each c In Cells.SpecialCells(xlCellTypeComments)
  3. c.Comment.Shape.Placement = 1
  4.          c.Comment.Shape.Top = c.Top
  5.          c.Comment.Shape.TextFrame.AutoSize = True
  6.     Next
  7. End Sub
複製代碼

TOP

        靜思自在 : 滴水成河。粒米成蘿,勿輕己靈,勿以善小而不為。
返回列表 上一主題