إبراهيم ابوليله

السلام عليكم ورحمة الله وبركاته اخى طاهر تم التعديل ارجو تجربة المرفق جيدا تقبل تحياتى جمعية خيرية2.rar

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

بسم الله الرحمن الرحيم والصلاة والسلام على اشرف المرسلين سيدنا محمد صلى الله عليه وسلم كل الشكر والتقدير والاحترام لعمالقة المنتدى والاساتذه الافاضل سيتم هنا عرض بعض الاكواد التى يتم استخدامها فى الفورم مع التيكست بوكس ....................................... اود ان اذكر حضراتكم باننا قد تناولنا فيما سبق اولا -- سيتم التعرف على كيفيه الترحيل من التيكست بوكس الى الشيت http://www.officena.net/ib/index.php?showtopic=49561&page=1 ثانيا-- سيتم التعرف على كيفيه الترحيل من التيكست بوكس الى مجموعه من الخلايا فى شيت الاكسيل http://www.officena.net/ib/index.php?showtopic=49561&page=1 ثالثا--التعرف على كيفيه استدعاء البيانات من شيت الاكسيل الى التكست بوكس http://www.officena.net/ib/index.php?showtopic=49561&page=1 رابعا--التعرف على كيفيه ترحيل البيانات من مجموعه من التيكست بوكس الى شيت الاكسيل http://www.officena.net/ib/index.php?showtopic=49561&page=1 خامسا--التعرف على كيفيه ترحيل البيانات من مجموعه من التيكست بوكس الى شيت الاكسيل أفقيا http://www.officena.net/ib/index.php?showtopic=49561&page=2 سادسا--التعرف على كيفيه تقيد الادخال فى التيكست بوكس http://www.officena.net/ib/index.php?showtopic=49561&page=2 سابعا--التعرف على بعض القيود الخاصه بادخال التواريخ فى التيكست بوكس http://www.officena.net/ib/index.php?showtopic=49561&page=3 ثامنا--التعرف على بعض الاكواد الخاصه بالعمليات الحسابيه فى التيكست بوكس http://www.officena.net/ib/index.php?showtopic=49561&page=3 تاسعا--جلب بيانات من الشيت الى التيكست http://www.officena.net/ib/index.php?showtopic=49561&page=4 اليوم سوف يتم استكمال باقى الموضوع ان شاء الله عاشرا:--ترحيل مجموعه من التيكست الى الشيت غالبا حينما نستخدم الفورم لادخال البيانات يكون لدينا العديد من التكست بوكس التى نريد ترحيل بياناتها الى الشيت وبالاخص حينما تكون هذه التيكست على شكل صفوف فى هذا المثال سوف نتاول اكثر من طريقه لعمل ذلك ارجو النظر الى المرفق تقبلو تحياتى

السلام عليكم ورحمة الله وبركاته اخى محمد ممكن التوضيح اكثر

اخى لك منى دعوه طيبه لتغير اسم الظهور ليصبح باللغه العربيه التزاما بقواعد المنتدى راجع الرابط التالى ستجد فيه ما تريد http://www.officena.net/ib/index.php?s=28eccdc7c77ee95489991aaf76706d0e&showtopic=55361&page=1 وايضا الرابط الاتى http://www.officena.net/ib/index.php?showtopic=55762&hl=

اخى حسام كل عام وانت والامه المسلمه كلها بخير بارك الله فيك وجعلك سباقا فى الخير تقبل تحياتى

اخى طاهر للمره الثانيه ارجو ان تسامحنى تفضل جمعية خيرية2.rar

اخى ياسر ملف فى غاية الروعه مشكورا عليه بارك الله فيك

السلام عليكم ورحمة الله وبركاته اخى ابو جيداء السطر التالى 'Me.Label6 = Me.ListBox1.Column(3) ليس له علاقه بعمل الكود اما بخصوص X = Me.ListBox2.Column(3 X متغير تم تعريفه على انه عباره عن قيمه العمود رقم 4 فى الليست بوكس علما بان اعمده الليست بوكس تبدأ بالعمود رقم 0 لذلك تم الاشاره الى العمود الرابع فى الليست بوكس بالرقم 3 لاحظ انه تم اضافة سطر الى الكود الخاص باظهار البيانات فى اللييست بوكس هذا السطر يقوم باظهار البيانات فى العمود الرابع فى الليست بوكس والمشار اليه بالرقم3 وبذلك اصبح شكل الكود بعد الاضافه ReDim Preserve arr(1 To 4, 1 To i) arr(1, i) = cll.Offset(0, 1) arr(2, i) = Format(cll.Offset(0, 2), "yyyy/mm/dd") arr(3, i) = Format(cll.Offset(0, 3), "yyyy/m/dd") ' هذا هو السطر المضاف arr(4, i) = cll.Offset(0, 4) ارجو ان اكون قد وفقت فى الشرح فقد قمت بالشرح على قدر معلوماتى تقبل تحياتى

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

السلام عليكم ورحمة الله وبركاته اخى اشرف ان شاء الله يتم الشرح قريبا تقبل تحياتى

اخى اشرف لى استفسار بسيط حتى يتم العمل بنجاح 1-عمود الملاحظات فى شيت الفاتوره لا يوجد مثله فى شيت مات 2- يوجد فى الفاتوره نوعان للعمله مصرى --دولار هل ممكن ان تحتوى الفاتوره الةاحده على النوعان تقبل تحياتى

السلام عليكم ورحمة الله وبركاته استاذنا الكبير عبدالله باقشير اخى ياسر اسمحو لى بالمشاركه بكود يوضع فى حدث الورقه Private Sub Worksheet_SelectionChange(ByVal Target As Range) Range("A4") = ActiveSheet.Name End Sub كما يمكن استخدام الكود الاتى ايضا Private Sub Worksheet_Activate() Range("A4") = ActiveSheet.Name End Sub تقبلو تحياتى

اخى الوليد فى امان الله

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

السلام عليكم ورحمة الله وبركاته اخى ابو جيداء هذه محاوله بسيطه منى ارجو ان تفى بالغرض تقبل تحياتى هام جدا3.rar

السلام عليكم ورحمة الله وبكاته اخى الوليد هل تقصد هكذا تقبل تحياتى XLe.rar

السلام عليكم ورحمة الله وبركاته الاخوه الافاضل اود التنبيه الى انه الان يتم استكمال موضوع بعض الاكواد المستخدمه مع التيكست بوكس على الرابط الاتى http://www.officena.net/ib/index.php?showtopic=49561&hl= تقبلو تحياتى

بسم الله الرحمن الرحيم والصلاة والسلام على اشرف المرسلين سيدنا محمد صلى الله عليه وسلم كل الشكر والتقدير والاحترام لعمالقة المنتدى والاساتذه الافاضل سيتم هنا عرض بعض الاكواد التى يتم استخدامها فى الفورم مع التيكست بوكس ....................................... اود ان اذكر حضراتكم باننا قد تناولنا فيما سبق اولا -- سيتم التعرف على كيفيه الترحيل من التيكست بوكس الى الشيت http://www.officena.net/ib/index.php?showtopic=49561&page=1 ثانيا-- سيتم التعرف على كيفيه الترحيل من التيكست بوكس الى مجموعه من الخلايا فى شيت الاكسيل http://www.officena.net/ib/index.php?showtopic=49561&page=1 ثالثا--التعرف على كيفيه استدعاء البيانات من شيت الاكسيل الى التكست بوكس http://www.officena.net/ib/index.php?showtopic=49561&page=1 رابعا--التعرف على كيفيه ترحيل البيانات من مجموعه من التيكست بوكس الى شيت الاكسيل http://www.officena.net/ib/index.php?showtopic=49561&page=1 خامسا--التعرف على كيفيه ترحيل البيانات من مجموعه من التيكست بوكس الى شيت الاكسيل أفقيا http://www.officena.net/ib/index.php?showtopic=49561&page=2 سادسا--التعرف على كيفيه تقيد الادخال فى التيكست بوكس http://www.officena.net/ib/index.php?showtopic=49561&page=2 سادسا--التعرف على بعض القيود الخاصه بادخال التواريخ فى التيكست بوكس http://www.officena.net/ib/index.php?showtopic=49561&page=3 ثامنا--التعرف على بعض الاكواد الخاصه بالعمليات الحسابيه فى التيكست بوكس http://www.officena.net/ib/index.php?showtopic=49561&page=3 اليوم سوف يتم استكمال باقى الموضوع ان شاء الله تاسعا:- جلب بيانات من الشيت الى التيكست هنا نتناول كيفيه استحضار بيانات الى الى التيكست وذلك فى حالة وجود هذه البيانات فى شيت الاكسيل عن طريق الظغط على زر داخل الفورم ارجو متابعة المثال المرفق تقبلو تحياتى text code.rar

اخى عاشق الاسلام اتمنى لك التوفيق

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

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

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

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

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