सभी लिंक की गई छवियों को वर्ड दस्तावेज़ में एम्बेडेड में कैसे परिवर्तित करें?

लेखक: सिलुविया अंतिम संशोधित: 2018-09-06

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

लिंक की गई छवियों को वीबीए कोड के साथ एम्बेडेड में बदलें

लिंक की गई छवियों को वीबीए कोड के साथ एम्बेडेड में बदलें

दस्तावेज़ में सभी लिंक की गई छवियों को एम्बेडेड में बदलने के लिए कृपया नीचे दिया गया VBA कोड लागू करें।

1. Word दस्तावेज़ खोलें जिसमें लिंक की गई छवियां हैं जिन्हें आप एम्बेडेड छवियों में परिवर्तित करेंगे। दबाओ ऑल्ट + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल। और फिर नीचे दिए गए VBA कोड को कॉपी करें मॉड्यूल खिड़की। स्क्रीनशॉट देखें:

वीबीए कोड: सभी लिंक की गई छवियों को एक ही बार में एम्बेडेड में बदलें

Sub convert_all_inline_shapes()
'Updated by Extendoffice 20180906
    Dim xIShape As InlineShape
    For Each xIShape In ActiveDocument.InlineShapes
        With xIShape
            If .Type = wdInlineShapeLinkedPicture Then
                .LinkFormat.SavePictureWithDocument = True
                .LinkFormat.BreakLink
            End If
        End With
    Next
End Sub

3। दबाएं F5 कोड चलाने की कुंजी.

फिर वर्तमान दस्तावेज़ में सभी लिंक की गई छवियां एक ही समय में एम्बेडेड छवियों में परिवर्तित हो जाती हैं।