正文

提取批注內(nèi)容的公式（如何提取批注內(nèi)容）

發(fā)布時(shí)間：2023-05-24 01:46:19 稿源：創(chuàng)意嶺閱讀： 61

大家好！今天讓創(chuàng)意嶺的小編來(lái)大家介紹下關(guān)于提取批注內(nèi)容的公式的問(wèn)題，以下是小編對(duì)此問(wèn)題的歸納整理，讓我們一起來(lái)看看吧。

開(kāi)始之前先推薦一個(gè)非常厲害的Ai人工智能工具，一鍵生成原創(chuàng)文章、方案、文案、工作計(jì)劃、工作報(bào)告、論文、代碼、作文、做題和對(duì)話答疑等等

只需要輸入關(guān)鍵詞，就能返回你想要的內(nèi)容，有小程序、在線網(wǎng)頁(yè)版、PC客戶端和批量生成器

問(wèn)友Ai官網(wǎng)：https://ai.de1919.com。

本文目錄:

excel的批注怎么導(dǎo)出
excel中如何提取特定批注的數(shù)值？
Excel 請(qǐng)問(wèn)有讀取批注的函數(shù)嗎
Excel批量提取批注與刪除批注
怎么用公式提取Excel的批注內(nèi)容？

提取批注內(nèi)容的公式（如何提取批注內(nèi)容）

excel的批注怎么導(dǎo)出

Alt+F11 ----插入---模塊　輸入如下內(nèi)容：

Function GetComment(rCell As Range)

Application.Volatile '將自定義函數(shù)標(biāo)記為易失性函數(shù)

Dim Cmt As String

On Error Resume Next

Cmt = rCell.Comment.Text

GetComment = Right(Cmt, Len(Cmt) - InStr(1, Cmt, ":", vbTextCompare))

On Error GoTo 0

End Function

關(guān)閉VBA編輯器，返回到Excel界面。假如要提取A1單元格中的批注，則在其他單元格中輸入公式：

=GetComment(A1)

excel中如何提取特定批注的數(shù)值？

'自定義公式-按ALT+F11-插入模塊-粘貼代碼-將表格另存為啟用宏的格式
Function 批注對(duì)應(yīng)值(a As Range, b As String)
For Each cel In a
If InStr(cel.Comment.Text, b) Then 批注對(duì)應(yīng)值 = cel.Value
Next
End Function

Excel 請(qǐng)問(wèn)有讀取批注的函數(shù)嗎

按alt＋f11打開(kāi)vba編輯界面，然后選擇插入模塊，接著在模塊中輸入如下代碼：Function提取批注（rgAsRange）Application．VolatileTrue提取批注＝rg．Comment．TextEndFunction，回到Excel界面輸入公式＝提取批注（A1），詳細(xì)步驟：

1、雙擊表格，如下圖所示：

2、打開(kāi)表格，如下圖所示：

3、看到批注內(nèi)容，如下圖所示：

4、按alt＋f11打開(kāi)vba編輯界面，然后選擇插入模塊，如下圖所示：

5、接著在模塊中輸入如下代碼：Function提取批注（rgAsRange）Application．VolatileTrue提取批注＝rg．Comment．TextEndFunction，如下圖所示：

6、回到Excel界面輸入公式＝提取批注（A1），如下圖所示：

7、然后確定即可得到批注內(nèi)容，下拉復(fù)制函數(shù)，如下圖所示：

8、最后保存文件，如下圖所示：

提取批注內(nèi)容的公式（如何提取批注內(nèi)容）

Excel批量提取批注與刪除批注

問(wèn)題情境

如下樣表：

A列很多項(xiàng)目都已批注的形式注明了完成情況，現(xiàn)需要將完成情況的批注內(nèi)容提取到B列備注中。

韓老師給大家講一種自定義函數(shù)提取批注的方法。

實(shí)現(xiàn)過(guò)程

1、<Alt+F11>，打開(kāi)VBA窗口，插入模塊：

2、在模塊中輸入以下代碼：

Function pz(rng As Range)

Application.Volatile

On Error GoTo err

pz = rng.Comment.Text

Exit Function

err:

pz = ""

End Function

即可實(shí)現(xiàn)自定義函數(shù)pz，可以提取批注。

3、保存為啟用宏的工作簿，在B2單元格輸入公式=pz(A2)，確定，公式向下填充，即可批量提取批注。

保存與使用過(guò)程如下動(dòng)圖：

批量刪除批注

如果大量數(shù)據(jù)中，存在不規(guī)律分布的批注，可用【查找】-【批注】功能定位到有批注的單元格，右鍵刪除批注。

如下動(dòng)圖：

怎么用公式提取Excel的批注內(nèi)容？

第1步: 按alt+f11鍵，可以打開(kāi)visual basic窗口，這里就是編寫(xiě)自定義函數(shù)的地方。打開(kāi)后執(zhí)行插入 - 模塊。模塊是存放代碼的具體位置
第2步：把下面的代碼粘到右邊的空白位置。
Function 提取批注(rg As Range) '定義函數(shù)名和參數(shù)
Application.Volatile True '定義該函數(shù)為易失性函數(shù)
提取批注 = rg.Comment.Text ’提取批注內(nèi)容
End Function ’結(jié)果語(yǔ)句
執(zhí)行以上兩步，自定義函數(shù)設(shè)置完成，然后在工作表中就可以象其他EXCEL內(nèi)置函數(shù)一樣使用自定義函數(shù)了。
=提取批注（D7）

以上就是關(guān)于提取批注內(nèi)容的公式相關(guān)問(wèn)題的回答。希望能幫到你，如有更多相關(guān)問(wèn)題，您也可以聯(lián)系我們的客服進(jìn)行咨詢，客服也會(huì)為您講解更多精彩的知識(shí)和內(nèi)容。