2008-09-24 15 views
16

में ऑब्जेक्ट का नाम बदलना शायद एक बहुत ही बेवकूफ सवाल है लेकिन मैं यह नहीं समझ सकता कि PowerPoint में किसी ऑब्जेक्ट का नाम कैसे बदलें .. उदाहरण के लिए, मेरे सभी ग्राफ डिफ़ॉल्ट रूप से "ग्राफ 1" आदि कहा जाता है। क्या कोई उस पर मेरी सहायता कर सकता है ? धन्यवाद!PowerPoint

+1

की संभावित डुप्लिकेट [कोई PowerPoint स्लाइड के भीतर एक वस्तु का नाम कैसे?] (Http://stackoverflow.com/questions/3074209/how-to-name-an-object-within-a-powerpoint- स्लाइड) – alextansc

उत्तर

33

पावरपॉइंट 2007 में आप इसे चयन फलक से कर सकते हैं।

चयन फलक दिखाने के लिए, रिबन में होम टैब पर क्लिक करें, फिर नीचे व्यवस्थित करें और फिर 'चयन फलक ...' पर क्लिक करें। चयन फलक दाईं ओर खुल जाएगा। (या CTRL + F10 दबाएं)

किसी ऑब्जेक्ट का नाम बदलने के लिए, पहले ऑब्जेक्ट का चयन करें और फिर चयन फलक में ऑब्जेक्ट नाम पर डबल क्लिक करें और आप नया ऑब्जेक्ट नाम टाइप कर पाएंगे।

+0

दुर्भाग्य से मेरे पास PowerPoint 2003 है ... –

+0

उम, पीपी 2003 नहीं है। क्षमा करें। –

+0

यह मेरे जीवन को बचाया। इतना नरक क्यों है। +10 एनिमेशन के साथ खेलते समय और उन्हें सभी कहा जाता है: group1, group2 आदि एमएस को यहां कदम उठाने की आवश्यकता है। – Syska

0

आपकी मदद के लिए धन्यवाद, लेकिन वास्तव में मैं सिर्फ VBA का उपयोग कर इसे कर रहा हूँ ...

ActiveWindow.Selection.ShapeRange(1).Name = "newname" 

चीयर्स

1

(इस उत्तर मान लिया गया है आप केवल विकास के दौरान और अधिक सार्थक नाम निर्धारित कर रहे हैं, तो अपने अन्य कोड कि वस्तुओं का संदर्भ अधिक पठनीय हो सकता है)।

नीचे दिए गए कोड को उप में रखें, फिर इसे स्लाइड में प्रश्न से चलाएं। प्रत्येक आकार को बदले में चुना जाएगा, ताकि आप देख सकें कि किस आकार का संदर्भ दिया जा रहा है। एक इनपुट बॉक्स आपको वर्तमान नाम बताएगा और आपको एक नए नाम के लिए पूछेगा। यदि आप शून्य-लंबाई इनपुट को रद्द या ठीक करते हैं, तो पुराना नाम जगह पर रहेगा। इस कोड में कोई नाम प्रविष्टि सत्यापन नहीं है, इसलिए सुनिश्चित करें कि आप केवल वैध नाम टाइप करें। इसे एक बार चलाने के बाद, आप यह जांचने के लिए फिर से चला सकते हैं कि आपके द्वारा पहले दौर में टाइप किए गए नाम आपके द्वारा लक्षित ऑब्जेक्ट पर लागू किए गए थे।

लूप वर्तमान स्लाइड पर सभी ऑब्जेक्ट्स को कवर करेगा, इसलिए यदि आप एकाधिक स्लाइड्स को संसाधित करना चाहते हैं, तो आपको प्रत्येक स्लाइड पर इसे अलग से चलाने होंगे। स्लाइड पर प्रत्येक ऑब्जेक्ट को माना जाता है: शीर्षक, ड्राइंग ऑब्जेक्ट्स, समूह, एम्बेडेड पिक्चर्स, समीकरण इत्यादि - बस उन ऑब्जेक्ट्स के लिए एक नया नाम टाइप न करें जिनकी आपको परवाह नहीं है।

आपके विकास समाप्त होने के बाद, सबसे अच्छा छुपाएं (निजी उप) या इस कोड को मिटा दें, इसलिए आपके उपयोगकर्ता गलती से ऑब्जेक्ट नाम नहीं बदलते हैं।

Dim s As Integer, NewName As String 

With ActiveWindow.Selection.SlideRange 
    For s = 1 To .Shapes.Count 
     .Shapes(s).Select ' So you can see the object in question 
     NewName = InputBox(.Shapes(s).Name) ' Tell what current name it is and ask for new name 
     If Len(NewName) > 0 Then .Shapes(s).Name = NewName ' If you typed a new name, apply it 
    Next s ' 1 To .Shapes.Count 
End With ' ActiveWindow.Selection.SlideRange 
संबंधित मुद्दे