سلام
دفتر حقوقی محل کارم گفت که کلافه میشیم متن های تکراری رو تایپ کنیم
میشه کاری کرد که فقط اطلاعات مورد نیاز رو داد و پرینت گرفت !! ( یه چیزایی درست کردم دادم توی WORD ولی نتونستن کار کنن باهاش ) و راهی بهتر خواستن
اولش گفتم نمی دونم باید ببینم هم چین چیزی هستش که بعد از گشت و گذار و پرس جو به این نتیجه رسیدم که در ادامه می بینید
توی محل کلرتون شده که از تایپ کردن متن های تکراری و جابجا کردن اونا بین چندین صفحه و یا حتی پیدا کردن فایل مربوطه کلافه بشین یا اینکه مثل من حوصله نداشته باشین برین سراغش/ خوب توسط یه همچین برنامه ای میشه از این کارا دوری کرد و خودمون رو راحت کنیم
چندین راه هستش که من از طریق BookMark این کارو انجام دادم ( برنامه های مشابهی هم هستش )
اول در محیط MS-Word 2010 ( یا هر نسخه ای که دوست دارین ) - فرم خودتون رو طراحی کنین - مثل همین فرم زیر
بعد جلوی هر یک از نوشته هایی که نوشتین کلیک کنید و پنجره BooKMark رو باز کنید و یک اسم به اون نوشته خود بدین و بعد OK- شکل زیر
که در شکل بالا shsh رو من به شماره شناسنامه نسبت دادم - به همین روال عملیات رو تکرار کنین/
فایل رو در حالت Template ذخیره کنین
حال نوبت به برنامه میرسه
در برنامه مطابق شکل زیر آبجکت MS Word رو فراخوانی کنین
فیلدهای موردنظر خود رو بر روی فرم ایجاد کنین و بعد یک فایل ار نوع Module به پروژه برنامه اضافه کنین/
چون سورس برنامه رو هم براتون آپ میکنم فقط چند خط توضیح میدم در مورد برنامه
Word.Application.Quit wdDoNotSaveChanges
خط بالا برنامه MSWord رو بدون ذخیره کردن عملیات می بندد
Call Printen(name, tel, pedar, ln, fn, tta, sh)
فراخوانی فاکتورهای برنامه از فایل مدول
Set Myw = GetObject("", "Word.Application")
ایجاد یه برنامه از MSWord به برنامه خود
Myw.Documents.Add "c:/lioncomputer.dot"
باز کردن فایل مورد نظر توسط برنامه ایحاد شده در سطر بالا
Set Range = Myw.ActiveDocument.Bookmarks("nam").Range
تعریف محدوده کاری برای برنامه که در اینجا nam هستش ( اسم BookMark ای که در عکس دوم نشون دادم )
Range.InsertAfter name
و بالاخره بعد از پیدا کردن محدوده کاری از سطر بالا ، مقدار name رو که از کاربر گرفته جایگذاری میکنه
Myw.ActiveDocument.PrintOut
اطلاعات جایگذاری شده رو به چاپگر ارسال میکنه
Set Myw = Nothing
حافظه سیستم رو از برنامه MSWord آزاد میکنه ( یعنی از حافظه خالی میکنه )
اینم عکسی از نتیجه کار با برنامه
دانلود برنامه به صورت دمو
دانلود سورس برنامه
از دوستان کسی خواست برنامه رو برا کاربرد خودش ، میتونه بهم بگه تا براش ایجاد کنم ( فرم طراحی شده رو بهم ارسال کنین فقط )
فایل lioncomputer.dot رو حتماً در درایو C کپی کنین برای اجرای برنامه