मुख्य सामग्री पर जाएं

वर्ड में स्कैनर या कैमरे से चित्र या इमेज कैसे डालें?

लेखक: सिलुविया अंतिम संशोधित: 2020-05-29

आपको Word 2007 और बाद के संस्करण में स्कैनर या कैमरे से चित्र डालने में परेशानी हो सकती है क्योंकि Microsoft ने स्कैनर या कैमरे से चित्र डालने का विकल्प हटा दिया है जो अभी Word 2003 में उपलब्ध था। यह ट्यूटोरियल आपको चित्र डालने के कई तरीके दिखाएगा Word 2007 और बाद के संस्करण में स्कैनर या कैमरे से।

शॉर्टकट का उपयोग करके वर्ड में स्कैनर या कैमरे से चित्र डालें

मैक्रो बनाकर वर्ड में स्कैनर या कैमरे से चित्र डालें

वर्ड के लिए कुटूल के साथ वर्ड में स्कैनर या कैमरे से चित्र डालें


शॉर्टकट का उपयोग करके वर्ड में स्कैनर या कैमरे से चित्र डालें

यदि आप Word 2007 या Word 2010 का उपयोग कर रहे हैं, तो आप शीघ्रता से इसका उपयोग कर सकते हैं स्कैनर या कैमरे से चित्र डालें उपयोगिता इस प्रकार है:

1. कृपया पहले दबाएँ ऑल्ट Word 2007 या Word 2010 में कुंजी, और फिर मेनू कुंजी अनुक्रम टाइप करना जारी रखें मैं पी एस
आपके कीबोर्ड पर, और यह प्रदर्शित होगा स्कैनर या कैमरे से चित्र डालें संवाद।

लिखने के बाद ऑल्ट पहले और i कुंजी, आपको एक दिखाई देगा सुपर टिप के रूप में इस प्रकार है:

लिखने के बाद p और s कुंजी, यह पॉप अप हो जाएगा स्कैनर या कैमरे से चित्र डालें संवाद।

फिर आप डिवाइस से चित्र चुन सकते हैं स्कैनर या कैमरे से चित्र डालें संवाद।


मैक्रो बनाकर वर्ड में स्कैनर या कैमरे से चित्र डालें

1. सबसे पहले, आपको एक बनाना चाहिए मैक्रो आपके Word दस्तावेज़ के लिए. फिर से लॉगिन करने के लिए देखें > मैक्रोज़ > मैक्रो देखें. स्क्रीनशॉट देखें:

दस्तावेज़ स्कैनर 1 से छवि सम्मिलित करें

2. क्लिक करने के बाद मैक्रो देखें, वहां एक होगा मैक्रोज़ संवाद पॉप अप हो रहा है. अंतर्गत मैक्रो नाम, में टाइप करें "स्कैन”; चुनना सामान्य। डॉटएम (वैश्विक) टेम्पलेट) से मैक्रो इन ड्रॉप डाउन सूची। तब दबायें बनाएं. स्क्रीनशॉट देखें:

दस्तावेज़ स्कैनर 2 से छवि सम्मिलित करें

3. और अब, ए एप्लीकेशन विंडो के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक दिखाई देता है, कृपया निम्नलिखित कोड को कॉपी करें और संवाद स्थानों के बीच चिपकाएँ उप स्कैन और अंत उप लाइनों।

2013 और बाद के संस्करण में कोड:

On Error Resume Next
     Dim objCommonDialog As WIA.CommonDialog
     Dim objImage As WIA.ImageFile
     Dim strDateiname
     Set objCommonDialog = New WIA.CommonDialog
     Set objImage = objCommonDialog.ShowAcquireImage
     strDateiname = Environ("temp") & "\Scan.jpg"
     If Not objImage Is Nothing Then
       Kill strDateiname
       objImage.SaveFile strDateiname
       Selection.InlineShapes.AddPicture strDateiname
       Set objImage = Nothing
     End If
     Set objCommonDialog = Nothing

दस्तावेज़ स्कैनर 3 से छवि सम्मिलित करें

2007 और 2010 में कोड:

On Error Resume Next
WordBasic.InsertImagerScan

दस्तावेज़ स्कैनर 4 से छवि सम्मिलित करें

4. अब, आपको क्लिक करना चाहिए टूल्स > संदर्भ पर जाने के लिए सन्दर्भ-सामान्य संवाद बॉक्स, फिर चुनें और जांचें माइक्रोसॉफ्ट विंडोज़ छवि अधिग्रहण लाइब्रेरी विकल्प, स्क्रीनशॉट देखें:

दस्तावेज़ स्कैनर 5 से छवि सम्मिलित करें

5। तब दबायें OK संवाद बॉक्स बंद करने के लिए, और अब, कृपया दबाएँ F5 इस कोड को चलाने की कुंजी.

नोट: सुनिश्चित करें कि स्कैनर चालू है और कंप्यूटर से कनेक्ट है


वर्ड के लिए कुटूल के साथ वर्ड में स्कैनर या कैमरे से चित्र डालें

- वर्ड के लिए कुटूलहै स्कैनर या कैमरे से उपयोगिता, आप उन कष्टप्रद परिचालनों से छुटकारा पा सकते हैं और आसानी से स्कैनर या कैमरे से चित्र को वर्ड में सम्मिलित कर सकते हैं।

वर्ड के लिए कुटूल : 100 से अधिक उपयोगी वर्ड ऐड-इन्स के साथ, 60 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क. 

1. कर्सर को वहां रखें जहां आप चित्र डालना चाहते हैं।

2. तो कृपया क्लिक करके इस उपयोगिता को लागू करें कुटूल > अधिक > स्कैनर या कैमरे से. स्क्रीनशॉट देखें:

3. क्लिक करने के बाद स्कैनर या कैमरे से, यह प्रदर्शित करेगा स्कैनर या कैमरे से चित्र डालें संवाद।

ए: के तहत युक्ति, उस संबंधित डिवाइस का चयन करें जिससे आप चित्र आयात करना चाहते हैं।

बी: कोई भी चुनें संकल्प आप चाहते हैं।

सी: क्लिक करें सम्मिलित करें डालना शुरू करने के लिए.

नोट: यह उपयोगिता Word 2013 और बाद के संस्करण के लिए लागू नहीं की जा सकती।

वर्ड के लिए कुटूल्स डाउनलोड करने और अभी निःशुल्क परीक्षण करने के लिए क्लिक करें!

की अधिक विस्तृत जानकारी के लिए वर्ड के लिए कुटूलहै स्कैनर या कैमरे से उपयोगिता, कृपया देखें: स्कैनर या कैमरे से.


सर्वोत्तम कार्यालय उत्पादकता उपकरण

वर्ड के लिए कुटूल - ओवर के साथ अपने शब्द अनुभव को उन्नत करें 100 उल्लेखनीय विशेषताएं!

🤖 कुटूल्स एआई असिस्टेंट: एआई के साथ अपना लेखन बदलें - सामग्री उत्पन्न करें  /  पाठ पुनः लिखें  /  दस्तावेज़ों को सारांशित करें  /  जानकारी के लिए पूछताछ करें दस्तावेज़ पर आधारित, सभी वर्ड के भीतर

📘 दस्तावेज़ महारत: पन्ने विभाजित करें  /  दस्तावेज़ मर्ज करें  /  विभिन्न प्रारूपों में निर्यात चयन (पीडीएफ/टीएक्सटी/डीओसी/एचटीएमएल...)  /  बैच को पीडीएफ में कनवर्ट करें  /  पेजों को छवियों के रूप में निर्यात करें  /  एक साथ अनेक फ़ाइलें प्रिंट करें...

सामग्री संपादन: बैच ढूंढें और बदलें अनेक फ़ाइलों में  /  सभी चित्रों का आकार बदलें  /  तालिका पंक्तियों और स्तंभों को स्थानांतरित करें  /  तालिका को पाठ में बदलें...

🧹 सहज स्वच्छ: साफ़ कर दो अतिरिक्त स्थान  /  अनुभाग टूट जाता है  /  सभी शीर्षलेख  /  पाठ बक्से  /  हाइपरलिंक  / अधिक हटाने वाले टूल के लिए, यहां जाएं समूह हटाएँ...

रचनात्मक निवेशन: डालें हजार विभाजक  /  चेक बॉक्स  /  रेडियो बटन  /  क्यूआर कोड  /  बारकोड  /  विकर्ण रेखा तालिका  /  समीकरण कैप्शन  /  तस्वीर का शीर्षक  /  सारणी का शीर्षक  /  एकाधिक चित्र  / में और अधिक खोजें समूह सम्मिलित करें...

🔍 परिशुद्धता चयन: सटीक विशिष्ट पृष्ठ  /  टेबल्स  /  आकृतियाँ  /  शीर्षक पैराग्राफ  / के साथ नेविगेशन बढ़ाएँ अधिक सुविधाएँ चुनें...

स्टार संवर्द्धन: किसी भी स्थान पर नेविगेट करें  /  दोहरावदार पाठ स्वतः सम्मिलित करें  /  दस्तावेज़ विंडोज़ के बीच टॉगल करें  /  11 रूपांतरण उपकरण...

👉 क्या आप इन सुविधाओं को आज़माना चाहते हैं? वर्ड के लिए कुटूल्स एक ऑफर करता है 60- दिन का नि: शुल्क परीक्षण, बिना किसी सीमा के! 🚀
 
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This should work in most versions 64 or 32 bit Add reference to Microsoft Windows Image Acquisition x2.0 Sub Scan() Dim objCommonDialog As WIA.CommonDialog Dim objImage As WIA.ImageFile Dim strScanName As String ' instantiate Scan WIA objects Set objCommonDialog = New WIA.CommonDialog Set objImage = objCommonDialog.ShowAcquireImage strScanName = Environ$("TEMP") & "\Scan.jpg" ' set temporary file If Not objImage Is Nothing Then If Dir(strScanName) "" Then Kill strScanName objImage.SaveFile strScanName 'save into temp file DoEvents 'Word Selection.InlineShapes.AddPicture strScanName ' insert in doc End If End Sub
This comment was minimized by the moderator on the site
I have followed ALL the instructions for loading a picture from my scanner and all that happens is a empty box outline appears on my Word 10 page?? Your help is sort. David 76 yrs young
This comment was minimized by the moderator on the site
Wow! supereasy. Thank you!
This comment was minimized by the moderator on the site
Thanks a lot for this very helpful article! The keyboard shortcut and the macro both work like a charm!
This comment was minimized by the moderator on the site
such an amazing and helpful.
This comment was minimized by the moderator on the site
So I created a Macro using the code you supplied, thank you, i was wondering if there was a way to go further and include code for the selection that you make once that Insert Image window pops up. Thanks
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations