作者：乔山办公网日期：
返回目录：excel表格制作
简单的说就用AddComment
但是好像修改的时候要把Comment.Visible = True
可视才可以修改
你有没范表啊
说个示例看看
循环要添加批注的单元格，然后用AddComment 方法添加批注。代码格式如下：
单元格.AddComment "添加批注的文本"
用VBA实现起来不难,但问题是sheet2里放几千个批注,实在是没效率,还不如用vlookup函数,从sheet1里查找相关的值,然后另插zd一列写个公专式,如果扣款值不为零就显示迟到扣款,以后也可扩展为多种扣款原因的综合显示,不用看时就隐藏就好.
批注要查看时还得属一个个去悬停鼠标,而且想打印扣款原因项给领导或员工都不太现实.
感觉zhidao有个空格被偷吃了，是不是这行报错：专
Range("A" &i).AddCommentCStr(Range("K" &i).Value)
下面这属样修改试试看：
Range("A" &i).AddComment CStr(Range("K" &i).Value)