تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مرفق مشروع برنامج يتعامل مع برنامج وورد . يرجى مساعدتي لحل المشكله
#1
Exclamation 
قمت با ارفاق مثال لفكرة البرنامج لتعم الفائده للجميع وقد واجهتني عدة مشاكل  وارجوا مساعدتي في تجاوزها وهي :

1/  اريد كود فتح الملف للتعديل عليه في الخلفيه
أي عدم ظهور الملف عند فتحه في شريط ابدأ


2 / اتسائل عن كيفية عرض صفحة ملف الورد في فورم فيجوال بيسك
قمت بتجربة browser web control  الا انها لم تفي بالغرض حيث انها تجبرني على تغير امتداد الملف

او كيفية عمل PrintPreview للملف مع إخفاء شريط  الأدوات للمستند .



المعذره على كثرة الاسئله الا انني عجزت لإجاد الحلول Huh
الرد }}}}
تم الشكر بواسطة:
#2
اتساءل نفس السؤال وكنت اتمني الرد علية من الأخوه الأفاضل ذو الخبرة
الرد }}}}
تم الشكر بواسطة:
#3
(14-12-14, 12:14 AM)refathafez كتب : اتساءل نفس السؤال وكنت اتمني الرد علية من الأخوه الأفاضل ذو الخبرة

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

هذا كود فتح ملف وورد :
بعد ما تضيف مكتبة الوورد من القائمة project ثم references
تضيف Microsoft word 14

تقوم بتعريف متغير من نوع word
dim myword as Word.Application

هنا نقوم با استدعاء برنامج وورد وفتح مستند موجود لديك مسبقا في نفس المجلد الموجود فيه البرنامج

Set myword = CreateObject("Word.Application")
myword.Documents.Open App.Path & "\word1.doc", ReadOnly:=False
myword.Visible = False

بامكانك تغيير مسار الملف بتغيير الكود بهذا الشكل
myword.Documents.Open ("d:\HR DOCUMENT\bank\word1.doc"), ReadOnly:=False


ارجوا ان قد وصلت المعلومه
الرد }}}}
تم الشكر بواسطة:
#4
(14-12-14, 10:38 AM)Ksa004 كتب :
(14-12-14, 12:14 AM)refathafez كتب : اتساءل نفس السؤال وكنت اتمني الرد علية من الأخوه الأفاضل ذو الخبرة

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

هذا كود فتح ملف وورد :
بعد ما تضيف مكتبة الوورد من القائمة project  ثم references
تضيف Microsoft word 14

تقوم بتعريف متغير من نوع word
dim myword as Word.Application

هنا نقوم با استدعاء برنامج وورد وفتح مستند موجود لديك مسبقا في نفس المجلد الموجود فيه البرنامج

Set myword = CreateObject("Word.Application")
  myword.Documents.Open App.Path & "\word1.doc", ReadOnly:=False
  myword.Visible = False

بامكانك تغيير مسار الملف بتغيير الكود بهذا الشكل
myword.Documents.Open ("d:\HR DOCUMENT\bank\word1.doc"), ReadOnly:=False


ارجوا ان قد وصلت المعلومه

شكرا جزيلا للرد وسوف اقوم بالعمل وان شاء الله نتواصل 
الرد }}}}
تم الشكر بواسطة:
#5
مع ضرورة مراعاة إصدار الأوفيس
أوفيس 7 doc
أوفيس 10 dox

وهكذا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] برنامج بسيط إهداء للأخ امير الزبيدي عبدالقادرعواد 2 71 08-05-17, 12:01 PM
آخر رد: عبدالقادرعواد
  برنامج موظفين رائع مصعب القرشي 7 1,107 28-03-17, 09:07 PM
آخر رد: Amir_alzubidy
  [vb6.0] مشروع المتصفح مفتوح المصدر علي انور 3 1,205 20-03-17, 12:06 AM
آخر رد: سامى
  إهداء للجميع - مثال أو برنامج أرشيف صور المستندات Ahmed_Mansoor 9 2,205 08-03-17, 03:42 PM
آخر رد: awidan76
  [vb6.0] مشروع صغير لتشغيل صورة بصيغة gif مع الاداة والسيريال عبدالقادرعواد 3 147 27-02-17, 10:01 PM
آخر رد: sendbad100
  برنامج مبيعات خاص Ahmed_Mansoor 26 2,951 14-02-17, 01:03 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] برنامج جدول الحصص الاسبوعي ابن دوعن 1 410 22-01-17, 11:16 AM
آخر رد: Ahmed_Mansoor
Wink [vb6.0] مشروع برنامج لمتابعة السيارات thecareep 6 561 03-01-17, 11:50 AM
آخر رد: ابن دوعن
Information [vb6.0] برنامج فجوال بيسك باللغة العربية ابن دوعن 0 229 03-01-17, 11:41 AM
آخر رد: ابن دوعن
Exclamation طلب مشروع عن نظام الغيابات في الكلية spyman 9 1,577 19-12-16, 11:35 PM
آخر رد: abbaskareem

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم