请教用vb添加excel单元格的批注，怎么写？（再线等待）

例如，xlSheet.Cells(3, 9).value=""
是赋值，
那么批注怎么写呢？  多谢

解决方案 »

  1.   


    假设excelapp为你的引用对象！    Worksheets(0).Range("D11").AddComment
        Worksheets(0).Range("D11").Comment.Visible = True
        Worksheets(0).Range("D11").Comment.Text Text:="12131313123"
        Worksheets(0).Range("D11").Comment.Visible = False
      

  2.   

    xlSheet.Cells(3, 9).AddComment "kkk"
      

  3.   

    怎么样改变批注的字体，就是
    xlSheet.Cells(3, 9).AddComment "kkk"，其中kkk的自体，大小，颜色
    多谢
      

  4.   

    差点被你难倒，呵呵
    xlSheet.Cells(3, 9).Comment.Shape.TextFrame.Characters.Font.Size=36
      

  5.   

    要改字体颜色可以用
    Range.Comment.Shape.TextFrame.Characters.Font.Color