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

في الرابط الذي انا اشرت اليه ، استعملت الخط code39 في حقل نص عادي ، الخط بحجم 28 ، وتم طباعة الباركود على الطرف الاقصر من الهوية ، وبعد تغليف الهوية Lamination ، استعملنا الاجهزة التالية لقراءة الباركود : 1. جهاز خاص لقراءة الباركود ، مثل هذا ، وهو سريع جدا في قراءة الباركود وبأي اتجاه 2. اثنين من برامج قراءة الباركود لهواتف الاندرويد Android المجانية من سوق اندرويد ، 3. احد برامج قراءة الباركود لهواتف اي فون iPhone المجانية من سوق ابل. وجميع الاجهزة اعلاه قرأت الباركود بكفاءة وبدون اخطاء ، كما وتم طباعتها على طابعة اوراق حرارية Thermal (مثل الطابعات في السوبرماركت) ، وكذلك تم قراءة الباركود بالاجهزة اعلاه ، وبكفاءة وبدون اخطاء جعفر

وعليكم السلام هذا معناه ان الحقل هذا هو آخر حقل في النموذج ، واعدادات النموذج عندك لقراءة "جميع السجلات" ، فيجب تغيير الاعدادت الى قراءة "السجل الحالي" . جعفر

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

وهذه تجربتي مع الباركود ، كجزء من عمل الهويات جعفر

يمكن ان يكون الحل Ali Salim.rar

السلام عليكم ورحمة الله جرب الملف المرفق حيث تم إضافة المعادلات الخاصة بفصل الشُّعَب في جداول... بن علية حاجي Ali.rar

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

السلام عليكم و رحمة الله و بركاته طريقة المتوسط الأسعار ليس بهذه الطريقة أن نأخذ دالة الوسط الحسابي فالطريقة تعتمد أولا عند حالة الشراء و تأخذ بعين الاعتبار الرصيد الموجود قبل الشراء بغض النظر عن الكميات و الأسعار المشتراة سابقاً حين أن السعر الوسطي = (قيم الموجود قبل الشراء + قيمة المشتريات) / ( الكمية الموجودة قبل الشراء + كمية الشراء الجديدة) و في حال البيع لا يتم حساب السعر الوسطي بل يعتد السعر الوسطي للرصيد . و دمتم

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

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

بارك الله فيك استاذي@Amr Ashraf نعم هو مطلوبي الف شكرا اليك لله يعطيك العافيه

يا اخوي يا شفان ليش تعطي جواب طويل لما تقدر تعطي جواب قصير ليش هذا الكود الطويل If Len(Me.Text1 & "") = 0 Then Me.Text2.Visible = False Else Me.Text2.Visible = True بينما يمكنك استعمال الكود الاقصر Me.Text4.Visible = IIf(Len(Me.Text6 & "") = 0, -1, 0) . بس يا اخوي ابو سعد ، ترى كود اخوي شفان اسرع في التنفيذ جعفر

وعليكم السلام هل هذا هو المطلوب ؟ 2متوسط.rar

السلام عليكم ورحمة الله الكود الاول لعمل الدوائر ويخصص له زر و يتم ربطه به Sub Circles1() Call DeletingShp Dim ws As Worksheet, C As Range Dim MyRng As Range, V As Shape Dim G As Integer, R As Integer, D As Integer Application.ScreenUpdating = False Set ws = Sheets("شهادات الرابع") Set MyRng = ws.Range("B27:L27,B40:L40,B53:L53,B64:L64,B76:L76,B88:L88") For Each C In MyRng If C.Value = "دون المستوى" Then Set V = ActiveSheet.Shapes.AddShape(msoShapeOval, C.Left + 1, C.Top + 1, C.Width, C.Height - 1) V.Fill.Visible = msoFalse V.Line.ForeColor.SchemeColor = 10 V.Line.Weight = 1.9 End If Next Application.ScreenUpdating = True End Sub اما الكود الثانى مخصص لمسح الدوائر وسيعمل تلقائيا مع الكود الاول Sub DeletingShp() Dim shp As Shape For Each shp In ActiveSheet.Shapes If shp.Type = msoShapeOval Then shp.Delete Next shp End Sub هذا وبالله التوفيق

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

آمين يا رب العالمين و عن أمة محمد أجمعين. نعم هو النسخ المعتاد بالزر الأيمن

اجعل حجم الصورة 1 بكسل! حيلة سهلة!

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

السلام عليكم ورحمة الله وبركاته اسمحوا لي بمداخلة وعسى ان تكون ما يطمح اليه الاخ ابو ياسين جرب المرفق: 1- عند الفتح لاول مرة لا يقبل اي داتا غير الداتا الاساسية لبرنامج الخياط 2- بعد الربط تستطيع عمل نسخة احتياطية 3- تستطيع استبدال الداتا الاساسية باي داتا اخرى محفظوطة سابقا مع حذف الجداول المرتبطة سابقا صراحة ابو ياسين فهم السؤال ثلثي الاجابة وانت تفرعت في طرحك :: تحياتي KhaiatNewww.rar

السلام عليكم هناك خطوط تقرأها جميع أجهزة الباركود و من بينها code128 و code39 .. لكن لإستعمال الباركود هناك طريقتان: الأولى: إما أنك تضعه في مربع نص عادي و تختار نوع الخط المطلوب و تضيف الرمز "*" قبل الحقل و بعده هكذا من أجل تحديد بداية و نهاية الباركود: "*"&[id]&"*" الثانية: هي أنك تضيف الأداة barcodex.ocx للقيام بإنشاء الباركود و أنا في نظري هي الأفضل لأن خطوطها تكون واضحة و سهلة القراءة من جميع الأجهزة و لكن البعض لا يحبذها لما فيها من مشاكل في التسجيل عند البعض. و أنا بصدد إنشاء برنامج يقوم بتسجيل الأداة على جميع الأجهزة بدون مشاكل إن شاء الله.

اخي الربط الحاصل هو فعلا تغيير الجداول بل هو تغيير قاعدة البيانات كاملا ولكن مكانها اختلف عن القاعدة القديمة وحتى لو فتحت البرنامج لن يرتبط بالقديمة اذا في برنامجك كود يعيد القديمه قم بتعطيله اما : اذا تريد تغيير القديمة بالجديدة فيلزم اكثر من عملية وستكون كالتالي : 1- فك الارتباط بالقديمة 2- جلب القاعدة الهدف ولصقها مكان القديمة (وهذا خطير ) 3- اعادة الربط او انك تعمل برنامج مساعد بحيث ينسخ ويلصق بشرط برنامجك مقفل شيء آخر ايضا : اذا تريد حذف الجداول في القديمة وجلب جداول من النسخة البعيدة فهو ممكن ايضا ولكن هذا العمل غير احترافي وخطير اختر من هذه الحلول

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

وعليكم السلام هذه ليست رسالة خطأ ، وانما هناك حقل (اسم الحقل واسم النموذج في دائرتك الزرقاء) يحتاج ان تكون فيه القيمة ، وانت لم تُدخل القيمة ، فالبرنامج وقبل ان ينفذ طلبك ، محتاج لهذه القيمة. فإما القيمة موجودة في الحقل (وهذا المفروض) ، او ان تُدخل القيمة هنا (وهذا خطأ) ، او انك تلغي طلب هذه الرسالة (وقد يكون هذا الطلب في استعلام يقوم بإضافة /تعديل / حذف حسب اسم المستخدم). جعفر

تفضل عزيزي testwaz2.rar

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

آمين يا رب العالمين

رائع شكرا لك

السلام عليكم ورحمة الله أخي الحبيب أبو أحمد، تم إضافة معادلات في الملف... الأمر الذي لم أفهمه هو القصد من وضع "تاريخ احتساب الاجازة"؟ ثم هل لتاريخ التعيين أهمية في احتساب الإجازات بمعنى أنه لو كان تاريخ تعيين موزف ما هو 2016/01/01 ونحن الآن في تاريخ 2018/01/08 (أو نحسب الإجازة إلى غاية التاريخ في الخلية B1 أي 2019/05/01 الذي هو "تاريخ احتساب الاجازة") بمعنى أن نجمع "المستحق من الإجازة للسنة" و "الإضافي في كل سنة" بعدد السنوات من تاريخ التعيين إلى تاريخ اليوم (أو إلى تاريخ احتساب الإجازة) ونطرح منه إجمالي الإجازات التي تحصل عليها الموظف خلال هذه المدة من العمل؟؟؟ لست أدري إن كان طرحي مفهوما؟ بن علية حاجي رصيد إجازات 5ب.rar

وهذا شرح بالصور لما قاله اخي شفان ، للأكسس 2010 عليك عمل زر امر ، ويكون عليه الاختيار ، ثم . ثم . . . . وهناك نماذج مختلفة . ونماذج بأزرار خاصه . وهذه لتغيير نمط النموذج ، بخطوط والوان ووو . جعفر

عند تعبئة البيانات في الصفحتين بيانات الموظفين و بيانات الإجازات يتم ادراج كافة المعلومات في الصفحة رصيد الإجازات أوتو ماتيكباً لا حاجة للكود في هذه الحالة الملف مرفق رصيد اجازات 5ا Salim.rar

انا عدلت على الكود الموجود حيث استخدمت الدالة اعلاه للاستدلال على الايام وداخل الدوارة تمكنت من تجاهل يومي الجمعة والسبت وايضا عند تسجيل تاريخ البداية لا يسمح بتاريخ يوافق العطلة ولكني توقفت عند القيمة الكلية للدوران حيث استعصى التعديل عليها من داخل الدوارة بمعنى ان النتيجة ستظهر صحيحة ولكن ايام العطل ستكون ضمن الحسبة في الحقل F اي اذا اردت ان تسجل 10 ايام صافية يجب ان تعرف كم جمعة وسبت موجودة ضمنها ثم تضيفها الى العدد في الحقل F test4.rar

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

الخطوات كالتالي: 1- نطبق data validation على خلية الدرجة لا تنس إزالة علامة الصح نطبق ما ذكرناه على جميع خلايا درجة الطالب 2- نضيف زر لعمل الدوائر ونربطه بالكود التالي: ActiveSheet.CircleInvalid 3- نضيف زر لمسح الدوائر ونربطه بالكود التالي: ActiveSheet.ClearCircles وتهانينا.. المرفق: دوائر01.rar

جرب هذا الملف بالنتسيق الشرطي 11salim.rar

جرب الكود التالي Sub Duplicate_Values() Dim myRange As Range Dim myCell As Range Set myRange = Range("A24:A110") For Each myCell In myRange If WorksheetFunction.CountIf(myRange, myCell.Value) > 1 Then myCell.Resize(1, 9).Interior.ColorIndex = 3 End If Next myCell End Sub تقبل تحياتي أو جرب الكود التالي ..سيتم تلوين الخلية الأولى فقط في أول حدوث ثم بعد ذلك في حالة التكرار سيتلون النطاق إلى العمود I وكل تكرار بلون مختلف ليسهل عليك استخراج المكرر Sub Color_Duplicates() Dim r As Range, myColor, N As Long myColor = Array(4, 7, 12, 38, 39, 40, 46) Columns(1).Interior.ColorIndex = xlNone ReDim Preserve myColor(1 To UBound(myColor) + 1) With CreateObject("Scripting.Dictionary") .CompareMode = 1 For Each r In Range("A1", Range("A" & Rows.Count).End(xlUp)) If r.Value <> "" Then If Not .exists(r.Value) Then Set .Item(r.Value) = r Else If TypeOf .Item(r.Value) Is Range Then N = N + 1: If N > UBound(myColor) Then N = 1 Union(.Item(r.Value), r).Interior.ColorIndex = myColor(N) .Item(r.Value) = myColor(N) Else r.Resize(1, 9).Interior.ColorIndex = .Item(r.Value) End If End If End If Next End With End Sub

السلام عليكم الاخ الكريم / safwat0000 بارك الله فيك وجزيل شكري علي كلماتك الرائعة وبالنسبة لموضوع البرنامج الكبير الذي تقصده فكل موضوعاتي الخاصة بشرح الاكواد وطريقتها ( سلسلة خطوة خطوة ) تنصب في انها مواضيع تستخدم في تصميم برنامجك بنفسك ومنها * طريقة عمل شاشة افتتاحية باسم مستخدم ورقم سري !! خطوة خطوة * طريقة عمل شاشة ( فورم ) ادخال وترحيل واستعلام وتعديل !! خطوة خطوة * قوائم بشكل جديد في الاكسيل .... تصلح للاستخدام في برنامجك .. بطريقة بسيطة وسهله * طريقة عمل او استخراج كشف حساب بالاكواد بطريقة بسيطة !! خطوة خطوة وهذه الموضوعات جميعها تستخدم معا لبناء برنامج كامل متكامل ... ومازلنا والموضوع القادم ( ان شاء الله ) في هذه السلسلة .... سيكون طريقة عمل فورم بحث واظهار النتائج في ليست بوكس ... وتعديل النتائج باستخدام تكستات بوكس !! خطوة خطوة اتمني ان ينال رضاك جزاك الله خيرا

بسم الله الرحمن الرحيم اقـــــــــدم لكـــــــــــــم اخـــــــوانــــي فهــــــرس كـــامــــل للمــوضــــوع (((( الدرس الاول )))) في المشاركة رقم 1# عمل شاشة التسجيل http://www.officena.net/ib/index.php?showtopic=45637 (((( الدرس الثاني )))) في المشاركة رقم 38# والمشاركة رقم 39# بعض الاضافات علي الشاشة لكفاءة عملها http://www.officena.net/ib/index.php?showtopic=45637&page=2 (((( الدرس الثالث )))) في المشاركة رقم 54# طريقة عمل استعلام في نفس الفورم http://www.officena.net/ib/index.php?showtopic=45637&page=3 (((( الدرس الرابع )))) في المشاركة رقم 86# والمشاركة رقم 87# طريقة عمل زر للتعديل بعد عمل استعلام http://www.officena.net/ib/index.php?showtopic=45637&page=5 المشاركة رقم 101# شرح الماكرو كامل ولتعامل مع الخلايا في الاكسيل ودالة IF و .... http://www.officena.net/ib/index.php?showtopic=45637&page=6 (((( الدرس الخامس )))) في المشاركة رقم 116# طريقة عمل زر للحذف بعد عمل استعلام http://www.officena.net/ib/index.php?showtopic=45637&page=6

طريقة عمل شاشة ( فورم ) ادخال وترحيل واستعلام وتعديل !! خطوة خطوة السلام عليكم اساتذة المنتدي وخبراؤه الكبار الاخوة الافاضل بالطبع هناك اكواد كثيرة لعمل شاشة الادخال وكذلك الاستعلام والتعديل والحذف ولكني قصدت اختيار اسهل هذه الاكواد لعمل ذلك لتكون اسهل في توصيل المعلومة وكذلك اسهل عند التطبيق وارجو من الله ان اكون قد وفقت في عمل ذلك (((( الدرس الخامس )))) شاشة ( فورم ) لادخال بيانات والقيام بتسجيل وترحيل هذه البيانات الي صفحة الاكسيل و الاستعلام من خلالها عن طريق نفس الفورم والتعديل ايضا في البيانات في حالة ما اردنا التعديل في بيان قد سبق ادخاله وطبعاً والاكيد كله من علمكم اساتذتي الكرام الاجلاء في هذا الدرس سنتعرف علي طريقة عمل زر للحذف بعد عمل استعلام عن الاسم او الرقم المطلوب وذلك في نفس الفورم الذي قمنا بتصميمه وذلك للبيانات السابق تسجيلها في صفحة البيانات وذلك عن طريق استخدام زر الحذف ... مع وضع اكواده ... وشرح الكود سطر سطر كما تعودنا واي استفسار .... في الخدمة دائما ... واي شئ غير واضح في الشرح علي استعداد تام لشرحه مرة اخري ومرات اخري واليكم ايضا في المرفقات : 1- ملف اكسيل به الاكواد والشرح هذه المرة داخل الكود ( تم شرح الكود سطر سطر بطريقة وافية وبسيطة جدا داخل الكود نفسه ) 2- عدد ( 1 ) ملف فيديو يشرح طريقة التصميم واضافة الاكواد وكذلك مشاهدة النتيجة واضافة بسيطة لكفاءة عمل زر تسجيل جديد جزاكم الله خيرا اساتذتنا اكسيل ..طريقة عمل شاشة ادخال واستعلام وتعديل وحذف5.rar طريقة عمل زر الحذف فيديو.rar ارجو من الله ان اكون قد وفقت فيما تم تقديمه من شرح وان يكون كل شئ واااضح وبطريقة اعجبتكم وانا علي استعداد تام لشرح اي جزء مرة اخري

طريقة عمل شاشة ( فورم ) ادخال وترحيل واستعلام وتعديل !! خطوة خطوة السلام عليكم اساتذة المنتدي وخبراؤه الكبار الاخوة الافاضل اقدم لكم في هذه المشاركة شرح ( للامانه ) فهو منقول من منتدي آخر وشرح لاحد الأخوة ولكن لا اتذكر الاسم الآن والجميل به وما جعلني اقوم بوضعه هنا في هذا الموضوع ان به شرح الماكرو كامل وكذلك شرح لمعظم ما قمنا باستخدامه في الاكواد في الدروس السابقة من التعامل مع الخلايا في الاكسيل ودالة IF و .... اترككم مع الملفات في الدرس القادم والاخير سنتعرف علي طريقة عمل زر (( للحذف )) ووضع الاكواد الخاصة به مع شرحه سطر سطر كما تعودنا مع المرفقات الخاصه به .... وايضا كما تعودنا باسهل اكواد ممكنة لعمل تلك الوظائف واي استفسار .... في الخدمة دائما ... واي شئ غير واضح في الشرح علي استعداد تام لشرحه مرة اخري ومرات اخري جزاكم الله خيرا شرح الماكرو.rar 2- دروس في التعامل مع الخلايا في الاكسيل.rar

طريقة عمل شاشة ( فورم ) ادخال وترحيل واستعلام وتعديل !! خطوة خطوة (((( تابع / مرفقات الدرس الثاني )))) ملف الفيديو رقم 4 ملف القــــديــــر الــــرائــــع / الحســــــامــــــي فيديو4 .. طريقة عمل شاشة ادخال 3-4.rar الدرس الثالث textbox.rar

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

السلام عليكم إضافة لحلول الأخوة يمكنك استخدام تنسيق الخلايا لتحقيق ذلك ========== لو افترضنا انك تريد ادخال الرقم 0797003299 سيظهر في الاكسيل 797003299 بدون الصفر و الحل قم بتحديد الخلية ثم رايت كليك و اختر تنسيق الخلايا ثم اختر تخصيص و ضع أصفار بعدد ارقام الهاتف مع الصفر في مثالي اعلاه سا أضع 0000000000 ثم اختر موافق و هذا التنسيق يعني ان مكان كل صفر يستبدل برقم و في حال عدم ادخال االرقم كامل سيظهر الصفر مكان الرقم المفقود 0079700329هنا ظهر صفرين لاني لم اكمل ادخال الرقم كاملاً و في حال كتابة الرقم 1 في هذه الخلية سيظهر 0000000001 ==================== الفرق بين الطرق ان طريقتي الاخوين عامر و اكسيلجي تعيد الرقم كنص في حين ان طريقتي تبقي الرقم كرقم ==================== أتمنى أن اكون وفقت في توضيح الصورة

السلام عليكم أخي حسام ، أرجو عدم توجيه المشاركة الي شخص بعينه كما هو في قواعد الاسئلة الموجودة أعلي القسم و ذلك ، حتي لا نغلق باب إجابة أفضل قد تأتي من شخص آخر سأعد المثال و أضعه بإذن الله تعالي :)