نجوم المشاركات

تفضل openandclose.rar

ان شاء الله هذا الموضوع تجد فيه الفائده| وهذا ايضا

الیك هذا الرابط

تفضل 2.rar

صحيح يجب حذف المرجع وهو الظاهر في الصورة .. قم بازالة العلامة ووافق

اهلا ومرحباً بالاستاذ / أبو إبراهيم الغامدي @ اشكرك من أعماق قلبي وأسال الله ان يكتب لك الاجر على ماقدمت طبقت الاستعلام على قاعدت البيانات ونجحت بفضل الله ثم مجهودكم وعلمكم فأسال الله أن يزيدكم من العلم ما تنفعوا به اخونكم المبتدئين امثالنا

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

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

جرب الملف كشف حساب عميل.rar

السلام عليكم الاخ الفاضلة / سما محمد بارك الله فيكي استخدمي هذا الكود في حدث UserForm_MouseMove اي النتيجة بالتكستات الصغيرة ستظهر لكي بعد تحريك الماوس علي الفورم واليكي الكود والملف المرفق به الحل Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) TextBox30.Value = TextBox1.Value + TextBox2.Value + TextBox3.Value TextBox4.Value = Mid(TextBox30, 1, 1) TextBox5.Value = Mid(TextBox30, 2, 1) TextBox7.Value = Mid(TextBox30, 3, 1) TextBox6.Value = Mid(TextBox30, 4, 1) TextBox9.Value = Mid(TextBox30, 5, 1) TextBox8.Value = Mid(TextBox30, 6, 1) TextBox11.Value = Mid(TextBox30, 7, 1) TextBox10.Value = Mid(TextBox30, 8, 1) TextBox12.Value = Mid(TextBox30, 9, 1) TextBox13.Value = Mid(TextBox30, 10, 1) TextBox15.Value = Mid(TextBox30, 11, 1) TextBox14.Value = Mid(TextBox30, 12, 1) TextBox17.Value = Mid(TextBox30, 13, 1) TextBox16.Value = Mid(TextBox30, 14, 1) TextBox19.Value = Mid(TextBox30, 15, 1) TextBox18.Value = Mid(TextBox30, 16, 1) TextBox20.Value = Mid(TextBox30, 17, 1) TextBox21.Value = Mid(TextBox30, 18, 1) TextBox23.Value = Mid(TextBox30, 19, 1) TextBox22.Value = Mid(TextBox30, 20, 1) TextBox24.Value = Mid(TextBox30, 21, 1) TextBox25.Value = Mid(TextBox30, 22, 1) TextBox27.Value = Mid(TextBox30, 23, 1) TextBox26.Value = Mid(TextBox30, 24, 1) TextBox29.Value = Mid(TextBox30, 25, 1) TextBox28.Value = Mid(TextBox30, 26, 1) End Sub فصل حروف الاسم لتكستات بوكس حرف حرف.rar

السلام عليكم ورجمه الله وبركاته اهلا بك بين اخوانك استاذي طالت الغيبه علينا ان شاء الله تكون بخير استاذي @Shivan Rekany شكرا اليك استاذي نعم هذا طلبي وشكر لكل من استاتذتي الكرام الذي حاولو مساعدتي الاخ الاستاذ ابو خليل والاخ محمد ابو عبدالله فانا ممنون لكم كثير استاتذي الكرام فبارك الله فيكم والف تحيه لكم اين ما كنتم فشكر شكر اخواني الكرام وجزاكم الله خير وضاح

تفضل اخي الكريم اكتب الكود سوف يظهر الصنف والسعر وايضاً -youssef.zip

اتفضل تم اخفاء جميع نماذج في التقرير وتم استخدام هذا عند تحميل التقرير Private Sub Report_Load() If Form_طباعة.rep.ListIndex = 0 Then Me.الاول.Visible = True If Form_طباعة.rep.ListIndex = 1 Then Me.تابع2.Visible = True If Form_طباعة.rep.ListIndex = 2 Then Me.تابع3.Visible = True End Sub تجريب_3.rar

تفضل Book salim(1).rar

جزاكم الله خيرا وشكرا على مساعدتك

تفضل اخي الكريم db2003.rar تحياتي

وعليكم السلام ورحمة الله وبركاته تفضل اخي الكريم db1.rar تحياتي

السلام عليكم مشاركه مع اخواني الاعزاء واجهت هذه المشكلة من قبل و كنت استخدم الإصدار 2007 و عندما قمت بتثبيت أكسس ٢٠١٣ ظهرت العناوين بالعربي ، جرب تثبيت أكسس ٢٠١٠ او ٢٠١٣ بالتوفيق

الوحدة النمطية المسماة margens واعتقد هنا مرجعها : C:\Program Files\Common Files\microsoft shared\VBA\VBA6\VBE6EXT.OLB

هذا ما أريدة تحديداً .. جعلة الله في ميزان حسناتك

السلام عليكم . اخواني الاعزاء عملت برنامج اكسل واريد بعض التعديلات . الملف اسمه h1 -- اسم المستخدم ( حسن ) باسورد ( 1234) المشكلة .. 1- الحين عند فتح البرنامج - وادخال اسم المستخدم والدخول - نذهب الى اضافة . ونملي البيانات ونضغط على حفظ . الان البيانات ترحل الى ملف الاكسال . بشيت ( h1 ) فعند اختياري لـ ( مربع صح ) يظهر لي true واذا لم اختار يظهر false كما هو ظاهر في الملف عندما تفتحه . المطلوب هو في كود التعديل لزر الحفظ . بحيث عند الضغط على صح ويتم الحفظ . يظهر تم اختيار القسم . واذا لم اضغط لا يظهر شيء . بمعنى اوضح . ( true = صح - false = لا يظهر شيء ) ويرجى مراجعت الملفات لمن يحب الاطلاع عليه وتعديله وابلاغي بالتعديلات وانا مشكور جدا ً لمن يحب المساعده . ( واعذروني لم استطع ارفاق الملف لكبر حجمة _ تم رفعة على موقع top4top ) https://up.top4top.net/downloadf-64782m4l1-zip.html

وعليكم السلام اخي الكريم ضع هذا الكود في زر حفظ وان شاء الله يكون المطلوب Private Sub CommandButton1_Click() Dim a1 As Long Dim sh As Worksheet Set sh = Worksheets("h1") a = sh.Cells(Rows.Count, 1) _ .End(xlUp).Offset(1, 0).Row sh.Cells(a, 1).Value = Me.TextBox1.Value sh.Cells(a, 2).Value = Me.TextBox2.Value sh.Cells(a, 3).Value = CheckBox1.Value sh.Cells(a, 4).Value = CheckBox2.Value sh.Cells(a, 5).Value = CheckBox3.Value sh.Cells(a, 6).Value = CheckBox4.Value sh.Cells(a, 7).Value = CheckBox5.Value sh.Cells(a, 8).Value = CheckBox6.Value sh.Cells(a, 9).Value = CheckBox7.Value sh.Cells(a, 10).Value = Me.TextBox3.Value If Me.CheckBox1.Value = True Then MsgBox "تم الحفظ واخيتار تحليلات مرضية" ElseIf Me.CheckBox2.Value = True Then MsgBox "تم الحفظ واخيتار علوم الحياة" ElseIf Me.CheckBox3.Value = True Then MsgBox "تم الحفظ واخيتار هندسة الحاسوب" ElseIf Me.CheckBox4.Value = True Then MsgBox "تم الحفظ واخيتار مالية مصرفية" ElseIf Me.CheckBox5.Value = True Then MsgBox "تم الحفظ واخيتار قانون" ElseIf Me.CheckBox6.Value = True Then MsgBox "تم الحفظ واخيتار تاريخ" ElseIf Me.CheckBox7.Value = True Then MsgBox "تم الحفظ واخيتار لغة عربية" End If Me.TextBox1.Value = "" Me.TextBox2.Value = "" CheckBox1.Value = False CheckBox2.Value = False CheckBox3.Value = False CheckBox4.Value = False CheckBox5.Value = False CheckBox6.Value = False CheckBox7.Value = False Me.TextBox3.Value = "" TextBox2.SetFocus End Sub

اخي الكريم بالنسبة للبحث عن عميل وفلترة البيانات . في المرفق مثال (اكتب اي حرف او كلمة ثم انتر) و اذا ناسبك الحل يمكن التعديل على ملفك وبالنسبة لاضافة بيانات جديدة على نفس العميل (عند الفلترة كما هو الحال في الاكسس) فالامر يتطلب وجود فورم لاضافة بيانات جديدة لبيانات الصفحة و عسى الاساتذة الافاضل يسعفونك بحل بحث عشوائي.rar

اخى الكريم شكرا على اهتمامك ومجهودك الملف فتح معى بس مش هو اللى انا عايزه مرفق نسختين واحده اكسيل وبها شرح ما اريد واخرى تعمل على الاكسيس حتى ترى عمليا ما اريد فهو برنامج بسيط اختار العميل الذى اريد عرض حساباته واذا اردت اضافه اى حسابات يتم اضافتها له هو فقط لان فى ربط بين جدول العملاء وحسابات العملاء باسم العميل المشكله عندى عايز احول الداتا بيز الموجوده فى الاكسيس الى اكسيل لانى عايز اشغل الملف على الايفون وهو بيقرا ملفات الاكسيل فقط جزاكم الله خيرا convert to excel2.rar

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

الصف الخامس الابتدائي https://up.top4top.net/downloadf-6472fond1-rar.html **************************** الصف السادس الابتدائي https://up.top4top.net/downloadf-647imcs11-rar.html ************************

السلام عليكم ورحمة الله أخونا الكريم أنور ضع مثالا حيا على ما تريده بالضبط وإن شاء الله ستجد الحل (والحل موجود في الردود السابقة)... أنظر إلى المرفق قمت بوضع الصيغة في إضافة عمود إلى أعمدة "طرابلس" وتم حساب المتوسط للقيم الثلاثة... أخوك بن علية سحب الفيلوكب.rar

جرب الملف الصفحة Salim كشف حساب عميل Salim.rar

الاستاذ محمد صاحب البرنامج غير الروابط لوجود ملحوظات في الروابط الاولى وهاهي الروابط السليمه التي ارسلها لي الصف الأول الابتدائى https://up.top4top.net/downloadf-644fyhh01-rar.html الصف الثانى الابتدائى https://up.top4top.net/downloadf-644625hr1-rar.html الصف الثالث الابتدائى https://up.top4top.net/downloadf-644ncguz2-rar.html الصف الرابع الابتدائى https://up.top4top.net/downloadf-6448q4zc1-rar.html الصف الخامس الابتدائى https://up.top4top.net/downloadf-644vb2bj2-rar.html الصف السادس الابتدائى https://up.top4top.net/downloadf-644cppon3-rar.html ولأصحاب النت السريع ( كل الملفات فى مجلد واحد ) https://up.top4top.net/downloadf-644oak3b1-rar.html