मैंने एक विशिष्ट आकार का चयन करने के लिए एक मैक्रो बनाया और उसके अंदर टेक्स्ट का चयन किया और एक विशिष्ट शब्द की तलाश की और उसे बदल दिया लेकिन यह मुझे selection.find के लिए एक त्रुटि दिखाता रहता है यह मेरा कोड है

wrdDoc.Shapes("Groupe 643").Select
wrdDoc.Shapes("Groupe 643").GroupItems("Text 
Box644").TextFrame.TextRange.Select
With Selection.Find
  .Text = "Frame FME"
  .Replacement.Text = Sheets("Generate").Range("B67")
 .Forward = True
 .ClearFormatting
 .Wrap = wdFindContinue
.Execute Replace:=wdReplaceAll

कोई सुझाव अग्रिम धन्यवाद

0
user7755666 16 सितंबर 2017, 10:40
Selection.Find वर्तमान में एक्सेल एप्लिकेशन के Selection ऑब्जेक्ट पर काम कर रहा है। क्या आपका यही इरादा था? मैं वर्ड ऑब्जेक्ट मॉडल से बहुत परिचित नहीं हूँ, लेकिन क्या यह wrdDoc.Selection.Find होना चाहिए?
 – 
YowE3K
16 सितंबर 2017, 10:55
नहीं, मैंने इसका परीक्षण किया था, लेकिन यह मुझे यह त्रुटि दिखाता है "मेथोड या प्रोप्राइटे एन'एस्ट पास गेरर पार सेट ओब्जेट" यह एक्सेल वीबीए कंट्रोलिंग वर्ड डॉक मैक्रो है जब मैं इसे चलाता हूं ... यह आकार के अंदर टेक्स्ट का चयन करता है लेकिन साथ वह चयन मैं कुछ नहीं कर सकता ... चयन के साथ समस्या।ढूंढें
 – 
user7755666
16 सितंबर 2017, 11:05
यदि यह wrdDoc.Selection.Find नहीं है, तो Selection Word एप्लिकेशन ऑब्जेक्ट का गुण हो सकता है। (आपने हमारे लिए यह देखने के लिए पर्याप्त कोड पोस्ट नहीं किया है कि आपने उस ऑब्जेक्ट को क्या कहा है, इसलिए आपको इसे स्वयं निर्धारित करना होगा।) निश्चित रूप से Excel Selection ऑब्जेक्ट यदि आप Word में जो कुछ भी आपने चुना है उसका उपयोग करने का प्रयास कर रहे हैं।
 – 
YowE3K
16 सितंबर 2017, 11:35

1 उत्तर

सबसे बढ़िया उत्तर

आपको चयन वस्तु का उपयोग करने का बिल्कुल भी प्रयास नहीं करना चाहिए। इसके बजाय, आप आकार में Text प्राप्त कर सकते हैं और इसे संशोधित करने के लिए Replace फ़ंक्शन का उपयोग कर सकते हैं।

With ActiveDocument.Shapes(1).TextFrame.TextRange
    Debug.Print .Text
    .Text = Replace(.Text, "text", "new text")
    Debug.Print .Text
End With
1
Variatus 16 सितंबर 2017, 12:29
जब मैं इस प्रश्न पर अपनी टिप्पणी कर रहा था, तब मैंने यह सोचना बंद नहीं किया कि हम केवल इसके उपयोग से छुटकारा पाकर यह सोचने से बच सकते हैं कि किस वर्ड ऑब्जेक्ट ने Selection को होस्ट किया है! दोह !!!
 – 
YowE3K
16 सितंबर 2017, 21:29