माइक्रोसॉफ्ट पावरपॉइंट एक शक्तिशाली उपकरण है जिसका हम सभी उपयोग करना पसंद करते हैं। कोई अन्य कार्यक्रम नहीं है जो प्रस्तुतियों को वितरित करने के लिए उतना पूर्ण हो। अब, हम में से कुछ प्रस्तुतियों के लिए प्रगति पट्टी बनाने में सक्षम होना पसंद करेंगे। सवाल यह है कि क्या यह अभी संभव है?
PowerPoint में प्रोग्रेस बार कैसे बनाएं और उपयोग करें
उस प्रश्न का उत्तर एक शानदार हां है। सही जानकारी वाला कोई भी व्यक्ति आसानी से एक प्रगति पट्टी बना सकता है, और क्या अनुमान लगा सकता है? हम विस्तार से बताएंगे कि इसे कैसे किया जाए।
अब, प्रत्येक स्लाइड के नीचे संबंधित आकृति को स्थापित करके प्रगति पट्टी को मैन्युअल रूप से स्थापित करना संभव है। हालाँकि, यह तालिका में अतिरिक्त समस्याएं लाता है। आप देखिए, प्रयोक्ताओं को प्रत्येक आकृति की लंबाई मापनी चाहिए जो प्रस्तुति दस्तावेज़ में स्लाइडों की संख्या पर आधारित होती है।
साथ ही, जब भी कोई स्लाइड हटाई जाती है, तो आपको अन्य सभी स्लाइडों के लिए प्रगति पट्टी को फिर से बनाना होगा। हमें इस तरह की चीजें करने से परेशान नहीं किया जा सकता है; इसलिए, हमने मैक्रो रूट पर जाने का फैसला किया है। यहां बताया गया है!
- अपना पसंदीदा पावरपॉइंट प्रेजेंटेशन खोलें
- मैक्रोज़ चुनें और एक नाम डालें
- एप्लिकेशन के लिए Microsoft Visual Basic (VBA) विंडो में कोड पेस्ट करें
- मैक्रो बंद करें और चलाएं
आइए इसे विस्तृत परिप्रेक्ष्य में देखें।
1] अपनी पसंदीदा PowerPoint प्रस्तुति खोलें
ठीक है, तो यहां आपको सबसे पहले जो करना होगा वह है उस PowerPoint प्रस्तुति को खोलना जिसके साथ आप काम करना चाहते हैं। यदि नहीं, तो आप शुरुआत से एक बना सकते हैं और फिर अपने तरीके से काम कर सकते हैं।
2] मैक्रो चुनें और एक नाम डालें
एक बार जब आप अपना प्रस्तुतिकरण दस्तावेज़ खोल लेते हैं, तो अब आपको आगे बढ़ना होगा और देखें . पर क्लिक करना होगा , और वहां से, मैक्रोज़ . का चयन करना सुनिश्चित करें दाईं ओर स्थित है। आपके द्वारा बटन पर क्लिक करने के तुरंत बाद एक छोटी सी विंडो दिखाई देनी चाहिए।
अगला कदम, मैक्रो नाम टाइप करना है। हमने स्लाइडबार को जोड़ने का विकल्प चुना है, लेकिन आप जो भी नाम सबसे उपयुक्त हैं, उसे शामिल करने के लिए आप स्वतंत्र हैं। एक बार ऐसा करने के बाद, इस अनुभाग को पूरा करने के लिए बनाएं बटन दबाएं।
3] Microsoft Visual Basic for Applications (VBA) विंडो में कोड पेस्ट करें
ठीक है, तो Create बटन को हिट करने के बाद, एक नई विंडो दिखाई देगी। इस विंडो को अनुप्रयोगों के लिए माइक्रोसॉफ्ट विजुअल बेसिक (वीबीए) कहा जाता है, और यह वह जगह है जहां जादू होता है।
संपादक के भीतर से, आपको निम्नलिखित देखना चाहिए:
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] मैक्रो बंद करें और चलाएं
उपरोक्त कार्य को पूरा करने के बाद, अब आपको VBA विंडो को तुरंत बंद कर देना चाहिए।
एक बार यह हो जाने के बाद, PowerPoint के भीतर से देखें टैब पर क्लिक करें, फिर मैक्रोज़ चुनें।
मैक्रो का नाम चुनें, और रन का चयन करके समाप्त करें, और बस हो गया।
अब पढ़ें :एक्सेल, पॉवरपॉइंट और वर्ड में फ़नल चार्ट कैसे बनाएं।