วิธีส่งออกความคิดเห็นใน Excel ไปยัง Word Doc
เวิร์กบุ๊ก Excel อาจมีข้อคิดเห็นจำนวนมากจากบรรณาธิการที่แตกต่างกัน ความคิดเห็นเหล่านี้ยังคงมีความเกี่ยวข้องมากที่สุดเมื่อแนบกับเซลล์ที่เกี่ยวข้อง แต่พวกเขายังสามารถสร้างเรื่องราวของตนเองขึ้นมาได้ ตัวอย่างเช่นหากคุณและผู้ร่วมงานแก้ไขแผ่นงานฉายภาพด้วยกันความคิดเห็นของแผ่นงานจะติดตามการสนทนาของคุณเกี่ยวกับสูตรของแผ่นงาน วิธีหนึ่งในการแยกความคิดเห็นเหล่านี้คือการเขียนแมโคร Visual Basic ที่ส่งไปยังเอกสาร Word
1
เปิดสมุดงาน Excel จากนั้นกด "Alt-F11" เพื่อเปิดตัวแก้ไข Visual Basic ของ Excel
2
คลิกสองครั้งที่โมดูล "NewMacros" ในโฟลเดอร์โมดูลของหน้าต่างโครงการถ้า Word ไม่เปิดขึ้นโดยอัตโนมัติ
3
พิมพ์ต่อไปนี้เพื่อเปิดแมโครใหม่:
mcrComment ย่อย ()
4
พิมพ์ต่อไปนี้เพื่อประกาศตัวแปรของแมโคร:
ติม excelComment เป็นความคิดเห็นติ่ม wordProgram เป็นวัตถุ
5
พิมพ์ต่อไปนี้เพื่อสร้างเอกสาร Word:
ตั้ง wordProgram = CreateObject ("Word.Application")
6
พิมพ์ข้อความต่อไปนี้เพื่อเปิดลูปที่ทำหน้าที่กับวัตถุ Word:
ด้วยโปรแกรม word
7
พิมพ์ข้อความต่อไปนี้เพื่อเปิดและเลือกเอกสาร Word:
.Visible = True .Documents.Add DocumentType: = 0
8
พิมพ์ต่อไปนี้เพื่อเปิดลูปที่ทำหน้าที่ในแต่ละความคิดเห็น:
สำหรับแต่ละ excelComment ใน ActiveSheet.Comments
9
พิมพ์ข้อความต่อไปนี้เพื่อพิมพ์ผู้เขียนความคิดเห็นและที่อยู่ของเซลล์แต่ละรายการลงในเอกสาร Word:
.Selection.TypeText excelComment.Parent.Address & vbTab & excelComment.Text
10
พิมพ์ต่อไปนี้เพื่อพิมพ์แต่ละข้อคิดเห็นไปยังเอกสาร Word:
.Selection.TypeParagraph
11
พิมพ์ต่อไปนี้เพื่อปิดการวนรอบ For-Next:
ต่อไป
12
พิมพ์ข้อความต่อไปนี้เพื่อปิด With loop:
จบด้วย
13
พิมพ์ต่อไปนี้เพื่อปิดแมโคร:
ส่วนท้าย
14
กด "F5" เพื่อเรียกใช้แมโครและส่งออกความคิดเห็นไปยังเอกสาร Word