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

أعضاء هذا المنتدى الرائع قمت بعمل قاعدة بيانات لمجموعة من الموظفين ولكن ما أريده هو عند فتح نموذج الموظفين أريد أن ارى فقط الموظفين أصحاب درجاتGrade SA.07 AND SA.08 AND SA.09 AND SA.10 فهل بمساعدة بالكود المناسب لذالك جزاكم الله خيراً

سلام عليكم ورحمة الله وبركاته اخواني الاعزاء هل ممكن المساعدة في الملف المرفق وهو عبارة ملف لطباعة تصاريح الدخول الي الموقع المطلوب اظهار الصوره في جميع المربعات الخاص بالصور الموظفين امام الرقم الوظيفي لكل موظف بنفس الحجم مع تغير الصور في حال تغيير الرقم الوظيفي مع الحفاظ علي ان تكون عن طريق المعادله / مثل علي الموظف رقم 2 المشكله رقم ( 1 ) الصور لا تظهر جميعاً (2) حجم الصور يتغير بمجرد تغيير رقم الموظف VL.rar

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

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

السلام عليكم كيفكم اخواني ؟ انا لدي مشكلتين اتمنى حلها مع الشرح لكي اطبقه بالملفات الاخرى المشكلة الاولى وهي: عمود seq في الجدول حاطه ترقيم تلقائي عند حفظ سجل مثلا رقم 5 وتم حذفه بيظهر لي الي قبله 4 وبعده 6 اريد ان اضبط الترقيم متسلسل حتى لو تم الحذف وهل بالامكان اختيار رمز بدل رقم ؟ مثلا اريد ترقيم b001 -b002-b003 ....... المشكلة الثانيه: عند تعبئه حقول النموذج تحفظ تلقائيا في السجلات حتى لو لم يتم الضغط على زر الحفظ في الاسفل عدة ازرار حفظ وحذف واظافه أريد زر حفظ عند الضغط يحفظ السجل ويظهر لي تنبيه تم الحفظ وشكرا لكم BOOK.rar

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

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

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

السلام عليكم ورحمة الله وبركاته كيف يمكنني الكتابة بالعربي في الفيزو(اسماء الرموز مثلا)

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

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

دالة جميله جدا واغنتنى عن الكود الدالة لها وسيط مخفى دالة منع التكرار.rar

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

ارجو الربط بين النموذج الرئيسى والفرعى مع الشرح وشكرا المدارس.rar

انظر الاستعلام احصاء الدور الثانى.rar

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

السلام عليكم اول عمل لي -كاس العالم للشباب في تركيا 2013 وهو مفتوح بدون تامين واعذروني اذا كان في خطا لانه اول عمل لي هذا كلة بفظلكم علية ودروسكم الجبارة والمعلومات الغزيرة اشكركم من كل قلبي كاس العالم للشباب 2013 -تركيا.rar

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

السلام عليكم أخي العزيز حيث انك تشكو فلابد انك تقصد الموضوع http://www.officena.net/ib/index.php?showtopic=46684&hl= ولقد راسلتني وراسلتك علي الخاص وشرحت لك ظروفي ولم تقدر انشغالي طبعا انا تابعت الموضوع معك منذ مايقرب من شهرين ولو راجعت الفارق بين اول ملف (غير الخطأ اللي في اول مشاركة) وبين آخر ملف لاكتشفت كم الجهد والوقت المبذول في الموضوع ولو نظرت ايضا لعدم تحديد طلباتك من الاول لعلمت كم من الوقت كان ممكن يتوفر تذكر: صافي الكمية ثم صافي الكمية آخر حاجة ثم صافي الكمية آخر حاجة2 ثم صافي الكمية آخر حاجة3 ثم صافي الكمية آخر تعديل ثم صافي الكمية آخر تعديل3هاني ثم صافي الكمية آخر تعديل4هاني ثم صافي الكمية آخر تعديل5هاني ثم صافي الكمية الجديد ثم انظر جيدا ردي بالمشاركة 25 وكيف رددت انت بمشاركتك 26 ، 27 أخي الحبيب / لله الفضل والمنة علي كل عمل يعمله أي من الأعضاء لمساعدة الآخر ولندعوا الله ان يكون لوجهه الكريم ولكننا في النهاية بشر (أنا وأنت) وليس وقتنا ملكنا المهم دعنا لانبحث عن الأخطاء ولكن فلنبحث عن العلاج عليك بتحديد وفهم ماتريد بالضبط ولتطرحه في موضوع جديد ولاتوجهه لشخص محدد والله ياأخي ليس الموضوع شخصي ولكني مشغول وانت لاتساعد بتحديد ماتريد اعذرني مرة أخري وتقبل ودي واحترامي

أخى الحبيب / حمادة عمر شكرا جزيلا أخى الحبيب على هذه الكلمات الطيبة وجزاك الله كل خير

تعرفنا معا في الدروس السابقة علي عدد من ادوات الفورم الشائعة ودرسنا اليوم سوف نتعـرف علي UserForm Controls - CheckBox, OptionButton and ToggleButton UserForm Controls - ScrollBar and SpinButton الدرس الخامس أولا: ScrollBar Control عنصر تحكم شريط التمرير(ScrollBar ) تمكن من تغيير (زيادة أو إنقاص) القيمة المعروضة من قبل عناصر التحكم UserForm الأخرى أو قيمة في نطاق ورقة العمل. انها لفائف من خلال مجموعة من القيم عندما يقوم المستخدم: زيارة لأسهم التمرير، (الثاني) تستمر مربع التمرير، أو (الثالث) النقرات في منطقة بين سهم التمرير ومربع التمرير. ضوابط شريط التمرير وSpinButton - الفرق بين الاثنين هو أن مربع التمرير يمكن سحب لتغيير قيمة عنصر التحكم على زيادات أكبر (مع الحفاظ على مقدار منخفض مقابل النقرات) التي مزايا شريط تمرير لجعل الاختيار من عبر عدد كبير من القيم وتغطي مجموعة واسعة جدا. يحدد SmallChange التغيير التدريجي، كقيمة عدد صحيح (متغير طويل)، الذي يحدث عندما يقوم المستخدم بالنقر فوق سهم التمرير. يحدد LargeChange وتغيير تدريجي عندما ينقر المستخدم بين سهم التمرير ومربع التمرير. القيمة الافتراضية هي 1 لكل من الخصائص. مثال نرغب في حساب الدفعة لقرض معين يتم إدخال قيمة القرض ومعدل الفائدة الثانوي وفترة السداد السنوي عن طريق استخدام السكرول بار اولا : قبل تنفيذ الفورم نفكر ماهو الغرض الذي سوف ننفذ من اجله الفورم وطريقة تنفيذه ونخطط لذلك ونحس به (روح الاكسيل ) كل منا له طابع خاص في عرض وتشكيل الفورم الخاص به سوف نستخدم في الفورم مجموعة من المعطيات كالتالي 1- شريط تمرير لادخال مبلغ القرض مع مربع نص لاظهار القيمة 2- شريط تمرير لادخال معدل الفائدة الثانوي مع مربع نص لاظهار القيمة 3- شريط تمرير لادخال فترة السداد السنوي مع مربع نص لاظهار القيمة 4- سوف احتاج لزر امر لادخال الكود البرمجي لعملية الحساب 5- وسوف احتاج مربع عنوان لاظهار قيمة الدفعة الشهرية معا ايضا سوف نتعلم كيفية اضافة العناوين عن طريق الفورم باستخدام الخاصية ( CAPTION) التنفيذ بعدما خططنا لما نريد تنفيذه بالضبط سوف نقوم بتنفيذ الفورم كالتالي (( التطبيق بالمرفقات )) وسوف باختيار الاكواد الخاصة بالفورم في حدث انطلاق الفورم سوف نقوم بتحديد العنواين الخاصة باستخدام CAPTION وتحديد خصائص كل من اشرطة التمرير الثلاثة وتنسيقاتهم المستخدمة والشرح مع الكود Private Sub UserForm_Initialize() 'ÇáÝÑÖ Label1.Caption = "ãÈáÛ ÇáÞÑÖ :" ScrollBar1.Min = 0 ScrollBar1.Max = 10000 ScrollBar1.Orientation = fmOrientationHorizontal ScrollBar1.SmallChange = 5 ScrollBar1.LargeChange = 100 ScrollBar1.Value = 0 'ãÚÏá ÇáÝÇÆÏÉ ÇáÓäæí ' æÖÚäÇ ÚäæÇä áãÑÈÚ ÇáÚäæÇä 2 Label2.Caption = "ãÚÏá ÇáÝÇÆÏÉ ÇáÓäæí (%) :" ScrollBar2.Min = 0 ScrollBar2.Max = 1000 ScrollBar2.Orientation = fmOrientationHorizontal ScrollBar2.SmallChange = 1 ScrollBar2.LargeChange = 10 ScrollBar2.Value = 0 'set properties for controls in re of Loan Tenure: Label3.Caption = "ÝÊÑÉ ÇáÓÏÇÏ (ÈÇáÓäÉ)" ScrollBar3.Min = 0 ScrollBar3.Max = 50 ScrollBar3.Orientation = fmOrientationHorizontal ScrollBar3.SmallChange = 1 ScrollBar3.LargeChange = 4 ScrollBar3.Value = 0 'set properties for Label which displays Monthly Instalment: Label4.Caption = "ÇáÏÝÚÉ ÇáÔåÑíÉ" Me.Caption = "ScrollBar Control" End Sub نحدد ان قيمة كل نص (تكست بوكس ) = لقيمة شريط التمرير كالتالي Private Sub ScrollBar1_Change() ' TextBox1.Value = ScrollBar1.Value * 1000 TextBox1.Value = Format(TextBox1.Value, "#,##0") End Sub Private Sub ScrollBar2_Change() ' TextBox2.Value = ScrollBar2.Value / 10 End Sub Private Sub ScrollBar3_Change() TextBox3.Value = ScrollBar3.Value / 2 End Sub وفي النهاية الكود المستخدم لحساب الدفعة الشهرية وقما له بتخصيص زر امر Private Sub CommandButton1_Click() 'áÍÓÇÈ ÇáÏÝÚÉ ÇáÔåÑíÉ Dim mi As Currency If Not TextBox1.Value > 0 Then MsgBox "ãä ÝÖáß ÃÏÎá ãÈáÛ ÇáÞÑÖ !" Exit Sub ElseIf Not TextBox2.Value > 0 Then MsgBox "ÇáÑÌÇÁ ÇÏÎÇá ãÚÏá ÇáÝÇÆÏÉ ÇáÓäæí !" Exit Sub ElseIf Not TextBox3.Value > 0 Then MsgBox "ÇáÑÌÇÁ ÇÏÎÇá ãÏÉ ÇáÞÑÖ !" Exit Sub Else mi = Pmt((TextBox2.Value / 100) / 12, TextBox3.Value * 12, TextBox1.Value) ' Label4.Caption = " ÇáÏÝÚÉ ÇáÔåÑíÉ " & Round(mi, 2) * -1 End If End Sub شرح الاكواد والتطبيق بالمرفقات ثانيا: SpinButton Control يتم استخدام عنصر تحكم SpinButton، مماثلة إلى عنصر تحكم شريط التمريرScrollBar ، إلى زيادة أو إنقاص قيمة (ماعدا التاريخ، الوقت) المعروضة من قبل عناصر التحكم UserForm الأخرى (مربع نص، تسمية، ...) أو القيمة في نطاق ورقة العمل. عنصر تحكم SpinButton (ويشار إلى عنصر تحكم سبينر أيضا) وظائف مثل عنصر تحكم شريط التمريرScrollBar ، مع خصائص مشابهة (. SmallChange، أدني، أعلي، والتوجه، ...). يحدد SmallChange التغيير التدريجي، كقيمة عدد صحيح (متغير طويل)، الذي يحدث عندما يقوم المستخدم بالنقر فوق سهم التمرير. لا يملك عنصر تحكم SpinButton خاصية LargeChange، مثل في شريط التمرير. في شريط التمرير العمودي النقر فوق سهم التمرير يقلل من قيمة في حين النقر فوق سهم التمرير على سبينر عمودي يزيد من قيمة. ضوابط شريط التمرير وSpinButton - الفرق بين الاثنين هو أن مربع التمرير يمكن سحب لتغيير قيمة عنصر التحكم على زيادات أكبر (مع الحفاظ على مقدار منخفض مقابل النقرات) التي مزايا شريط تمرير لجعل الاختيار من عبر عدد كبير من القيم وتغطي مجموعة واسعة جدا. مثال: استخدام عنصر تحكم SpinButton لتغيير البيانات في مربع نص، ضمن نطاق (A2:A10) سوف نقوم بتصميم الفورم بالشكل التالي لاضافة العناصر الي الليست بوكس Private Sub loadListBox() 'ÇÖÇÝÉ ÇáÚäÇÕÑ Çáí ÇááíÓÊ ÈæßÓ ãä æÑÞÉ ÇáÚãá Dim n As Integer Dim cell As Range Dim rng As Range ' ãÕÏÑ ÇáÈíÇäÇÊ Set rng = sheet1.Range("A2:A10") For n = 1 To ListBox1.ListCount ListBox1.RemoveItem ListBox1.ListCount - 1 Next n For Each cell In rng.Cells Me.ListBox1.AddItem cell.Value Next cell End Sub Private Sub UserForm_Initialize() 'ÇÖÇÝÉ ÇáÚäÇÕÑ Çáí ÇááíÓÊ ÈæßÓ loadListBox Me.Caption = "SpinButton Control" End Sub الكود مع الشرح بالمرفقات ثالثا: RefEdit control عنصر التحكم RefEdit لا تتوفر إلا في UserForm VBA، ويسمح للمستخدم لتحديد نطاق ورقة عمل من مربع، أو أن اكتب في نطاق فيه. يعرض عنصر التحكم RefEdit عنوان الخلية أو نطاق (يمكن أن تكون خلية واحدة أو نطاق من الخلايا المتجاورة أو غير المتجاورة) الذي يختار المستخدم أو يدخل عن طريق كتابة فيها للحصول على خلية أو نطاق عناوين التي يتم تخزينها في التحكم RefEdit . رابعا:CheckBox الخاصية قيمة خانة اختيار تشير إلى ما إذا كانت محددة أم لا. تشير قيمة True إلى تحديد خانة الاختيار، خطأ يشير إلى أن يتم مسح عليه، ويدل على قيمة خالية التي لا تحديده ولا تطهيرها، وسوف تظهر مظللة خانة الاختيار في هذه الحالة. يجب تعيين قيمة الخاصية TripleState (يمكن وضعها إما في إطار خصائص أو باستخدام ماكرو أو التعليمات البرمجية ل VBA) إلى True لخانة الاختيار ليكون لها قيمة خالية. خامسا:OptionButton يستخدم OptionButton لجعل اختيار واحد من خيارات متعددة. ويشار أيضا إلى أنه على زر الراديو، الذي يختار خيار واحد من مجموعة من الخيارات الخاصة التبادلية. إذا لم يتم تجميع OptionButtons، واختيار واحد OptionButton في UserForm سوف ازالة اختيار كل OptionButtons الأخرى في النموذج. جميع OptionsButtons ضمن مجموعة معينة تصبح يستبعد بعضها بعضا ومكتفية ذاتيا ضمن تلك المجموعة ولا تؤثر على اختيار OptionButtons خارج تلك المجموعة. سوف اختيار مثال التطبيقات والشرح والاكواد مشروحة سطر سطر مع التنفيذ لكل أداة بالمرفقات التالية وللموضوع بقية في شرح UserForm Controls - Frame, MultiPage and TabStrip ScrollBar.rar

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