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

केवल वर्ड दस्तावेज़ में प्रारूप ट्रैक परिवर्तन कैसे स्वीकार करें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2018-09-19

यदि आपके पास एक Word दस्तावेज़ है जो ट्रैक परिवर्तन मोड में है, तो जब आप इसे लागू करते हैं सभी परिवर्तन स्वीकार करें सुविधा, सभी ट्रैक परिवर्तन स्वीकार किए जाएंगे। लेकिन, कभी-कभी, आप सम्मिलन या विलोपन को स्वीकार किए बिना केवल फ़ॉर्मेटिंग ट्रैक परिवर्तनों को स्वीकार करना चाहते हैं। यह आलेख Word दस्तावेज़ में इस समस्या को हल करने के तरीके के बारे में बात करेगा।

Word में केवल VBA कोड के साथ फ़ॉर्मेटिंग ट्रैक परिवर्तन स्वीकार करें

शो मार्कअप फ़ंक्शन के साथ वर्ड में केवल फ़ॉर्मेटिंग ट्रैक परिवर्तन स्वीकार करें


Word में केवल VBA कोड के साथ फ़ॉर्मेटिंग ट्रैक परिवर्तन स्वीकार करें

निम्नलिखित VBA कोड आपको केवल Word दस्तावेज़ में फ़ॉर्मेटिंग ट्रैक परिवर्तनों को स्वीकार करने में मदद कर सकता है, कृपया ऐसा करें:

1. दबाए रखें ALT + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2. और फिर, क्लिक करें सम्मिलित करें > मॉड्यूल, खुले हुए रिक्त मॉड्यूल में नीचे दिए गए कोड को कॉपी और पेस्ट करें:

वीबीए कोड: केवल वर्ड दस्तावेज़ में प्रारूप ट्रैक परिवर्तन स्वीकार करें

Sub AcceptFormatChanges()
    Dim xRev As Revision
    For Each xRev In ActiveDocument.Revisions
        If Left(xRev.FormatDescription, 10) = "Formatted:" Then
            xRev.Accept
        End If
    Next
End Sub

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

दस्तावेज़ फ़ॉर्मेटिंग स्वीकार करें 1


शो मार्कअप फ़ंक्शन के साथ वर्ड में केवल फ़ॉर्मेटिंग ट्रैक परिवर्तन स्वीकार करें

Word दस्तावेज़ में, आप भी लागू कर सकते हैं मार्कअप दिखाएं इस कार्य को पूरा करने के लिए कृपया निम्न चरणों का पालन करें:

1. ट्रैक परिवर्तन मोड फ़ाइल में, क्लिक करें समीक्षा > मार्कअप दिखाएं, और फिर अनचेक करें टिप्पणियाँ और सम्मिलन और विलोपन विकल्प, और छोड़ें फॉर्मेटिंग विकल्प चेक किया गया, स्क्रीनशॉट देखें:

दस्तावेज़ फ़ॉर्मेटिंग स्वीकार करें 2

2. और अब, आप केवल फ़ॉर्मेटिंग ट्रैक किए गए परिवर्तनों को देख सकते हैं, फिर, क्लिक करते रहें समीक्षा > स्वीकार करें > दिखाए गए सभी परिवर्तन स्वीकार करें जैसा कि निम्नलिखित स्क्रीनशॉट में दिखाया गया है:

दस्तावेज़ फ़ॉर्मेटिंग स्वीकार करें 3

3. और सभी फ़ॉर्मेटिंग ट्रैक परिवर्तन स्वीकार कर लिए गए हैं, अब, आपको वापस लौटना होगा टिप्पणी, सम्मिलन और विलोपन से विकल्पों की जाँच करके मार्कअप दिखाएं ड्रॉप डाउन सूची, स्क्रीनशॉट देखें:

दस्तावेज़ फ़ॉर्मेटिंग स्वीकार करें 4

4. अब, आप देख सकते हैं कि फ़ॉर्मेटिंग ट्रैक परिवर्तन स्वीकार कर लिए गए हैं, और अन्य ट्रैक परिवर्तन अभी भी रखे गए हैं, स्क्रीनशॉट देखें:

दस्तावेज़ फ़ॉर्मेटिंग स्वीकार करें 1

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

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

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

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

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

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

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

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

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

👉 क्या आप इन सुविधाओं को आज़माना चाहते हैं? वर्ड के लिए कुटूल्स एक ऑफर करता है 60- दिन का नि: शुल्क परीक्षण, बिना किसी सीमा के! 🚀
 
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Vous êtes mon héros. En français, le code serait le suivant:

Sub AcceptFormatChanges()
Dim xRev As Revision
For Each xRev In ActiveDocument.Revisions
If Left(xRev.FormatDescription, 12) = "Mis en forme" Then
xRev.Accept
End If
Next
End Sub
This comment was minimized by the moderator on the site
Dans toutes les langues :

Sub AcceptFormatChanges()
Dim xRev As Revision
For Each xRev In ActiveDocument.Revisions
If xRev.FormatDescription <> "" Then
xRev.Accept
End If
Next
End Sub
This comment was minimized by the moderator on the site
Merci, en effet, la dernière méthode fonctionne aussi en néerlandais
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations