ابوخليل

ما شاء الله .. دقة ومتابعة وكأن العمل يخصك , نعم مر بخاطري -1 هذا لذا قلت تطبيق لفكرة الاستاذ جعفر فكرت في Dlast ان كنا سنتعامل مع السجلات وليس القيم ولكني لم اجرب لذا تظهر هنا جليا فائدة الترقيم التلقائي كمفاتيح للجداول اما مسألة تقرير واحد فلم يخطر ببالي ,, يعني تحتاج شرط . صح ؟

السلام عليكم قواعد المشاركة فى الموقع و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف اخواني الكرام ... تسببون لنا الحرج في تطبيق القوانين بكل اسف مضطرين لقفل الموضوع

مشاركة قمت بعمل هذه الدوارة لتطبيق فكرة استاذنا جعفر Dim db As DAO.Database Dim rs As DAO.Recordset Dim j, i, ii, x As Integer Dim r, rr As String Set db = CurrentDb Set rs = db.OpenRecordset("emp") rs.MoveLast rs.MoveFirst For j = 1 To rs.RecordCount x = rs!emp_id i = DMax("rep_year", "report", "emp_id=" & x) ii = DMax("rep_year", "report", "emp_id=" & x) - 1 r = DLookup("rep", "report", "val(rep_year) =" & i & " and emp_id=" & x) rr = DLookup("rep", "report", "val(rep_year) =" & ii & " and emp_id=" & x) rs.Edit rs!rep_last = r rs!rep_befor = rr rs.Update rs.MoveNext Next j MsgBox "تم" Set db = Nothing Set rs = Nothing تحديث حسب سجل وما قبله.rar

شكرا لك اجتمع الشرح النظري مع التطبيق العملي اخي السائل رعاك الله .. انا اعمل على نسخة عربية ولكن ستجد ما ذكرت في الخصائص في لسان التبويب الثالث اجعل القيمة : Pop-up = yes

عليكم السلام من خصائص النموذج الفرعي/ لسان التبويب : غير ذلك اجعل منبثق = نعم

تم النقيح وضم المواضيع المتشابهة

شكرا لك

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

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

ما شاء الله غفوت ساعة و كل هذا حصل تكاثرت الظباء على خراش .... فمايدري خراش ما يصيد .

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

السلام عليكم بالنسبة للرابط فهو غير مجاني اما كود الاستاذ جعفر فمن طرحه استاذنا وانا احاول ولكنه لم يعمل معي ويبدوا اني سأستأنف محاولاتي في الصباح شكرا لكل من شارك معنا

أكرمك ربي واصلح لك الذرية

Call Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl", vbNormalFocus) استدعاء المنطقة واللغةوالوقت والتاريخ والحاسبة.rar

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

وعليكم السلام مما فهمت المطلوب اعادة ترقيم اعادة الترقيم في الجداول غير مهم ما دامت ستظهر في النهاية في التقارير مرتبة في التقرير خاصية للحقل ( غير المنضم) يمكن من خلالها الترقيم مرتبا

السلام عليكم مؤسسسة غير ربحية لديها حوالي مليون رقم هاتف مستهدف قابلة للزيادة ويريدون ارسال رسائل لهم وحيث ان رسائل الـــ sms مكلفة رأوا ان يكون الارسال عبر الواتس فهل من طريقة برمجية تساعد في ذلك

الحمد لله على تحقيق المراد لو قلت : اريد اظهار مربع حوار اللغة .. لما انتظرت كل هذه المدة فهم السؤال او طرح السؤال بشكل صحيح هو نصف الاجابة

ضع طريقة للتواصل معك حتى نرفعه الى قسم الاعلانات

السلام عليكم اعتقد الاستاذ حمدي يريد مثل هذا تغير لعة الونوز2.rar

Me.feld.Height = Me.tfseel.Height

تفضل حقلين2.rar

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

فائدة جدول الوظائف تظهر حين تريد تعيين وظيفة لموظف ، فانت تختار الوظيفة ثم الدرجة فينزل المرتب آليا ثم اذا اردت عرض الموظفين بمراتهم في استعلام فيكون المصدر حينها هو جدول الموظفين

الوظائف لها جدولها الخاص وهي غالبا ثلاثة : الوظيفة ، الدرجة ، المرتب