الصـقر

اخوتى فى هذا الصرح العلمى الكبير اعتذر لكل الاعضاء بالمنتدى عن كل شئ سئ صدر منى فى اى وقت وفى اى ظرف منذ اشتراكى فى هذا الصرح بتاريخ 26-4-2014م والى اخر مشاركة لى بالمنتدى الان بما فيهم الاخ العرب نت فلكل شئ بدايه ونهايه اسال الله تعالى لكم التوفيق والسداد وكل عام وانتم بخير بحلول رمضان المبارك واتمنى لا تنسونا من صالح دعائكم لى بالهديه فأنا احوج ما يكون لها تقبلوا جميعا تحياتى وحبى وتقديرى لكل عضو بالمنتدى منذ نشأته

السلام عليكم اخى الكريم الاستاذ عبدالسلام ابوالعوافى ما شاء الله عليك روعه ملاحظ نشاطك واعملك كلها روعه تنم عن شخص محترف ارجوا من اداره الموقع والقائمين عليه أعطاء الاستاذ عبدالسلام قدره فأنزلو الناس منازلهم فالشمس لا تحتاج الى تليسكوب واعماله اصبحت مثل ضوء الشمس ساطعه بالمنتدى ارجوا من ابوالبراء الاهتمام بالامر تقبلوا جميعا تحياتى

اخى وحبيبى فى الله واستاذى الكبير ابوالبراء يعلم الله كم احبك فى الله وأسال الله تعالى ان يستظلنا بعرشه يوم لاظل الا ظله والله انا لا صاحب عقليه ولا شئ انا زى اللى بيجرب حظه مره تصيب ومره تخيب ههههههههههه تسلم يا غالى على مرورك العطر وكلمات الطيبه وبلغى سلامى للبراء - اتصلت بيك من يومين جوالك كان مغلق المهم هبقى اتصل بيك علشان عايز اسلم على البراء ومريم تقبل تحياتى

الاخت الفاضله بخصوص طلبك الاول زر التبديل جربى تغير اتجاه الفورم وذالك بالدخول الى شاشة الخصائص للفورم رقم 2 ومن الخاصيه Right to left غيريها من False الى True ---- وبخصوص طلبك الثانى والثالث جربى المرفق هل هو طلبك تقبل تحياتى نسخة من الهنوف.zip

وفيك بارك اخى الحبيب ابو سليمان منور الموضوع ---------------------------------------- اخى الكريم ابو حماده انظر انت الى المعادله المطلوب كما طلبت هو ما تم فعله علشان اريحك قولا واحد اختر اى رقم جلوس فى الخليه وشاهد النتيجة وافتح الفورم واكتب نفس رقم الجلوس وشوف النتيجة ستجدها واحده بأعتذر منك لاستكمال الموضوع معك واذا كان حد من الاساتذه الافاضل فاهم شئ يكمل معك تقبل تحياتى

اخى الكريم والله انا بحاول فهم طلبك واخير فهمته بصعوبه وذالك لان الطلب غريب كيف يكون للطالب الواحد اكثر من درجه !!!! المهم بدون دخول فى تفاصيل جرب المرفق هل هو ما تريد تقبل تحياتى تحويل المعادلة الى كود.zip

بسم الله الرحمن الرحيم " وَذَا النُّونِ إِذ ذَّهَبَ مُغَاضِبًا فَظَنَّ أَن لَّن نَّقْدِرَ عَلَيْهِ فَنَادَىٰ فِي الظُّلُمَاتِ أَن لَّا إِلَٰهَ إِلَّا أَنتَ سُبْحَانَكَ إِنِّي كُنتُ مِنَ الظَّالِمِينَ (87) فَاسْتَجَبْنَا لَهُ وَنَجَّيْنَاهُ مِنَ الْغَمِّ ۚ وَكَذَٰلِكَ نُنجِي الْمُؤْمِنِينَ (88)" سورة الانبياء فإن لقول العبد: "لا إله إلا أنت سبحانك إني كنت من الظالمين" فضلًا عظيمًا وخيرًا كثيرًا؛ فقد قال رسول الله صلى الله عليه وسلم: دَعْوَةُ ذِي النُّونِ إِذْ دَعَا وَهُوَ فِي بَطْنِ الْحُوتِ لَا إِلَهَ إِلَّا أَنْتَ سُبْحَانَكَ، إِنِّي كُنْتُ مِنَ الظَّالِمِينَ، إِنَّهُ لَمْ يَدْعُ بِهَا مُسْلِمٌ فِي شَيْءٍ قَطُّ إِلَّا اسْتَجَابَ اللَّهُ لَهُ بِهَا. رواه أحمد في المسند, والحاكم في المستدرك وغيرهما, وصححه تفضل اخى الكريم الحل من خلال الفورم مباشرة تقبل تحياتى تحويل المعادلة الى كود.zip

جزاكم الله خيرا اخى الحبيب محمد الريفى تقبل تحياتى

تفضل الكود Sub abd() Application.ScreenUpdating = False For Each f In Range("d2:d10000") If f <> "" Then x = f.Value Union(Range(f.Offset(0, -3), f.Offset(0, -1)), Range(f.Offset(0, 1), f.Offset(0, 1))).Copy ir = Sheets(x).Range("a" & Rows.Count).End(xlUp).Row Sheets(x).Range("a" & ir + 1).PasteSpecial xlPasteValues Range(f.Offset(0, 2), f.Offset(0, 2)).Copy Sheets(x).Range("f" & ir + 1).PasteSpecial xlPasteValues End If Next f Application.CutCopyMode = False Range("a2:f100000").ClearContents Sheets(1).Activate Application.ScreenUpdating = True End Sub تقبل تحياتى

اخى الكريم على حسب فهمى لطلبك ولو انك برأى مصعب الامور على نفسك المهم ادخل على الموديول رقم 3 استبدل الكود الموجود بالتالى Sub abd() Application.ScreenUpdating = False For Each f In Range("d2:d10000") If f <> "" Then x = f.Value Union(Range(f.Offset(0, -3), f.Offset(0, -1)), Range(f.Offset(0, 1), f.Offset(0, 1))).Copy ir = Sheets(x).Range("a" & Rows.Count).End(xlUp).Row Sheets(x).Range("a" & ir + 1).PasteSpecial xlPasteValues Range(f.Offset(0, 2), f.Offset(0, 2)).Copy Sheets(x).Range("f" & ir + 1).PasteSpecial xlPasteValues End If Next f Sheets(1).Activate Application.CutCopyMode = False Application.ScreenUpdating = True End Sub تقبل تحياتى

والله منور يا ابوحنين حلول رائعه والاروع عودة الاسم ابوحنين منور المنتدى ربنا يباركلك يارب فى حنين تقبل تحياتى

اخى الكريم انس أهنئك بهذا العمل اللى اكيد هيكون روعه ويسعدنى اكون اول المهنئين جزاكم الله خيرا والى الامام دائما تقبل تحياتى

اخى الكريم جلال مشكور على مرورك الكريم تقبل تحياتى

استاذى الفاضل ابوحنين مرورع هو الاروع بالنسبه لابوالبراء ربنا مديله شويه طاقه وقوة وصحه فبيفترى على الابواب ههههههههههههههههههه معندوش صبر الاخ الحبيب عبدالعزيز جزاكم الله خيرا اخى الكريم تقبلوا جميعا تحياتى

هبعتلك نجار يزيته تسلم يا غالى ربنا ما يحرمنا منك تقبل تحياتى

حبيبى يا ابوالبراء بلاش تواضع وما العبد الا قطره فى بحر علمكم اللى مغرقنا بفيضانه هههههههههههه الاروع هو مرورك يا غالى كويس انه اشتغل معاك مش زى المرفق السابق لم يعمل تقبل تحياتى

جزاكم الله خيرا ابايوسف دائما سباق للخير شاكر مرورك العطر تقبل تحياتى

الاخوة الكرام واساتذتى فى هذا الصرح العلمى أستكمالا لهذا الموضوع على الرابط التالى أقدم لكم اليوم مؤثر حركى جديد لفتح الفورم على طريقة أفتح الشباك الباسورد لفتح الفورم هو 111 أرجو ان ينال أعجابكم تقبلوا جميعا تحياتى مؤثرات الفورم من خلال فتح الشباك - الصقر.zip

والله سجلت لك فيديو وبعدين ضغطته ورفعته لك فى المرفقات هههههههههههه هو موصلش والا انا بيتهيألى طيب انت جربت المرفق قبل الاخير ياريت احد من الاخوة اللى جربو يفيدونا جزاكم الله خيرا تقبل تحياتى

اخى الفاضل الاستاذ محى الدين جزاكم الله خيرا على مروركم الرائع ----------------------------------------------- الاخ الحبيب ياسر انا اول مره اشوف فورم على شكل معين او مثلث الفورم معروف انه مستطيل او مربع عموما انا سجلت فيديو بالمرفقات هتلاقيه بس مش عارف هيشتغل او لا عموما جرب ------------------------------------------- استاذى الحبيب ابوحنين جزاكم الله خيرا لمروركم العطر وان شاء الله نطور الافكار فى عمل حاليا بجهز له ان شاء الله فور الانتهاء ارفعه تقبلوا جميعا تحياتى capture-2.zip

اخى وحبيبى فى الله عبدالعزيز ما اروع اعمالك واطلالتك بصراحه روعه روعه روعه حتى التصميم روعه جزاكم الله خيرا واسمح لى ان استغل الفرصه وارحب بأستاذى الفاضل ابوحنين ( ابومحمد الامين ) عوده حميده لنا اخا فى الله ننتفعك بك فأنت علم من أعلام الاكسيل ( على فكره انا لسه عارف من يومين انك ابو حنين فلى رجاء عندك وده اول طلبه منك ياريت تفتح اليوزر الاصلى بتاعك ولو ناسى الباسورد ممكن تكلم الاستاذ محمد طاهر انت عارف ليه لان ابوحنين ماركة مسجله فى خبراء الاكسيل لا تتصور مدى فرحتى بوجودك وأسال الله تعالى ان يكون جميع اساتذتنا بخير ويعودو لنا فى القريب العاجل مش عايز اذكر اسماء حتى لا انسى أحد وأخيرا انا بهنى نفسى والمنتدى بوجودك معنا اخأ فى الله ومعلما فاضلا تقبل تحياتى

اخى الحبيب عبدالعزيز أعزك الله فى الدنيا والاخره وانت والله ليك وحشه يعلم الله ما فى قلبى اتجاهك اسال الله رب العرش العظيم ان يمن عليك بنعمة الصحه والعافيه تقبل تحياتى -------------------------------------- جزاكم الله خيرا يا ابوعبد الرحمن وفيك بارك ------------------------------------------------------------ جزاكم الله خيرا يا استاذ قصى اسعدنى مرورك الكريم ----------------------------------------------------------- يا عبدالتواب انا متعود اقفل كل باب طالما فتحته بس انت عارف الجو صيف وحر غلق الابواب وحش لكن لو عايز تقفل الباب يا عبدالتواب اضغط على نفس الزر هيرجع الباب ثم يختفى اليوزرفورمين نهائيا ده رفع المرفق مره تانيه مع اضافة سطر صغير جدا هتلاحظه لو راجعة الكود هو مش مرتبط بموضوع غلق الباب هو مرتبط بموضوع عدم تكرار فتح الباب تقبل تحياتى مؤثرات فتح الفورم على طريقة فتح الباب.zip

الاخت الفاضله يرجى رفع الملف للعمل عليه تقبل تحياتى

استاذى الفاضل أبويوسف الاروع هو مرورك العطر على فكره جاء فى بالى دلوقتى ان كان ممكن اعملها بفورم واحد من خلال ليبل هتكون اشيك ان شاء الله هنفذها وارفع بالمنتدى بأذن الله تقبل تحياتى

الاخوة الكرام واساتذتى فى هذا الصرح العلمى أستكمالا لهذا الموضوع على الرابط التالى أقدم لكم اليوم مؤثر حركى جديد لفتح الفورم على طريقة أفتح الباب يا سمسم بس ياريت ياأبوالبراء لو فتحت الباب وكان فى حد بالحمام تقفل الباب تانى تستنا لحد ما يرجع طنطا أرجو ان ينال أعجابكم تقبلوا جميعا تحياتى مؤثرات فتح الفورم على طريقة فتح الباب.zip