محمد عدنان قام بنشر فبراير 2, 2023 مشاركة قام بنشر فبراير 2, 2023 السلام عليكم سؤال الى الاستاذة خبراء الاكسل هل بالامكان استخدام الماكرو لترحيل من اكسل الى نموذج ورد عبر نموذج اكسل لترحيل بيانات ؟ طريقة غير دمج المراسلات ملاحظة يوجد اكثر من نموذج ارفق البرتامج مع نموذج واحد ؟ form.rar رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر فبراير 6, 2023 مشاركة قام بنشر فبراير 6, 2023 Sub Merge() ActiveWorkbook.MailMerge.OpenDataSource Name:= _ "C:\Users\User\Desktop\MyData.xlsx", _ ReadOnly:=True, LinkToSource:=True, _ AddToRecentFiles:=False, _ Format:=wdOpenFormatAuto, _ Connection:="Data Source=C:\Users\User\Desktop\MyData.xlsx;Mode=Read;Extended Properties=""HDR=YES;IMEX=1""" Documents.Open FileName:="C:\Users\User\Desktop\MyDocument.docx" ActiveDocument.MailMerge.Destination = wdSendToNewDocument ActiveDocument.MailMerge.Execute End Sub يمكنك استخدام الأمر VBA MailMerge لدمج المراسلات من Excel إلى Word. على سبيل المثال، يمكنك استخدام الأمر التالي لدمج البيانات الموجودة في عمود A الصفوف 2 إلى 10 في عمود B من جدول ما في كتاب Excel إلى ورقة مستند Word: جرب هذا الكود لعله يفيدك رابط هذا التعليق شارك More sharing options...
محمد عدنان قام بنشر فبراير 6, 2023 الكاتب مشاركة قام بنشر فبراير 6, 2023 السلام عليكم اخي @كريم نظيم للاسف ما زبط معي اشكرك لاهتمامك 🙂 1 رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر فبراير 6, 2023 مشاركة قام بنشر فبراير 6, 2023 4 دقائق مضت, محمد عدنان said: السلام عليكم اخي @كريم نظيم للاسف ما زبط معي اشكرك لاهتمامك 🙂 وعليكم السلام ورحمه الله استاذ @محمد عدنان ممكن ترفع الملفات للعمل عليها افضل 🌹. وانتظر الاجابه من الساده خبراء المنتدى 🌹. رابط هذا التعليق شارك More sharing options...
محمد عدنان قام بنشر فبراير 6, 2023 الكاتب مشاركة قام بنشر فبراير 6, 2023 السلام عليكم ارفع الملفات مرة اخرى T_2023.xls نموذج 1.docx رابط هذا التعليق شارك More sharing options...
محمد عدنان قام بنشر فبراير 7, 2023 الكاتب مشاركة قام بنشر فبراير 7, 2023 السلام عليكم للرفع حاولت افهم ما هو موجود من الرابط التالي و اطبق على ملفي . و لكني لم افهم شيئ لاني لست مختص برامج https://thedatalabs.org/automated-student-mark-sheet/ هل من حل ؟ السلام عليكم و رحمة الله و بركاته للرفع و المساعدة لو في امكن رابط للشرح رابط هذا التعليق شارك More sharing options...
فوزى فوزى قام بنشر فبراير 12, 2023 مشاركة قام بنشر فبراير 12, 2023 اثناء تصفحى فى المتتدى وجدت هذا الشيت الرائع الجميل وهو يعتبر بمثابة المطلوب لكم ولكنى لم انتبه الى اسم صاحب الشيت حتى نشكره ترحيل من الاكسيل الى ورد.rar 2 رابط هذا التعليق شارك More sharing options...
محمد عدنان قام بنشر فبراير 14, 2023 الكاتب مشاركة قام بنشر فبراير 14, 2023 السلام عليكم و رحمة الله و بركاته الاخ الاستاذ @فوزى فوزى بارك الله فيك و اشكر اهتمامك اتمنى ان اجد شرح للعمل طريقة الترحيل ملفك المرفق رائع سؤال هل بالامكان التعيدل على الكود بحيث يفتح ملف الورد بعد الترحيل ؟ و اكرر شكرك لك و أعضاء المنتدى 1 رابط هذا التعليق شارك More sharing options...
أفضل إجابة فوزى فوزى قام بنشر فبراير 16, 2023 أفضل إجابة مشاركة قام بنشر فبراير 16, 2023 والله نجحت فى تعديل على الكود ليتماشى مع ملفك ويكون شيت الورد مفتوح الترحيل من الاكسيل الى الورد.rar 2 1 رابط هذا التعليق شارك More sharing options...
محمد عدنان قام بنشر فبراير 16, 2023 الكاتب مشاركة قام بنشر فبراير 16, 2023 السلام عليكم جزاك الله كل خير اخ @فوزى فوزى و غفر الله لوالديك و ادخلهم الجنة هل بالامكان جعل الكود يعمل بتصدير الى ورد اسم معين او انا اختار ادخال معين ؟ و انا يقوم بفتح ملف الوررد الاخير بارك الله بجهدك و نفعك الله للمسلمين 1 رابط هذا التعليق شارك More sharing options...
فوزى فوزى قام بنشر فبراير 17, 2023 مشاركة قام بنشر فبراير 17, 2023 انا لست محترف فى مجال الاكسيل انما انا مدخل بيانات فقط وعندما عثرت على هذا الشيت العبقرى ارسلته اليك لتحل مشكلتك وتستفيد منه ارجو ان يوفقك الله والسلام عليكم ورحمة الله وبركاته رابط هذا التعليق شارك More sharing options...
محمد عدنان قام بنشر فبراير 17, 2023 الكاتب مشاركة قام بنشر فبراير 17, 2023 السلام عليكم الاخ @فوزى فوزى بارك الله لك و انا كذلك لست مختص بالبرمجة و عمل اكواد vba جزاك الله كل خير نرجو ان تجد شخص مختص بالموضوع بارك الله لك للجميع و جزاك الله كل خير رابط هذا التعليق شارك More sharing options...
محمد يوسف ابو يوسف قام بنشر فبراير 17, 2023 مشاركة قام بنشر فبراير 17, 2023 السلام علكيم الجزئية دي مسؤولة عن الاسم e3اما هنا تكتب الاسم في .SaveAs2 Filename:=MyPath & "\" & myBook.Sheets(MySheet).Cells(MyRow, 5) & ".doc", FileFormat:=wdFormatDocument .SaveAs2 Filename:=MyPath & "\" & myBook.Sheets(MySheet).Cells(2, 1) & ".doc", FileFormat:=wdFormatDocument في الخليه2 A يعني ممكن نكتب الاسم في عمود ِِ .Cells(2, 1) .... ورقم 2 يعني خلية رقم 2....A هنا رقم 1 يعني عمود 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.