في قالب الورد Bookmarks من خلال يوزرفورم في الاكسل بإستخدام أده Template كيفية التعديل علي قالب ورد

[Strong winds]

السلام عليكم أعضاء المنتدي المحترف والمحترم

في الورد  Bookmarks من خلال يوزرفورم أكسل بإستخدام أده  Template كيفية التعديل علي قالب ورد 

حيث أن في قالب الورد بيانات ثابتة وأخري متغيره وأريد التعديل علي البيانات المتغيره من خلال يوزر فورم في الأكسل 

وقد أستخدمت هذا الكود لإستدعاء ملف الورد

Private Sub Word_Click()

Dim objword As Object

Dim objDoc As Object

Set objword = CreateObject("Word.Application")

Set objDoc = objword.Documents.Open(ActiveWorkbook.Path & "\tests.dotx")

objword.Visible = True

Unload Me

End Sub

 ولكني يبقي التعديل علي هذا القالب من فورم الأكسل 

وخلافة الي قالب الوردDTPicker&TextBox الأكواد المطلوبة لنقل البيانات من 

تحياتي الحاره لكل الأعضاء

[Strong winds]

السادة الكرام أرجو المساعده 

أنتظر الأستفاده من خبراتكم المتميزه 

أنتظر مساعدتكم

 

[محمد طاهر عرفه]

لم افهم السؤال

البيانات المتغيرة في هذه الحالة سيكون مصدرها هو الإكسيل

و النموذج و البيانات الثابتة ستكون في القالب الموجود في الوورد و سيتم تطبيق الدمج البريدي في الوورد

لماذا تريد تعديل القالب في الوورد  بالكود؟

الأمر يبدو لي يحتاج استخدام طبيعي مباشر الدمج البريدي فقط و تكون قاعدة البيانات في ملف اكسيل 

[Strong winds]

أستاذي الكريم والفاضل 

أشكرك في البداية علي الأهتمام والرد 

ولكن دعني أوضح لك بعض التفاصيل أكثر

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

Textbox , Lestbox , DTPicker ...... وغيرها من الأدوات

بعض من هذه البيانات فقط أحتاج أن يتم نقلها الي ملف ورد ويتم حفظها في ملف منفصل 

علي سبيل المثال

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

ولذلك أستخدمت الكود المذكور أعلاه لإستدعاء ملف الورد ولكن يبقي فقط التعديل علية أو نقل البيانات من اليوزرفورم في الأكسل الي ملف الورد 

والذي هو بصيغة 

 Template 

ونقل البيانات من اليوزرفورم اكسل الي الورد من خلال أده 

Bookmarks

وذلك لوضع كل بيان أحتاج نقلة من أده معينة في اليوزرفورم الي مكان محدد في ملف الورد 

علي سبيل المثال

 الي عنوان الورد  Textbox1نقل بيان من ال

أو نقل التاريخ من الفورم الي الورد في مكان محدد

Bookmarksيتم ذلك بمجرد زر نقل بعض البيانات من أدوات معينة في اليوزرفورم إثناء الأدخال الي الورد ووضع هذه البيانات في أماكن محدده في الورد عن طريق أده 

 

يارب تكون الرؤية وضحت 

أطلت عليك كثيراً في الشرح ولكن لم أجد ما أريد عند البحث 

أتمني أن تساعدني أنت أو أحد من الأعضاء الكرام في المنتدي 

أنا بأشد الحاجة الي ما عرضتة 

شكراً لوقتك أتمني الأستفاده من خبرتك

ويبقي ملف الأكسل مرجع بياني فقط عند البحث عنها 

أي هو مصدر البيانات ومرجع في نفس الوقت

هذا للتوضيح أكثر

وشكراً

[Strong winds]

يا ساده أتمني المساعده 

جزاكم الله خيراً

[Strong winds]

في الرابط التالي شرح ما أريده ولكن هذا علي فيجوال بيسيك أستوديو
أنا ما أرده عمل ذلك من خلال يوزرفورم في الأكسل 
اليك الرابط : https://www.youtube.com/watch?v=andDjzYHHC4&t=372s
وهو شرح السيد الفاضل أ : 
خالد السعداني - Khalid ESSAADANI
وشكراً للأهتمام 
أتمني الأستفاده من خبراتكم