2010-08-09 19 views
6

में सिंटैक्स हाइलाइट करना एमएस वर्ड के लिए प्लगइन या एडिन बनाना संभव है जो टेक्स्ट के एक सेक्शन को चुनने की अनुमति देता है और उसके बाद एक कस्टम "हाइलाइटिंग" फ़ंक्शन लागू किया जा सकता है।एमएस वर्ड

मैं चाहता हूं कि यह सब एमएस वर्ड के भीतर हो, किसी अन्य एप्लिकेशन से कट और अतीत न हो।

यदि संभव हो, जहाँ मैं यह कैसे (सी # का उपयोग) करने के लिए पर कुछ दिशा मिल सकता है पर किसी भी सुझाव

उत्तर

3

VBA - अनुप्रयोगों के लिए विजुअल बेसिक कार्यालय में काम के इस प्रकार के लिए अपने उपकरण है। यह स्वयं निहित रहता है।

टेक्स्ट में हेरफेरिंग दिखाता है।

http://computerprogramming.suite101.com/article.cfm/introduction_to_vba_for_ms_word

VBA ट्यूटोरियल:

http://jy.fridaynight.co.il/pages/dev/WordVBA.php

उदाहरण का गुच्छा।

http://www.thezcorp.com/VBACodeSamples.aspx

एक Cornucopia:

http://www.java2s.com/Code/VBA-Excel-Access-Word/CatalogVBA-Excel-Access-Word.htm

अब आप के लिए खोज करने के लिए क्या रूप में अच्छी तरह जानते हैं कि, उम्मीद है कि आप अपने रास्ते पर हैं।

संपादित करें: इस कोड उदाहरण मिला:

Sub ChangeColor 
    Options.DefaultHighlightColorIndex = wdBrightGreen 
    Selection.Find.ClearFormatting 
    Selection.Find.Highlight = True 
    Selection.Find.Replacement.ClearFormatting 
    Selection.Find.Replacement.Highlight = True 
    Selection.Find.Execute Replace:=wdReplaceAll 

    Selection.Find.ClearFormatting 
    Selection.Find.Font.Color = wdColorBrightGreen 
    Selection.Find.Replacement.ClearFormatting 
    Selection.Find.Replacement.Font.Color = wdColorRed 
    With Selection.Find 
     .Text = "" 
     .Replacement.Text = "" 
     .Forward = True 
     .Wrap = wdFindContinue 
    End With 
    Selection.Find.Execute Replace:=wdReplaceAll 
End Sub 

HTH

+0

ऊपर नए कोड देखें। – JustBoo

संबंधित मुद्दे