Excel批注中显示公式

在Excel表格中，如果需要对含有公式的单元格进行标注，可以使用批注功能。批注可以包含单元格的公式等信息。手动添加批注费时费力且容易出错，但是通过使用VBA程序可以简单快捷地实现。

使用VBA程序添加批注

以下是使用VBA程序来为含有公式的单元格添加批注的步骤：

1. 打开Excel表格，并按下【Alt F11】组合键打开VBA编辑器。
2. 在VBA编辑器上方点击【插入】，然后选择【模块】。
3. 在模块的代码框中输入以下VBA程序代码，并按下【F5】键运行程序。

Sub addco()
    Dim str1, str2, mycell
    On Error Resume Next  '忽略运行过程中可能出现的错误
    Set mysheet1  ("Sheet1")  '定义工作表
    Set myrange  mysheet1.Range("A2:F1000")  '定义单元格区域A2:F1000
    For Each mycell In myrange  '对单元格区域里面的每一单元格执行一次
        If mycell <> "" Then  '如果单元格不是空白，则
            str1    '获取单元格里面的字符
            str2  Left(str1, 1)  '在获取的公式里边截取左侧的一个字符
            If str2  "" Then  '如果获取的字符含有（公式），则
                 Text:str1  '单元格添加批注，批注的内容为单元格的公式
            End If
        End If
    Next
End Sub

以上程序代码解读：

1. For Each ... In...函数用于对某一范围内的元素进行循环操作。在此程序中，mycell是myrange范围内的一个元素，也就是一个变量。

2. Left函数用于从字符串的左侧开始截取指定数量的字符。如果截取的字符中不包含""，则说明单元格不是公式计算，无需添加批注。

查看添加的批注

回到Excel工作表界面后，含有公式的单元格旁边会自动添加批注，并显示单元格的公式。

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。