(31-12-14, 02:17 AM)Ahmed_Mansoor كتب : التعديل في المرفقات .
أخي الفاضل قمت بتعديلات على الملف, حيث أنشأت ملف وورد جديد باسم Certificate وتم بحمد الله بعدما قرأت الكود البرمجي حقك
ولا يسعني إلا أن أقول لك جزالك الله خيرا
لك مني كل الاحترام والحب والتقدير
وأتمنى أن تفيد هذه الفكرة جميع المتابعين للمنتدى وجميع الشباب محبي vb6.0
لذا هل هذه الجمل لوضع بيانات من الفورم إلى صفحة الوورد مع تغيير المرسل لها
إقتباس :With Word_App.Selection.Find
.Text = "<DATE>"
.Replacement.Text = Trim$(Text2.Text)
.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Word_App.Selection.Find.Execute Replace:=wdReplaceAll
