कैसे एक्सेल में ऐसी पिक्चर्स डालें जो ऑटोमेटिकली सेल के आकार में फिट हों (Insert Pictures in Excel That Automatically Size to Fit Cells)

आर्टिकल डाउनलोड करें

आर्टिकल डाउनलोड करें

इस आर्टिकल में:

चरण

रिलेटेड आर्टिकल्स

क्या आपके पास एक ऐसी इमेज या लोगो है, जिसे आप अपनी एक्सेल शीट को और भी अट्रेक्टिव बनाने के लिए उसमें एड करना चाहते हैं? भले ऐसी कोई ऑटोमेटिक सेटिंग नहीं है, जो सेल के अंदर आपकी इमेज को रिसाइज कर दे, लेकिन बस कुछ ही क्लिक्स में आप खुद ऐसा कर सकते हैं। ये विकिहाउ गाइड आपको एक्सेल में पिक्चर्स को इन्सर्ट करना और सेल में फिट होने के लिए उन्हें साइज देना सिखाएगी।

चरण

आर्टिकल डाउनलोड करें

1. 
   1
   Microsoft Excel में अपना प्रोजेक्ट ओपन करें: आप Excel में File > Open जाकर या फिर प्रोजेक्ट फ़ाइल पर राइट-क्लिक करके और Open with > Excel सिलेक्ट करके ऐसा कर सकते हैं।
2. 
   2
   एक इमेज इन्सर्ट करें: आप Insert > Pictures > Selecting your picture > Insert पर जाकर ऐसा कर सकते हैं।
3. 
   3
   इसे रिसाइज करें: जब आप इमेज को सिलेक्ट कर लें, फिर आपको "Format" और "Picture Tools" के अंतर्गत एक "Size" ग्रुपिंग दिखाई देगी।

   • अपनी इमेज के साइज को एडजस्ट करने के लिए Height और Width को चेंज करें: या तो आप साइज को फिर से एडजस्ट करने के लिए इमेज के कोने को ड्रैग और ड्रॉप भी कर सकते हैं।
4. 
   4
   इमेज को सेल में लॉक करें: बाई डिफ़ाल्ट, आपके द्वारा एड की हुई इमेज आपकी सेल्स के ऊपर "रहेगी" और ये आपकी सेल के साइज में नहीं बदलेगी। इसे फिक्स करने के लिए, आपको इमेज को या सेल को लॉक करने की जरूरत पड़ेगी।

   • पिक्चर पर राइट-क्लिक करें और Format Picture क्लिक करें: फिर "Size & Properties" टैब क्लिक करें (जो एक ग्रीन स्क्वेर सिंबल होगा, जिसके चारों ओर तीर बना होगा) और Move and size with cells सिलेक्ट करें।
   • आप कुछ पिक्चर्स को इन्सर्ट करने के बाद एक VBA कोड भी यूज कर सकते हैं: इमेज को इन्सर्ट करें और VBA विंडो ओपन करने के लिए Alt + F11 दबाएँ। Insert > Module क्लिक करें और इस दिए हुए कोड को पेस्ट करें:

   Public Sub FitPic()On Error GoTo NOT_SHAPEDim PicWtoHRatio As SingleDim CellWtoHRatio As SingleWith SelectionPicWtoHRatio = .Width / .HeightEnd WithWith Selection.TopLeftCellCellWtoHRatio = .Width / .RowHeightEnd WithSelect Case PicWtoHRatio / CellWtoHRatioCase Is > 1With Selection.Width = .TopLeftCell.Width.Height = .Width / PicWtoHRatioEnd WithCase ElseWith Selection.Height = .TopLeftCell.RowHeight.Width = .Height * PicWtoHRatioEnd WithEnd SelectWith Selection.Top = .TopLeftCell.Top.Left = .TopLeftCell.LeftEnd WithExit SubNOT_SHAPE:MsgBox "Select a picture before running this macro."End Sub

   • कोड को रन करने के लिए F5 दबाएँ और जब तक कि आपकी शीट में मौजूद सारी इमेज सेल के अनुसार फिट न हो जाएँ, तब तक इस प्रोसेस को रिपीट करें।