2012-10-17 17 views
5

में एक तस्वीर का आकार बदलें मैंने चारों ओर देखा। मैं एक्सेल या एक्सेल के माध्यम से आकार बदलने में सक्षम था।पावरपॉइंट 2007

मैं पीडीएफ से एक तस्वीर चिपका रहा हूं और एक क्लिक आकार बदलने और स्थिति की आवश्यकता है।

+1

अधिक जानकारी की आवश्यकता है। क्या * बिल्कुल * आप करना चाहते हैं? IOW, अगर यह मैन्युअल रूप से कर रहा है, तो आप तस्वीर में पेस्ट करेंगे और फिर .... क्या? यदि आपको बस पूर्व-चयनित क्षेत्र में आकार और स्थिति चित्र (या कुछ और) के लिए एक तरीका चाहिए, तो इसके लिए मेरे मुफ्त PPTools स्टार्टरसेट एड-इन में एक टूल है। http://www.pptools.com/starterset/ –

उत्तर

8

मुझे अंत में यह मिला .. यह वही है जो मैंने किया था, अगर किसी को भी एक ही समस्या का सामना करना पड़ रहा है। यह छवि को फिर से आकार देता है, इसे वांछित स्थिति में सेट करता है और इसे पीछे की ओर भेजता है।

Sub Resize() 
    With ActiveWindow.Selection.ShapeRange 
     .Height = 2.78 * 72 //72 is the multiplier for the inch 
     .Width = 4.17 * 72 
     .Left = 0.78 * 72 
     .Top = 1.25 * 72 
     .ZOrder msoSendToBack // This sends picture to the back 
    End With 
End Sub 
2

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

सबसे पहले, पेज सेटअप में पावरपॉइंट 2010 में, मैंने स्लाइड्स को 16: 9 के रूप में सेट किया ताकि मेरे मॉनीटर/स्क्रीनशॉट के अनुपात से मेल खा सके। फिर मैंने एक खाली स्लाइड जोड़ा और प्रत्येक स्क्रीनशॉट के लिए छवि चिपका दी। एक स्लाइड में एक छवि फिट (ऊंचाई और आवश्यकता के अनुसार चौड़ाई बदल) को

Sub ResizeAll() 
For each tSlide in ActiveWindow.Presentation.Slides 
    tSlide.Select 
    With tSlide.Shapes.Item(1) 'assume a blank slide with one image added only 
     .Select 
     .Height = ActiveWindow.Presentation.PageSetup.SlideHeight 
     .Width = ActiveWindow.Presentation.PageSetup.SlideWidth 
     .Left = 0 
     .Top = 0 
    End With 
Next 
End Sub 
0

कोड:

pptSlide.Shapes (1) .Height = 850: मैं तो इस कोड को दौड़ा pptSlide.Shapes (1) .विड्थ = 650