منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] كيف يتم استبدال إشارة مرجعية موجودة في ملف وورد من خلال برنامجي ؟ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] كيف يتم استبدال إشارة مرجعية موجودة في ملف وورد من خلال برنامجي ؟ (/showthread.php?tid=16822)



كيف يتم استبدال إشارة مرجعية موجودة في ملف وورد من خلال برنامجي ؟ - السندبااد - 16-08-16

السلام عليكم ورحمة الله وبركاته

كيف يتم استبدال إشارة مرجعية موجودة في ملف وورد من خلال برنامجي ؟

مثلاً في ملف الوورد عندي إشارة مرجعية بعنوان NameFather أريد من خلال برنامجي وضه عبارة بدلاً منها لتحل محلها
بعض المكاتب التي جربتها واجهت فيها مشاكل
لذا أرجو التكرم بتوضيح أبسط الطرق وأكثرها نفعاً



RE: كيف يتم استبدال إشارة مرجعية موجودة في ملف وورد من خلال برنامجي ؟ - الوادي - 17-08-16

انظر هذا الموضوع
https://msdn.microsoft.com/en-us/library/ad6ks7k0.aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1


RE: كيف يتم استبدال إشارة مرجعية موجودة في ملف وورد من خلال برنامجي ؟ - السندبااد - 17-08-16

شكراً لك اخي العزيز الوادي
لقد استخدمت مكتبة microsoft.office.interop.word.dll
وهذا هو الكود بتقنية WPF بالدوت نت :

كود :
        Dim application As New Microsoft.Office.Interop.Word.Application()
        Dim document As New Microsoft.Office.Interop.Word.Document()

        document = application.Documents.Open(My.Application.Info.DirectoryPath & "\WordReport.doc")
        application.Visible = True

        document.Bookmarks("NameٍSite").Range.Text = "vb4arb.com"