當前位置:成語大全網 - 書法字典 - EXCEL VBA通過名稱查找匹配的內容並添加註釋。

EXCEL VBA通過名稱查找匹配的內容並添加註釋。

Sub?tst()

暗淡?cel1?作為?範圍,?cel2?作為?範圍,?cel3?作為?範圍

暗淡?我%

Sheet1。使活動

為了什麽?每個?cel1?在?工作表2。範圍(" a3:a16 ")

為了什麽?每個?cel2?在?Sheet1。範圍(" b2:b17 ")

如果?cel1。價值?=?cel2。價值?然後

cel2。偏移量(0,?7).價值?=?cel1。偏移量(0,?1)

cel2。偏移量(0,?7).AddComment.Text?Text:=cel1。偏移量(0,?2).價值

結束?如果

然後

然後

結束?潛水艇