احمد صابر قام بنشر يونيو 13, 2011 قام بنشر يونيو 13, 2011 Sub Macro4() ' ' Macro4 Macro ' ' Keyboard Shortcut: Ctrl+Shift+X ' Range("B6").Select Selection.Copy Sheets("2").Select Range("B2").Select ActiveSheet.Paste Sheets("1").Select Range("C6").Select Application.CutCopyMode = False Selection.Copy Sheets("2").Select Range("C2").Select ActiveSheet.Paste Sheets("1").Select Range("D6").Select Application.CutCopyMode = False Selection.Copy Sheets("2").Select Range("D2").Select ActiveSheet.Paste Sheets("1").Select Range("E6").Select Application.CutCopyMode = False Selection.Copy Sheets("2").Select Range("E2").Select ActiveSheet.Paste Sheets("1").Select Range("F6").Select Application.CutCopyMode = False Selection.Copy Range("B28:D28").Select Sheets("2").Select Range("F2").Select ActiveSheet.Paste Sheets("1").Select End Sub ياجماعة الخير ده كود ترحيل بس لازم شوية مساعده كنت طرحت نفس الموضوع من فتره لاكن ملقيتش جواب ممكن الموضوع صعب بالدوال فحاولت وعملتو بالكود بس بردو ملقيتش طريقه سهله بالكود فمعظم الطرق تقوم بالترحيل عمود كامل او صف كامل او نطاق كامل لاكن انا مشكلتي غير انا عاوز انقل خلايه متباعد في صفحه معينه لتستقر في صف واحد في الصفحه الثانيه والسبب بسيط انا عاوز كل نموزج اقوم بطباعتو يتم ارشفته قبال الطباعه طيب ايه المشكله السئوال الولبي //. عوزين نضيف في الكود ان كل مره برحل فيه يتم ترحيل الي صف جديد لاكن المشكله عندي لما برحل بيرحل علي نفس الصف ياهل تري هناك حل مع العلم اني بتعامل يومياً مع حوالي 34 نموزج مختلف لشؤون العاملين بالشركة التي اعمل به جديد الوادي الاخضر.rar
عبد الفتاح كيرة قام بنشر يونيو 13, 2011 قام بنشر يونيو 13, 2011 لم أفهم المطلوب تماما جرب هذا المرفق جديد الوادي الاخضر-kemas.rar
عادل حنفي قام بنشر يونيو 14, 2011 قام بنشر يونيو 14, 2011 السلام عليكم اخي KAKAMAX نحن نحاول ان نحل مشكلتك ليس من اجل ي شيئ الا لنعبر لك انه لا افضليه في طلب احد علي اخر و بالرغم من ذلك انت لا تساعدنا و لكني وجدت الحل في ذلك لان ما يدور بداخلك اصبح منعكس علي رددنا و فهمنا لما تطلبه الحل هو اولا خد نفس عميق و اخرج من زهنك انك لن تفيد او تستفاد فليس بكبر حجم ما تقدمه تفيد و لكن بتركيزه وحداثته و كذلك طريقة ايصال معلومته للاخرين و شيل من دماغك انه يتم النظر اليك في انك لكي تاخذ يجب ان تعطي فهذا شيئ غير وارد بالمره ثانيا يجب ان يكون طلبك محدد وواضح فلا تطلب برنامج كامل مثلا و لكن يجب ان يكون عمل لك و تحتاج مساعدة لتكملته او معلومه تحتاجها او اي شيئ من هذا القبيل ثالثا ارفاق مثال موضحا عليه ما تريد عمله بالضبط يعني مثلا بمعني الشيت كذا عند الضغط علي زر ترحيل فانه يتم ترحيل الخلية كذا الي الخلايا كذاو كذا في الشيت كذا لتكون لالشكل كذا و هكذا لباقي الصفوف طبعا انا بطبق اللي بقوله علي مثالك المرفق و بدلا من ان اضيع و غيري الوقت في محاولة فهم لموضعك ثم تجد الردود الغير صحيحة ستجد الرد اقرب شيئ لما تريده و هنا تكون السرعة ايضا لذا ارفق مثالك موضحا فيه ما تريده بالضبط و بتركيز و اعتبر نفسك من يقرأ سؤالك و لا تعتبر الاخرين ملمين با يدور في راسك فان فهمت السؤال حتما سيفهمه غيرك في انتظار طلبك با النيو لوك الجديد لك تحياتي
احمد صابر قام بنشر يونيو 14, 2011 الكاتب قام بنشر يونيو 14, 2011 الاخ الفاضل الكريمKemas هذا هوالمرفق به توضيح اكثر اسف ان كان الشرح مش واضح بقول في الشرح الاول للمشكله نفس الي انتا اضفتو علي الملف ان الميكرو بترحيل عمود كامل او صف كامل او نطاق معين الحمد لله عملة كود للميكرو بحيث ينسخ خلايه متفرقه في صفحة سميته ( Sheet1) ويرحله الي صفح (2 ) المشكله اني عاوز اضيف صيخه في الكود بحيث في كل مره يتم الترحيل علي صف جديد جديد الوادي الاخضر-kemas1.rar
احمد صابر قام بنشر يونيو 14, 2011 الكاتب قام بنشر يونيو 14, 2011 السيد الفاضل المحترم الموقر المشرف (AAH) السلام عليكم اخي KAKAMAX نحن نحاول ان نحل مشكلتك ليس من اجل ي شيئ الا لنعبر لك انه لا افضليه في طلب احد علي اخر الاخ المشرف ما هو اي شي و بالرغم من ذلك انت لا تساعدنا و لكني وجدت الحل في ذلك لان ما يدور بداخلك اصبح منعكس علي رددنا و فهمنا لما تطلبه كيف اساعدك وما هي الطريقة الحل هو اولا خد نفس عميق و اخرج من زهنك انك لن تفيد او تستفاد الحمد لله اخت نفس عميق فليس بكبر حجم ما تقدمه تفيد و لكن بتركيزه وحداثته و كذلك العزيز الغالي لقد زكرة في موضوعي انه لا يلزم ان تكون المعلومه جديده او كبير ليستفاد منع البعض ممكن ترجع وتقرا الموضوع جيداً طريقة ايصال معلومته للاخرين و شيل من دماغك انه يتم النظر اليك في انك لكي تاخذ يجب ان تعطي فهذا شيئ غير وارد بالمره اخي انا لااعطي شي لست بانظار شي الموضوع عباره عن مشاركه في الافكار فقط ثانيا يجب ان يكون طلبك محدد وواضح فلا تطلب برنامج كامل مثلا و لكن العزيز الغالي انا لااطلب برنامج بعينه ففي جميع انحا الشبكة العنكبوتيه جميع انواع البرامج انا بطلب سطر في كود لان كل شخص ادرا بمسئوليتة وعمله فعمل غيري يختلف عن عملي والعكس يجب ان يكون عمل لك و تحتاج مساعدة لتكملته او معلومه تحتاجها او اي شيئ من هذا القبيل اخي لوفتحة الملف المرفق لوهله ستعرف انهو عملي لاكن انا برفع سمبل فقط للشرح عليه ثالثا ارفاق مثال موضحا عليه ما تريد عمله بالضبط يعني مثلا بمعني الشيت كذا عند الضغط علي اخي العزيز الغالي مرفق الملف وبه شرح لما اريد انا لااريد كود كامل اريد سطر بيقول يتم ترحيل نفس الكود في كل مره في صف جديد زر ترحيل فانه يتم ترحيل الخلية كذا الي الخلايا كذاو كذا في الشيت كذا لتكون لالشكل كذا و هكذا لباقي الصفوف طبعا انا بطبق اللي بقوله علي مثالك المرفق و بدلا من ان اضيع و غيري الوقت في محاولة فهم لموضعك ثم تجد الردود الغير صحيحة ستجد الرد اقرب شيئ استاذي العزيز الغالي لاتضيع وقتك او تهدره كماذكرة مسبقا الموضوع مطروح للرد او عدم الرد لما تريده و هنا تكون السرعة ايضا لذا ارفق مثالك موضحا فيه ما تريده بالضبط و بتركيز ان شاء الله هركز اكتر من كده المره القادمه و اعتبر نفسك من يقرأ سؤالك و لا تعتبر الاخرين ملمين با يدور في راسك فان فهمت السؤال حتما سيفهمه غيرك في انتظار طلبك با النيو لوك الجديد لك تحياتي اخي العزيز والله انا ماطرحة اي موضوع للتفاخر او الكبر او لتبادل المنفعة كم تعتقد الحوار كله عباره طرح الرائي وزيادة المعرفة
احمد صابر قام بنشر يونيو 14, 2011 الكاتب قام بنشر يونيو 14, 2011 الاستاذ العزيز الغالي aah_aah2008 بعد السلام عليك وبعد انتظار وتعب شديد والمهم ( اخز نفس عميققققققققققققققققققققققق) الحمد لله والشكر لله وجدت حل المعادله الصعبه والله باجتهادي الشخصي خالص 100% هذا بسبب دفعتك للامام الموضوع سهل مرهههههههههه جداً اكثر مما كنت اتخيل ؟؟؟ بدل مرحل البيانات في صفحة الارشيف لتحت هنرحل لفوق بس الحل كده مش عاوز اي معضله وان شاء الله نكون عند حسن ظن المشرف ( جاري رفع المرفقات )
عادل حنفي قام بنشر يونيو 14, 2011 قام بنشر يونيو 14, 2011 السلام عليكم اخي لست ادري هل العيب عندي في توصيل المعلومه ام ماذا المختصر انك طلبت طلبا و وجهت لنا لوما لعدم الرد و لن ادخل في نقاش ثانية فيحمل كلامي المعني الخطأ و عند النظر في طلبك لم افهمه كما رايت احد الاعضاء ايضا لم يفهمه و كنا نريد حل موضوعك حتي لا تعتقد كما ذكرت انت بما معناه انه تم اهمال طلبك فاردت ابداء حسن النيه من تجاهنا و الطريقة المثلي لتجد ردا سريعا علي طلبك لا ان تفنط الكلام و يرد عليه جزء جزء و كانني اوجه اليك شيئا القصد خد الموضوع ببساطة و دع الايام تثبت لك فانت تتعلم و نحن ايضا تحياتي
عادل حنفي قام بنشر يونيو 14, 2011 قام بنشر يونيو 14, 2011 السلام عليكم اخي KAKAMAX الاستاذ العزيز الغالي aah_aah2008 بعد السلام عليك وبعد انتظار وتعب شديد والمهم ( اخز نفس عميققققققققققققققققققققققق) الحمد لله والشكر لله وجدت حل المعادله الصعبه والله باجتهادي الشخصي خالص 100% هذا بسبب دفعتك للامام الموضوع سهل مرهههههههههه جداً اكثر مما كنت اتخيل ؟؟؟ بدل مرحل البيانات في صفحة الارشيف لتحت هنرحل لفوق بس الحل كده مش عاوز اي معضله وان شاء الله نكون عند حسن ظن المشرف ( جاري رفع المرفقات ) اولا الحمد لله و انا فرح لانه بمجهودك لان ما يكون بمجهودك لن تنساه ابدا و علي فكره احساسي بكلامك المره دي انك اخذت نفس عميق و ان شاء الله نستفيد منك و تستفيد منا و مرحبا بك بيننا تحياتي
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.