الـعيدروس قام بنشر مايو 24, 2011 قام بنشر مايو 24, 2011 السلام عليكم كود لنسخ من الاكسل وفتح ملف ورد جديد ولصقها فيه على حسب المدى الي تحدده انت في الكود اليكم الكود Sub proWord() Dim varDoc As Object Set varDoc = CreateObject("Word.Application") varDoc.Visible = True Sheets("ورقة1").Range("A1:f20").Copy varDoc.documents.Add varDoc.Selection.Paste varDoc.activedocument.SaveAs ThisWorkbook.Path & "/" & "testWord.doc" Application.CutCopyMode = False End Sub
الـعيدروس قام بنشر مايو 25, 2011 الكاتب قام بنشر مايو 25, 2011 الاخ الفاضل خالد مشكور على مرورك العطر انشاء الله تكون استفدت من الكود والسلام عليكم
احمد فضيله قام بنشر مايو 25, 2011 قام بنشر مايو 25, 2011 السلام عليكم و رحمة الله وبركاته الاخ العزيز / ابو نصار بارك الله فيك و جزاك كل خير عمل جميل . تسلم يداك و السلام عليكم و رحمة الله وبركاته
الـعيدروس قام بنشر مايو 26, 2011 الكاتب قام بنشر مايو 26, 2011 الاستاذ القدير هانكوك مشكورعلى مرورك العطر والسلام عليكم ورحمة الله وبركاته
عادل حنفي قام بنشر مايو 28, 2011 قام بنشر مايو 28, 2011 السلم عليكم اخي alidroos بارك الله فيك و في انتظار المزيد تحياتي
الـعيدروس قام بنشر مايو 28, 2011 الكاتب قام بنشر مايو 28, 2011 السلام عليكم شرف كبير مرور احد عباقرة الصرح الكبير ومن من استفدت من طرحه الكثير والكثير الاستاذ القدير عادل حنفي اسعدني مرورك على الموضوع والسلام عليكم
القومي قام بنشر مايو 29, 2011 قام بنشر مايو 29, 2011 شكرا لك وشكر لهذا المنتدى العظيم تعليمى رائع بل اكثر من رائع
MsTaNs قام بنشر يوليو 17, 2013 قام بنشر يوليو 17, 2013 مشكور جدا على الكود بس لي رغبه في الاستفاده من الكود حيث اوريد تغييره لكي يقوم بلصق مدى معين ثم ينتقل لصفحة اخرى في الاكسل وينسخ مدى معين ويقوم بلصقة في نفس الملف لدي ملفات اكسل فيها 3000 صفحة واريد ان اكون منها تقارير في الوورد واهم شي فيها الجداول وبعض النصوص التي ينتجها ملف الاكسل واريد تحويلها للورد مباشره ولدي خبره في كتابة الاكواد لكن اريد هذي الجزئية شكرا لك مقدما
محمد ابو البـراء قام بنشر يوليو 17, 2013 قام بنشر يوليو 17, 2013 مشكور استاذ / عباد تسلم يداك وجزاك الله خيراً :fff:
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.