先随便选了一个格,记录一下宏
Range("B6").Select
Range("B6").AddComment
Range("B6").Comment.Visible = False
Range("B6").Comment.Text Text:="微软用户:" & Chr(10) & "LENIZ"
添加没有问题,隐藏也没有问题,文字的添加格式怪异,估计是执行函数,当然第一步 还是直接贴进去
看一下 能否编译通过,显示无法编译。 到网上搜索了一番,没有发现类似的问题,于是用各种写法试了
狂试,最终 样式的确就是函数 调用的方式
Range("B6").Comment.Text("微软用户:" & Chr(10) & "LENIZ")
白折腾了那么久。