วิธีแสดงความคิดเห็นทั้งหมดในแผ่นงานหรือสมุดงานใหม่ใน Excel

หากคุณมีสมุดงานที่มีความคิดเห็นมากเกินไปและคุณต้องการแสดงความคิดเห็นทั้งหมดในแผ่นงานใหม่หรือสมุดงานเพื่อตรวจสอบความคิดเห็นทั้งหมดคุณจะทำอย่างไร? วิธีการต่อไปนี้สามารถช่วยให้คุณแสดงความคิดเห็นทั้งหมดของแผ่นงาน / สมุดงานไปยังแผ่นงานหรือสมุดงานใหม่ใน Excel ได้อย่างรวดเร็ว

แสดงความคิดเห็นทั้งหมดในแผ่นงานใหม่ด้วยรหัส VBA

แสดงความคิดเห็นทั้งหมดในแผ่นงานหรือสมุดงานใหม่ด้วย Kutools for Excel

แสดงความคิดเห็นทั้งหมดในแผ่นงานใหม่ด้วยรหัส VBA

รหัส VBA ต่อไปนี้จะแสดงรายการข้อคิดเห็นทั้งหมดในแผ่นงานใหม่ในสมุดงานปัจจุบัน ในแผ่นงานใหม่จะแสดงรายการข้อคิดเห็นทั้งหมดของสมุดงานทั้งหมดในรายการที่มีชื่อแผ่นงานที่อยู่เซลล์เนื้อหาความคิดเห็นและชื่อเซลล์ โปรดใช้วิธีการดังต่อไปนี้:

1. คลิก ผู้พัฒนา > ของ Visual Basicจะแสดงไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง. แล้วคลิก สิ่งที่ใส่เข้าไป > โมดูลแล้วป้อนรหัส VBA ต่อไปนี้ในโมดูล

VBA: แสดงความคิดเห็นทั้งหมดในแผ่นงานใหม่

Sub ShowCommentsAllSheets()
'Update 20140508
Dim commrange As Range
Dim rng As Range
Dim ws As Worksheet
Dim newWs As Worksheet
Set newWs = Application.Worksheets.Add
newWs.Range("A1").Resize(1, 4).Value = Array("Sheet", "Address", "Value", "Comment")
Application.ScreenUpdating = False
On Error Resume Next
For Each ws In Application.ActiveWorkbook.Worksheets
    Set commrange = ws.Cells.SpecialCells(xlCellTypeComments)
    If Not commrange Is Nothing Then
        i = newWs.Cells(Rows.Count, 1).End(xlUp).Row
        For Each rng In commrange
            i = i + 1
            newWs.Cells(i, 1).Resize(1, 4).Value = Array(ws.Name, rng.Address, rng.Value, rng.Comment.Text)
        Next
    End If
    Set commrange = Nothing
Next
newWs.Cells.WrapText = False
Application.ScreenUpdating = True
End Sub

2. จากนั้นคลิก  เพื่อเรียกใช้รหัสและคุณจะได้รับแผ่นงานใหม่พร้อมความคิดเห็นทั้งหมดในสมุดงานปัจจุบัน ดูภาพหน้าจอ:

แสดงความคิดเห็นทั้งหมดในแผ่นงานหรือสมุดงานใหม่ได้ด้วยคลิกเดียว

กับ สร้างรายการความคิดเห็น of Kutools สำหรับ Excelคุณสามารถแสดงความคิดเห็นทั้งหมดในแผ่นงานใหม่หรือสมุดงานใหม่ได้อย่างรวดเร็ว

Kutools สำหรับ Excel: ด้วย Add-in ของ Excel ที่มีประโยชน์มากกว่า 300 รายการให้ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน Get it Now.

1. ถ้าคุณติดตั้ง Kutools for Excel แล้วให้คลิก Kutools > เพิ่มเติม > สร้างรายการความคิดเห็น

2. ใน สร้างรายการความคิดเห็น กล่องโต้ตอบ:

• เลือกขอบเขตที่คุณต้องการแสดงความคิดเห็นคุณสามารถเลือกได้ แผ่นงานที่ใช้งานอยู่ or แผ่นงานทั้งหมด.
• จากนั้นระบุตำแหน่งที่คุณต้องการใส่รายการความคิดเห็นคุณสามารถแสดงความคิดเห็นในสมุดงานใหม่หรือแผ่นงานใหม่ดูภาพหน้าจอ:

3. จากนั้นคลิก สร้างบัญชีตัวแทนปุ่ม. แผ่นงานใหม่จะถูกเพิ่มเพื่อแสดงรายการข้อคิดเห็นของแผ่นงานที่ใช้งานอยู่ทั้งหมดพร้อมด้วยคุณลักษณะเช่นชื่อแผ่นงานการอ้างอิงเซลล์แถวและคอลัมน์ ดูภาพหน้าจอ:

สำหรับข้อมูลเพิ่มเติมเกี่ยวกับ สร้างรายการความคิดเห็นกรุณาเยี่ยมชม สร้างคำอธิบายคุณลักษณะรายการความคิดเห็น.

บทความที่เกี่ยวข้อง:

• เปลี่ยนรูปแบบความคิดเห็นทั้งหมดในเซลล์
• เปลี่ยนชื่อผู้เขียนความคิดเห็นทั้งหมด
• ค้นหาและแทนที่ข้อความภายในความคิดเห็น
• แสดงหรือซ่อนข้อคิดเห็นและตัวบ่งชี้ข้อคิดเห็นทั้งหมดใน Excel
• แปลงเนื้อหาของเซลล์เป็นข้อคิดเห็นใน Excel
• แปลงความคิดเห็นเป็นเนื้อหาของเซลล์ใน Excel