هشام شلبى قام بنشر مايو 14, 2010 مشاركة قام بنشر مايو 14, 2010 السلام عليكم =========== احبابى واحباب المصطفى "عفاريت الاكسيل" ومعلميه. انتظر دائماالاسئلة من الاعضاء بلهف "لافوز بالثواب والدعاء" واحيانا يطول الانتظار " لكلا منا ظروفه" فقررت ان ابدأ مشروع صغير للتنشيط فقط لخروج الطاقات الكامنة والافكار المخزنة على اجهزتكم فقررت ارسال فيرس خاص اليكم جميعا " وسامحونى" بالفعل من قرأ هذه المشاركة سيصيبه الفيرس الفيرس عبارة عن فكره"وليس سؤال " ايا كان من يضعها انا او غيرى " بشرط ان يكون من واضع الفكرة عنده الاجابة "حتى لا تتعدد الافكار التى ليس لها اجابات هنا فقط الافكار التى لها اجابة من قبل واضع الفكرة" ونشارك جميعا فى الحل " اكرر ومن فضلكم الفكرة التى ستوضع يكون صاحبها عنده الحل اما باقى الاسئلة المعتادة ستكون فى مكانها الطبيعى فى مشاركات الاعضاء خارج هذه المشاركة" واتمنى ان تلقى الفكرة من احبائى القبول وسأبدأ بنفسى الفكرة كيف تصطف البيانات فى الصفوف المتتالية كما فى B1 فى مسلسل 1و2و3و4 وهكذا ثم يبدأ الصف التالى من الخلية A2 ثم يبدأ الصف التالى من الخلية A3 وهكذا ملحوظة " لا يتأخر صاحب الفكرة عن عرض الحل فى موعد اقصاه اليوم التالى لمزيد من التشويق والاثارة والسرعة فى التفكير" كما بالصورة رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر مايو 14, 2010 مشاركة قام بنشر مايو 14, 2010 السلام عليكم يا أخ هشام يا أبو الأفكار الفيروسية فكرة جميلة مما لها من أثر في تنشيط الأدمغة النايمة أيوا كدا صحصحنا يا معلم هشام إليك الملف التالي أخوكم أبو البراء Baraa_Solution.rar رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 14, 2010 الكاتب مشاركة قام بنشر مايو 14, 2010 السلام عليكم ========== الله ينور ياباشا فى انتظار مزيد من الحلول تحياتى لك ابو البراء رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر مايو 14, 2010 مشاركة قام بنشر مايو 14, 2010 هل من مزيد؟؟؟؟ شوقتنا وخلتنا ندمن الأفكار (الفيروسات)اللي إنت زرعتها بالمنتدى رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 14, 2010 الكاتب مشاركة قام بنشر مايو 14, 2010 هل من مزيد؟؟؟؟ شوقتنا وخلتنا ندمن الأفكار (الفيروسات)اللي إنت زرعتها بالمنتدى السلام عليكم =========== اخى الحبيب ابو البراء الفكرة من الموضوع الاستفادة باكثر من حل و عامل التشويق فى الانتظار حتى الغد " او بالاتفاق نجعل كل يوم فكرة جديدة" وكمان لا تنسى ان صاحب الفكرة لم يلقى بكلمته فى فكرته والموضوع كما ذكرت غير قاصر على حد معين ممكن تكون انت صاحب الفكرة القادمة "ولسه فيه كتير اوى ها يعجبك " واعدك الفكرة الثانية ستكون مفاجاة جنان فى الانتظار لحلول اخرى رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر مايو 16, 2010 مشاركة قام بنشر مايو 16, 2010 إن كنت ناسي أفكرك أخي هشام لقد وعدت بفكرة جديدة كل يوم فأين بنات أفكارك ؟اتجوزوا وسابوا البيت؟؟أما ماذا حدث لهم؟ أخوك أبو البراء رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 16, 2010 الكاتب مشاركة قام بنشر مايو 16, 2010 السلام عليكم =========== اخى ابو البراء عفوا الامتحانات والمراجعات اليك الحل ولاحقا اليوم "فكرة اليوم بعد قليل" مع انى كنت اتمنى ان يلاقى الموضوع افكارا كثيرة تجربة.rar رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 16, 2010 الكاتب مشاركة قام بنشر مايو 16, 2010 السلام عليكم =========== فكرة اليــــــــــــوم شاهد المرفق HH.rar رابط هذا التعليق شارك More sharing options...
أبوعبد الله قام بنشر مايو 16, 2010 مشاركة قام بنشر مايو 16, 2010 أخي الحبيب / هشام أولاً : أشكرك على الأفكار الجميلة المنعشة للعقول والتي نحن بحاجة ماسة ودائمة إليها . ثانياً : أعذرني على تأخري في الرد على هذه المشاركة القيمة لظروف الانشغال التي لا يخلو منها أحد . ثالثاً : أشكرك مرة أخرى على ضم هذه الفكرة تحت مظلة مشاريع المشاركات التفاعلية الجماعية المفتوحة . رابعاً :أقترح عليك تغيير عنوان المشاركة لعنوان راودني كثيراً أن أعمل عليه وهو في نفس إطار فكرتك وهو " من هنا وهناك : نافذة مفتوحة للجميع لإضافة كل جديد ومفيد وطريف في عالم الإكسيل " ، وبذلك يفهم الجميع أنه مشروع جماعي ولشارك به الجميع وليكن هناك تنافس جميل في طرح المعلومات والأفكار الجديدة في عالم الإكسيل الذي لم نصل فيه إلى قشوره . خامساً :انت تعلم أن مستواي في المعادلات بالضبط كمستواي في اللغة اليابانية ، وعلى ذلك سأجاوب بطريقة أخرى ولعل الإجابة تعجبك فتشفع لي في البعد عن الحل بالمعادلات ، وعليه : إليك حلين الأول باستخدام بمعادلة " إدمج ياعم هشام " وهي نفسها معادلة "إدمج ياعم الحاج" السابق عرضها وقمت بتغيير إسمها كمحاولة لكسب تعاطفك معي والموافقة ولو ضمنياً على الحل والحل موجود بالمرفق الأول . والحل الثاني بكود حدثي يحقق المطلوب أيضاً وهو موجودبالمرفق الثاني . أرجو أن تنال الحلول رضا الجميع وورضاك ياحضرة الناظر . مع حبي وتقديري أبو عبدالله معادلة إدمج ياعم هشام.rar دمج خاص.rar رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 16, 2010 الكاتب مشاركة قام بنشر مايو 16, 2010 السلام عليكم =========== اخى الحبيب ابو عبدالله أشكرك مرة أخرى على ضم هذه الفكرة تحت مظلة مشاريع المشاركات التفاعلية الجماعية المفتوحة . لا تنسى انك صاحب المشروع والان انت "بتلم الغلة يابختك ياعم" أعذرني على تأخري في الرد على هذه المشاركة القيمة لظروف الانشغال التي لا يخلو منها أحد . مسامحك والله "سامحتك سامحتك" أقترح عليك تغيير عنوان المشاركة لعنوان راودني كثيراً أن أعمل عليه وهو في نفس إطار فكرتك وهو " من هنا وهناك : نافذة مفتوحة للجميع لإضافة كل جديد ومفيد وطريف في عالم الإكسيل " انا موافق وانا ليس لى حق تغير العنوان غيره حضرتك "يا عم هشام" انت تعلم أن مستواي في المعادلات بالضبط كمستواي في اللغة اليابانية ياباشا انت استاذ وياااااااااما اتعلمنا منك لغات أرجو أن تنال الحلول رضا الجميع وورضاك ياحضرة الناظر . النتيجة ظهرت " هشام السعيد ناجح فى جميع المواد وله دور ثانى فى اللغة اليابانية" اخى الحبيب هذا هو الهدف المنشود البحث عن حلول وفى النهاية يقول صاحب الفكرة كلمته والتى من المفروووض ان لا يضع الفكرة الا وعنده الحل لان هناك مهلة والمهلة هنا بهدف التشويق والاثارة والسرعة فى الحل بخصوص الحل طبعا رائع " ولكن انا عندى حل تانى ربنا يستر وما حدش يحرقهولى ساعرضه فى المساء مع فكرة جديدة وستكون مبهرررررررررررررة" فانتظرونى رابط هذا التعليق شارك More sharing options...
امان قام بنشر مايو 16, 2010 مشاركة قام بنشر مايو 16, 2010 السلام عليكم ورحمة الله اشكر استاذنا هشام على الموضوع الجميل مرفق ملف قد يقوم بنفس النتيجة والله اعلم hh.rar رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 16, 2010 الكاتب مشاركة قام بنشر مايو 16, 2010 السلام عليكم =========== استاذ امان بجد بجد فكرتك روعة بس لى تنبية بسيط للاخوة عند استخدام معادلتك وهو " فى نهاية كل كلمة فى الخلية يجب عمل مسطرة" واتمنى ان اراك كثيرا واتمنى ان تطرح علينا فكرة قريباولكن" ملتزما بفواعد نشر الافكار فى بداية المشاركة حفاظا علينا من الصدمات الدماغية" رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 16, 2010 الكاتب مشاركة قام بنشر مايو 16, 2010 (معدل) السلام عليكم =========== اليكم حل فكرة اليوم" الفكرة الثانية" وهى لا تختلف كثيرا عن فكرة اخى عبدالله والفكرة استخدام دالة "TextGlue" وهى من النوع UDF شاهد المرفق دوالى21.rar تم تعديل مايو 16, 2010 بواسطه هشام شلبى رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 16, 2010 الكاتب مشاركة قام بنشر مايو 16, 2010 السلام عليكم ============ فكرة اليــــــــوم " الفكرة الثالثة" الساعة قربت على الثانية عشر ولا احد اضاف اى فكرة "من حقى ان اضيف" شاهدوا المرفق "فكرة هايلة" 1111111.rar رابط هذا التعليق شارك More sharing options...
أبوعبد الله قام بنشر مايو 17, 2010 مشاركة قام بنشر مايو 17, 2010 أخي الحبيب / هشام اتفضل الإجابة ياحضرة الناظر . تحياتي أبو عبدالله HESHAM-2.rar رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 17, 2010 الكاتب مشاركة قام بنشر مايو 17, 2010 السلام عليكم =========== اخى الحبيب ابو عبدالله ماشاء الله ولا حول ولا قوة الا بالله اجابات نموذجية ويبقى حالتان اثنتان للقضاء على مااسميه القضاء "المنسدلة فى كل الاتجاهات" سنعرضها فى الفكرة القادمة ان شاء الله لنكمل سويا Drop-down list Validation فى انتظار حلول جديد من اخوانى " بارك الله فيكم" رابط هذا التعليق شارك More sharing options...
الجزيرة قام بنشر مايو 17, 2010 مشاركة قام بنشر مايو 17, 2010 أفكار جميلة راح تغير في تكتيك بيل غيتس : ) رابط هذا التعليق شارك More sharing options...
يحيى حسين قام بنشر مايو 17, 2010 مشاركة قام بنشر مايو 17, 2010 السلام عليكم و رحمة الله و بركاته فكرة رائعة اخي هشام و بخصوص القائمة المنسدلة و على نفس ملف أخي ابو عبدالله أتمنى أن تكون هذه الأكواد جزء من طلبكم للحصول على النتائج بصورة افقية في الصف رقم 1 Private Sub Worksheet_Change(ByVal Target As Range) Dim LastC As Long If Target.Address <> "$A$1" Then Exit Sub LastC = Cells(1, Columns.Count).End(xlToLeft).Column Cells(1, LastC + 1).Value = Range("a1").Value End Sub و للحصول على القيم بشكل عامودي هذا الكود Private Sub Worksheet_Change(ByVal Target As Range) Dim LastR As Long If Target.Address <> "$A$1" Then Exit Sub LastR = Range("b" & Rows.Count).End(xlUp).Row Range("b" & LastR + 1).Value = Range("a1").Value End Sub و للحصول على القيم بشكل مدمج في الخلية المجاورة للقائمة المنسدلة هذا الكود Private Sub Worksheet_Change(ByVal Target As Range) Dim LastC As Long If Target.Address <> "$A$1" Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value & " , " & Target.Value End Sub =============== و دمتم في حفظ الله رابط هذا التعليق شارك More sharing options...
يحيى حسين قام بنشر مايو 17, 2010 مشاركة قام بنشر مايو 17, 2010 السلام عليكم و رحمة الله عذراً على العودة خطوة للوراء بخصوص الحالة الثانية Sub Excel4Us() Dim LastR As Long, cll As Range LastR = Range("a" & Rows.Count).End(xlUp).Row For Each cll In Range("a1:a" & LastR) Range("b1").Value = Range("b1").Value & " " & cll.Value Next cll End Sub أتمنى أن يفي هذا الكود بالغرض ============== دمتم في حفظ الله رابط هذا التعليق شارك More sharing options...
سالم شباني قام بنشر مايو 17, 2010 مشاركة قام بنشر مايو 17, 2010 السلام عليكم بكل صراحة ليس لي بد إلا أن أجلس معتدلا كما يفعل التلميذ النبيه لمتابعة هذه الأفكار النيرة التي استفزت بعضا من خلايا مخي النائمة وبعد عدة محاولات وبالإعتماد على ما ادخرنا من أكواد قمت بهذه الخربشة البسيطة لأنني شعرت بالتقصير وحتى لا أتهم بالخمول والكسل أرجو أن تقبلوا مني هذه المساهمة لكم مني كل المودة والتقدير من هنا وهناك.rar رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر مايو 17, 2010 مشاركة قام بنشر مايو 17, 2010 اخي هشام شلبي احيك بشدة لهذه البادرة المنعشة للعقول واخراج الابداعات الساكنة لدى الاعضاء واسمح لي المشاركة بهذه الفعالية واول مشاركة لي ستكون بالقائمة المسندلة الافقية مرفق ملف يحتوى الحل ويحتوي على اقصر كود استخدمته في حياتي اخوك عماد الحسامي الحسامي.rar رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 17, 2010 الكاتب مشاركة قام بنشر مايو 17, 2010 (معدل) السلام عليكم =========== اخى يحيى بارك الله فيك وهكذا اصاب الفيرس جهازك وبالكاد اخرج "نونو"فكرة فى انتظارك اخى سالم ماشاء الله فكرة رائعة اخى ابو عبدالله " الجزيرة" فى انتظار افكارك حبيى عماد ماشاء الله عليك "خلص الكلام وعجز اللسان عن القول وعن الحل " وبقى حالة واحدة للانتهاء من القائمة المنسدلة فى جميع الاتجاهات "فى المرفق الحالة الاخيرة الباقية" HH.rar تم تعديل مايو 17, 2010 بواسطه هشام شلبى رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر مايو 17, 2010 الكاتب مشاركة قام بنشر مايو 17, 2010 السلام عليكم =========== فكرة اليوم"الفكرة الرابعة" الفكرة هذه المرة مختلفة " هذه المرة الفكرة مرفقة فى ملف ومحلولة" واريد احسن تطوير للفكرة واحسن تصميم " فقط اضغط على الرقم الموجود داخل الملف وراقب ما يحدث" وفقكم الله نسخة من Xl0000001.rar رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر مايو 17, 2010 مشاركة قام بنشر مايو 17, 2010 فكرة ممتازة جدا اخي هشام وهذا ملف معدل عسى ان ينال الاعجاب hosami1.rar رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر مايو 18, 2010 مشاركة قام بنشر مايو 18, 2010 اخواني الاحباء استكمالا لموضوع القائمة المنسدلة هذه تطبيق لفكرة اتجاهات القائمة المنسدلة وتشمل 8 اتجاهات لليمين لليسار للاسفل للاعلى افقي اعلى يمين افقي اعلى يسار افقي اسفل يمين افقي اسفل يسار قائمة منسدلة ب8اتجاهات.rar 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان