วิธีสร้างและใช้แถบความคืบหน้าในงานนำเสนอ Microsoft PowerPoint

Microsoft PowerPoint เป็นเครื่องมือที่ทรงพลังที่เราทุกคนชอบใช้ ไม่มีโปรแกรมอื่นใดที่จะสมบูรณ์แบบเท่ากับการนำเสนองาน ตอนนี้ พวกเราบางคนชอบที่จะสร้างแถบความคืบหน้าสำหรับการนำเสนอ คำถามคือตอนนี้เป็นไปได้ไหม

วิธีสร้างและใช้แถบความคืบหน้าใน PowerPoint

คำตอบสำหรับคำถามนั้นคือใช่ดังก้อง ใครก็ตามที่มีข้อมูลที่ถูกต้องสามารถสร้างแถบความคืบหน้าได้อย่างง่ายดาย และคาดเดาอะไร เราจะลงรายละเอียดว่าต้องทำอย่างไร

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

นอกจากนี้ เมื่อใดก็ตามที่นำสไลด์ออก คุณจะต้องสร้างแถบความคืบหน้าขึ้นใหม่สำหรับสไลด์อื่นๆ ทั้งหมด เราไม่สามารถใส่ใจที่จะทำสิ่งนั้นได้ เลยตัดสินใจไปเส้นทางมาโคร ตามนี้เลย!

1. เปิดงานนำเสนอ PowerPoint ที่คุณต้องการ
2. เลือกมาโครและใส่ชื่อ
3. วางโค้ดในหน้าต่าง Microsoft Visual Basic for Applications (VBA)
4. ปิดและเรียกใช้ Macro

ให้เราพิจารณาเรื่องนี้เพิ่มเติมจากมุมมองแบบละเอียด

1] เปิดงานนำเสนอ PowerPoint ที่คุณต้องการ

ตกลง สิ่งแรกที่คุณต้องทำที่นี่คือเปิดงานนำเสนอ PowerPoint ที่คุณต้องการใช้งาน หากไม่เป็นเช่นนั้น คุณสามารถสร้างขึ้นมาใหม่ได้ตั้งแต่ต้นจนจบ

2] เลือกมาโครและใส่ชื่อ

เมื่อคุณเปิดเอกสารการนำเสนอของคุณแล้ว คุณต้องดำเนินการต่อและคลิกที่ ดู จากนั้น ให้เลือก มาโคร ตั้งอยู่ทางด้านขวา หน้าต่างเล็ก ๆ ควรปรากฏขึ้นทันทีหลังจากที่คุณคลิกที่ปุ่ม

ขั้นตอนต่อไปคือการพิมพ์ชื่อมาโคร เราได้เลือกที่จะเพิ่ม SlideBar แต่คุณสามารถใส่ชื่อใดก็ได้ที่เหมาะสมที่สุด เมื่อเสร็จแล้ว ให้กดปุ่มสร้างเพื่อจบส่วนนี้

3] วางโค้ดในหน้าต่าง Microsoft Visual Basic for Applications (VBA)

ตกลง ดังนั้นหลังจากกดปุ่มสร้าง หน้าต่างใหม่จะปรากฏขึ้น หน้าต่างนี้เรียกว่า Microsoft Visual Basic for Applications (VBA) และเป็นที่มาของเวทมนตร์

จากภายในตัวแก้ไข คุณจะเห็นสิ่งต่อไปนี้:

Sub ProgressBar()

End Sub

คลิกระหว่างสองบรรทัดของโค้ด และอย่าลืมคัดลอกและวางสิ่งต่อไปนี้ทันที:

On Error Resume Next
With ActivePresentation
For X = 1 To .Slides.Count
.Slides(X).Shapes("PB").Delete
Set s = .Slides(X).Shapes.AddShape(msoShapeRectangle, _
0, .PageSetup.SlideHeight - 12, _
X * .PageSetup.SlideWidth / .Slides.Count, 12)
s.Fill.ForeColor.RGB = RGB(127, 0, 0)
s.Name = "PB"
Next X:
End With

4] ปิดและเรียกใช้ Macro

หลังจากที่คุณทำงานด้านบนเสร็จแล้ว คุณต้องปิดหน้าต่าง VBA ทันที

เมื่อเสร็จแล้ว ให้คลิกที่แท็บ มุมมอง จากภายใน PowerPoint จากนั้นเลือก Macros

เลือกชื่อมาโคร แล้วปิดโดยเลือกเรียกใช้ แค่นี้ก็เรียบร้อย

อ่านเลย :วิธีสร้างแผนภูมิกรวยใน Excel, PowerPoint และ Word