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

السلام عليكم ورحمة الله إخواني الكرام، أشارككم الموضوع بهاتين المعادلتين: =OFFSET($A$1;ROW()-1;ROW()-1) و =INDIRECT(ADDRESS(ROW();ROW())) بن علية

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

بسم الله الرحمن الرحيم 1- المكتبات والادوات DLL & OCX 2- كيفية تسجيل المكتبات والأدوات Dll & OCX في النظام 3- كيفية إضافة المكتبات وأدوات خارجية للفيجوال والعمل عليها ما هي فوائد استخدام ملفات ال DLL او لماذا نستخدم ملفات DLL: ماذا تعني DLL: هي اختصار لمجموعة الكلمات التالية Dynamic link libraries لمحة سريعة عن DLL: هي عبارة عن ملفات مترجمة(Compiled files) شبيهة الى حد بعيد جدا بالملفات التنفيذية و التي تحمل اللاحقةExe, ملفات ال DLL يمكن ان تحتوي على Codes او يمكن ان تحتوي على مصادر resources او ممكن ان تحتوي على بيانات Data و قد تجد DLL يحتوي على كل ما سبق ذكره, و لكن الفرق الجوهري بين DLL و Exe هو أنّ ملفات DLL لا يمكن تنفيذها بشكل مباشر و انما يتم استثمارها من قبل تطبيقات اخرى اي ان ملفات DLL ليست مستقلة بحد ذاتها و تحتاج الى تطبيق دائماً للاستفادة منها مع انها تحتوي على اكواد تنفيذية مثلها مثل exe و لكن لا يمكنها ان تعمل بمفردها و يمكنك تخيل ان ملفات DLL هي ملفات مساعدة للتطبيق للقيام بعمله. الهدف الرئيسي من وجود ملفات DLL هو مشاركة الاكود بين العديد من التطبيقات اي استخدام نفس ال DLL من اكثر من تطبيق سواء بوقت واحد او بشكل منفصل. والادوات ocx تشبه نفس وظائف dll بصورة كبيرة كيفية تسجيل الأدوات نفترض ان لدينا ملف dll او ocx نريد اضافة للنظام للعمل عليه من داخل الفيجوال بطريقة سليمة الطرق كثيرة ولكن نختصر ونضع الخلاصة نفترض انا لدينا اداة اسمها actskin4.ocx نقوم بنسخها لملفات النظام اذا كان 32 لملف c:\windows\system32\actskin4.ocx اما اذا كان النظام 64 bit فلا بأس من نسخ الملف مرتين في المسارات الاتيه c:\windows\system32\actskin4.ocx C:\Windows\SysWOW64\actskin4.ocx ونقوم بعمل نوت باد اذا كان النظام 32 نضع هذا السطر regsvr32 c:\windows\system32\actskin4.ocx ونحفظه بامتداد bat وليكن اسم الملف reg.bat اما نظام ال64 نضع الاسطر التالية regsvr32 c:\windows\system32\actskin4.ocx regsvr32 c:\windows\SysWOW64\actskin4.ocx وتعمل لكلا النظامين ويتم الحفظ ايضا بامتداد bat واسم الملف ليكن هكذا reg.bat وغالبا يتم فتح الملف بعد ذلك كمسئول كليك يمين وRun admin لتظهر نافذة تقول انه تم التسجيل بنجاح ولقد وضعت برنامج في المرفقات للتسهيل علي البعض في تسجيل الاداوت كيفية إضافة المكتبات وأدوات خارجية للفيجوال بعد ان قمنا بنقل الادوات الى ملفات النظام سواء 32bit or 64bit وتم تسجيلها كما بالشرح السابق نقوم بفتح مشروع جديد وبكدا نكون تعلمنا طريقة وضع الادوات علي الفورم ناتي لكيفية التعامل معها برمجيا وكمثال هنعمل علي نفس الاداة المدرجة في اعلاه وهي actskin4.ocx ما فائدة هذه الاداة : تقوم بتغيير المظهر العام لوجهه الفورم والازرار الى واجهات skinمعدة للتعامل مع هذه الاداة وهي من اللمسات الجمالية للبرنامج بتاعنا عيب الاداة : ان الليبل الاصلي لا يظهر عند تشغيل البرنامج ولا اداة image ويأتي مع الأداة ليبل بديل لليبل الاصلي يظهر مع الاداة وتستبدل الimage بال picture نأتي لكيفية التعامل معها برمجيا اولا نقوم بانشاء مشروع جديد واضافة الاداة كما سبق ويتم وضع الكود الخاص بالاداة في حدث تحميل الفورم وممكن وضعه باي حدث نشاء كزر مثلا لتغيير الskin كود التشغيل يجب اولا ان يكون لديك ملفات skin ليتم التطبيق عليها عن طريق الاداة قمت بارفاق بعض ال skin للتطبيق عليها ووضعتها داخل مجلد داخل البرنامج بتاعنا وسميته كمثال skin الكود البرمجي Private Sub Form_Load() ' سطر استدعاء وتحميل ملف الskin من مسار البرنامج داخل المجلد skin اسمه Yasser.skn Skin1.LoadSkin (App.Path & "/skin/yasser.skn") 'سطر تطبق ما تم استدعائه Skin1.ApplySkin Me.hWnd End Sub واحفظ مشروعك وقم بتشغيله لترى هذا شوف الفرق اي استفسارات توضع ف موضوع الردود والاستفسارات الى اللقاء والسلام عليكم مع تحياتي ياسر العربي يتبع مرفق برنامج تسجيل الاداوت والمشروع المنفذ ف الشرح RegOCX.rar مشروع لمسه جمالية.rar

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

بسم الله الرحمن الرحيم ارجو عدم التعليق داخل الموضوع لسهولة الوصول للدروس تباعا والتعليق يكون داخل الموضوع في الرابط التالي http://www.officena.net/ib/topic/65630-الردود-والاستفسارات-عن-دروس-الفيجوال-بيسك6-والاكسيل-ياسر-العربي/ أما ألان دعونا نغوص في بحور الفيجوال قليلا وترك الإكسيل مؤقتا لحين الإلمام بمبادئ الفيجوال وبداياته ثم نتحول للربط بينهم فيما بعد أولا قمت بإرفاق نسخة محمولة من برنامج الفيجوال بيسك6 موجودة هنا صغير الحجم وتفي بالغرض ألان http://up.top4top.net/downloadf-top4top_20111f0b9a1-rar.html نقوم بتفعيل البرنامج من VbPortable6.reg ثم نقوم بتشغيل البرنامج منvb6 وان واجهتم اي مشكلة في التشغيل يرجى تشغل البرنامج كمسئول كما بالصورة تظهر لنا الشاشة الآتية 1- فتح مشروع جديد 2- فتح مشروع موجود مسبقا 3- اخر مشروعات تم فتحها 4- وهو المشروع الافتراضي الذي سنعمل عليه دائما نقوم بفتح standard.exe جديد سيظهر لنا بالشكل التالي 1- شريط القوائم 2- شريط الادوات القياسي 3- نافذة المشروع 4- نافذة الخصائص 5- شريط الادوات 6- نافذة الفورم او برنامجنا وبكدا نكون عرفنا شكل الواجهه للبرنامج نخش في مقارنة سريعه قبل البدأ في العمل علي المشروع بين هذه النافذه ونافذه محرر الاكواد داخل الاكسيل وهذه صورة لنافذة محرر الاكواد داخل الاكسيل 1- شريط القوائم 2- شريط الادوات القياسي 3- نافذة المشروع 4- نافذة الخصائص 5- شريط الادوات 6- نافذة الفورم او برنامجنا ايه دا تخيلو ان احنا بنتعامل مع نفس محرر الاكواد كله كان مصعبها علي نفسه ويقول برمجة ومش عارف ايه اهو هو هو محرر الاكواد بس التوسع في مجال اخراج البرامج انما الواجهه وطريقة العمل هي بعينها طيب وبعدين ياعم الحاج كمل اقول لكم حاجه حلوة كمان ومقارنة سريعه تانية نفس الادوات واسمائهم بس مش عارف بيرخموا ليه وبيزودو كلمة بوكس وبوتن يعني لما نكتب مثلا تكست بوكس 1 بتساوي تكست بوكس 2 نعملها كدا اكسيل TextBox1.Text = TextBox2.Text فيجوال بيسك6 Text1.Text = Text2.Text دا الطبيعي العادي وممكن نسميهم مثلا اسيل1واسيل2وتمشي مع المحررين Aseel1.text = aseel2.text اظن كدا الصورة وضحت لمعظم الموجودين والمتابعين يلا بينا نعمل برنامجنا الاول مع بعض وقبل المشروع الاول نبدأ بمشروع بسم الله الرحمن الرحيم نضع عدد واحد تكست وكومند1 نضغط علي الكومند مرتين ليظهر محرر الاكواد نضع به التالي ثم نضغط run او F5 ثم نضغط علي الزر ليظهر لنا بسم الله نبدأ من جديد طيب لحفظ المشروع علي هذا الوضع نقوم بالذهاب الى قائمة File ومنها save project as ونحدد له مكان ونحفظ يتم حفظ المشروع وعدد الفرومات الموجودة معه طيب عاوزين نحول البرنامج بتاعنا لتنفيذي بقي عشان نشغله علي أي جهاز ونفرج الناس علي ابداعنا في الفيجوال بردو من قائمة file نختارmake project ونضعه في المكان اللي احنا عاوزينه وهذا شكل البرنامج ناخد مشروع تاني علي السريع صغير ايضا عبارة عن أله حاسبة بسيطة المكونات تلاته تكست تلاته ليبل اربعه كومند كما بالصورة ونضع بداخل الفورم الاكواد التالية ونحفظ المشروع ونحوله لملف تنفيذي كما تعلمنا سابقا وزي الشطار كدا كل واحد يرفق المثال اللي عمله في موضوع الردود والاستفسارات عن درس الفيجوال بيسك6 والاكسيل وانا علي ثقة تامة ان الاخوة المتابعين سيبدعوا في العمل انا حاولت اشرح بطريقة تقليدية بسيطة ولكن هلاقي منكم ابداع غير عادي باذن الله وهلاقي برامج تانية بتتعرض منكو باذن الله مع تحياتي ياسر العربي يتبع

السلام عليكم ورحمة الله وبركاته للمهتمين بعلوم واسرار الاكسيل ( زكاة العلم نشره شارك معى الجميع) معظمنا سمع عن الدالة المخفية DATEDIF ولكن هل سمعت عن الدالة EVALUATE انها ايضا دالة مخفية او سرية موجوده فى الاصدار Excel v4.0 macro function الصادر عام 1994 . وهذا شرح مبسط لكيفية عمل هذا الدالة . EV.zip

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

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

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

السلام عليكم ورحمة الله تفضل اخي ابو حمادة إليك ماطلبت ظهور الفورم بدون زر امر "نعم" وبعد خمسة ثواني يظهر. اخوكم في الله / ابو الحسن والحسين KHMB OnTime ظهور زر امر بعد خمسة ثواني.rar

أخي الحبيب إبراهيم أبو ليلة جرب الكود التالي عله يكون المطلوب Dim Str1 As String, Str2 As String Sub CreateWorkbook() Dim WB As Workbook Set WB = Workbooks.Add Str1 = ThisWorkbook.Sheets("Sheet1").Range("A1").Value Str2 = ThisWorkbook.Sheets("Sheet1").Range("A2").Value Application.ScreenUpdating = False Application.DisplayAlerts = False WB.SaveAs Filename:=ThisWorkbook.Path & "\" & Str1 & Str2 & ".xlsx" WB.Close True Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub Sub OpenWorkbook() Str1 = ThisWorkbook.Sheets("Sheet1").Range("A1").Value Str2 = ThisWorkbook.Sheets("Sheet1").Range("A2").Value Workbooks.Open Filename:=ThisWorkbook.Path & "\" & Str1 & Str2 & ".xlsx" End Sub

زمن العزه

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

استاذى الحبيب / محمد الريفى يشرفنى اكون اول المشاركين طبعا انت عايز تشغل مخنا شويه تقبل منى هذا الحل المتواضع بالمعادلات ضع هذه المعادله بالخليه O1 واسحبها نزولا لاسفل =INDEX($A$1:$N$14;ROW();ROW()) يوجد حلول اخرى بالمعادلات والاكواد ولكن اترك الفرصه لغيرى للمشاركه وتنوع الافكار واكيد انت عندك الحل المفاجأه اللى هيقش الكل تقبل تحياتى

الله ينور ابو يوسف الهدايا الحلوة دي حبيبي ابو البراء حمدا لله علي السلامة ياغالي اتفضل ياغالي نوسعلك مكان وبخصوص الاداة نشوف طريقة نطبقها علي ال64 تقبلو تحياتي

أخي الحبيب ياسر العربي جيت متأخر أوي .. ويبدو إن المصطبة مفيهاش مكان فاضي للعبد لله إن شاء الله عندما أنتهي من بعض المشاغل والأمور سأقوم على الفور بمتابعة الموضوع الشيق والممتع والأكثر من رائع وفقك الله لما يحب ويرضى أبي الحبيب أبو يوسف مشكور على الهدية الغالية يا غالي وربنا ما يحرمني منك ولا من هداياك القيمة .. عمل رائع وجميل لي استفسار أخي الكريم ياسر العربي بالنسبة للأداة التي تقوم بتسجيل ملفات ocx وملفات dlll لا تعمل على ويندوز 64 بت !! لأني جربتها مع ملف ولم تقوم بالتسجيل فقمت بتسجيلها بشكل يدوي فهل من طريقة لجعل الأداة تعمل على 64 بت نظراً لسهولة التعامل معها

فين الفنكوش يا عربي ؟ ولا هو فاشوش .. شوقتنا لرؤية القنبلة الموقوته

وعليكم السلام 1. غير الاعدادات حسب السهم الى نعم 2. ضع الكود في حدث النقر المزدوج للحقل كود الصنف: Private Sub كود_الصنف_DblClick(Cancel As Integer) Me.Parent.n1 = Me.كود_الصنف End Sub جعفر

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

إخواني الكرام وأحبابي في الله جزيتم خيراً على شعوركم الطيب ومشاعركم الرقيقة تجاهي .. وأنا وربي يعلم أحبكم في الله أدام الله المودة والحب بيننا .. وما يمنعني عن إخواني إلا ظروف قاهرة بالفعل كان يوجد مشكلة كبيرة ولكن بفضل الله تم حل المشكلة ومعكم بإذن الله تقبلوا تحياتي

تعددت الطرق والغرض واحد يعني كله بيلف يلف ويحقق نفس الغرض الاساسي وارجو منك ارفاق بعض الامثلة التنفيذية لكسرها ايا كانت مع العلم ان فيه احتمالية طرق لتحويل الملفات لتنفيذية متشتغلشي معايا فقد تكون تعمل باليه غير المتبعه في اغلب الملفات التنفيذية ولكن لها الحل ايضا باذن الله اما موضوع ملفات Dll او المكتبات الديناميكية Dynamic link libraries هي عبارة عن ملفات مترجمة(Compiled files) شبيهة الى حد بعيد جدا بالملفات التنفيذية و التي تحمل اللاحقةExe, ملفات ال DLL يمكن ان تحتوي على Codes او يمكن ان تحتوي على مصادر resources او ممكن ان تحتوي على بيانات Data و قد تجد DLL يحتوي على كل ما سبق ذكره, و لكن الفرق الجوهري بين DLL و Exe هو أنّ ملفات DLL لا يمكن تنفيذها بشكل مباشر و انما يتم استثمارها من قبل تطبيقات اخرى زي معظم لغات البرمجة المفروض دا الموضوع اللي كنت هشرحه في الفيجوال dll وطرق اضافتها والعمل عليها عيب يامعلم ابراهيم احنا مش بنبيع الفانكوش احنا بنصنعه البرنامج شغال وتمام التمام ولكن ارد ان يكون بموافقة الجميع ولو مستعجل هات ملف تنفيذي وارجعه ليك ملف اكسيل وشوف شرح الفيديو

السلام عليكم ،، ارفق اليكم البرنامج يعمل الان داخل معظم الشركات التى تعمل في مجال التجارة بالكويت (المنتجات التى تشتري من الصين -ويتم بيعها بالقطعة ) والبرنامج متعرض للموضيع الاتية : - أضافة اصناف . - أضافة عملاء وموردين. - أضافة نقاط بيع. - أضافة موظفين . - العهده النثرية بشكل شامل تمام.ا ارجو ان ينال اعجباكم والذي يريد اي استفسار يرسل لي بالبريد khaled95@yahoo.com Sales_Ma...ed_Ahmed.rar] Sales_Managment_By_Khaled_Ahmed.rar

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

أخي الكريم عصام جرب الكود التالي عله يكون المطلوب إن شاء الله Sub Wait10Seconds() Application.Calculation = xlManual Application.Wait (Now + TimeValue("0:00:10")) Application.Calculation = xlAutomatic End Sub تقبل تحياتي

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

وعليكم السلام نعم تستطيع بكود مشابه: Dim ctl As Control For Each ctl In Me.Controls If ctl.ControlType = acTextBox Then 'English ctl.ReadingOrder = 1 ctl.KeyboardLanguage = 11 'Arabic ctl.ReadingOrder = 2 ctl.KeyboardLanguage = 3 ElseIf ctl.ControlType = acComboBox Then 'English ctl.KeyboardLanguage = 11 'Arabic ctl.KeyboardLanguage = 3 End If Next جعفر

أخى العزيز الشيبانى لعل هذا المقصود مرفق مجموع القوائم.rar

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

السلام عليكم اخي العزيز اشكر اهتمامك بمشكلتي لقد جربت الطريقة وحلت المشكلة مع الشكر الجزيل

واشتغلت والحمد لله اشتغلت ...................... شويه اسكنات بقى من عندى هديه ليكو Skins.rar

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

السلام عليكم ارجو من الله ان يكون الغياب خير

يعني دي غلطتي إني بحاول أساعد حقك عليا يا أبو العربي .. أعتذر عن التدخل

أمر آخر أخي الكريم ياسر العربي فيما يخص الأداة الخاصة بالتسجيل يبدو أنها تعمل على 64 بت بدون مشاكل .. ولكن يجب أولاً نسخ الملف المراد تسجيله إلى مساره المحدد في Windows فهل بالإمكان أن تقوم الأداة بنسخ الأداة المراد تسجيلها إلى المسار System32 في حالة التعامل مع 32 بت ..أو إلى المسار SysWOW64 في حالة التعامل مع 64 بت؟ أخي الكريم إبراهيم فيما يخص مشكلتك .. لا داعي لإرفاق الملف actskin4.ocx في نفس مسار المشروع .. ولكن يجب أن تقوم بنسخ الملف actskin4.ocx إلى المسار المحدد في مجلد الويندوز إما إلى System32 في حالة التعامل مع ويندوز 32 بت أو إلى SysWOW64 في حالة التعامل مع ويندوز 64 بت .. ثم تقوم بتسجيل الأداة من خلال Command Prompt .. لابد من تشغيل البرنامج كمسئول أولاً ثم قم بتنفيذ السطر التالي regsvr32 C:\Windows\system32\actskin4.ocx أو في 64 بت regsvr32 C:\Windows\SysWOW64\actskin4.ocx

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

بارك الله فيك أبي الغالي أبو يوسف موضوع جميل و في غاية الروعة والبساطة فاصل بلا فواصل .. فإخوانك في انتظار المزيد والممتع والمفيد

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

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

ههههههههههههه تصدق والله وانا بنزل الموضوع كنت هاكتب في الاخر الاخ ياسر العربي ممنوع من الدخول لاني كنت متأكد انك هاتقول الجمله دي احساسي ماخيبش المره دي الحمد لله احنا بنعمل اللي علينا ياحبيبي ياابو العربي

اولا ، لا يوجد مرفق (المنتدى يقبل الملف المضغوط zip او rar) ثانيا ، يعني تريد تبحث عن شئ غير موجود!! جعفر

بسم الله الرحمن الرحيم اليوم سنتحدث - عن خصائص المشروع الخاص بنا كيفية فتح نافذة خصائص المشروع ومكونتها المهمة اولا نقوم بانشاء مشروع جديد كالعادة ونضع مثلا اتنين فورم وبعد الانشاء نقوم بالذهاب لخصائص المشروع كما موضح بالصورة فتظهر لنا النافذة التالية 1- المشروع الافتراضي ودا هنسيبه كدا 2- الفورم اللي محتاجينه يفتح عند تشغيل برنامجنا والوضع الافتراضي انه فورم واحد هو اللي بيفتح نفترض ان صممنا فورم اتنين علي اساس انه شاشة الدخول هنعمل ايه نغير من هنا ونخليها فورم اتنين بس يامعلم 3- اسم المشروع الافتراضي لو عاوزين كل ما نعمل مشروع بدل كلمة project نسميه اسم تاني عادي شغال 4- دا لو هترفق ملف مساعدة مع البرنامج باين انا شايف ان ننفض ليها نخش في المهم 5- Make ودي بقي الشغل المهم هنا ونشوف صورتها بقي 1- طبعا كلنا نعرف الإصدارات للبرامج اللي هي version ربنا كدا لما يكرمك وتبقي مبرمج قد الدنيا كدا وتلاقيك بتعمل برنامج اساسي كدا وبتعمل له اصدارات مختلفة من رقم واحد دا بنحدد رقم الاصدارة اللي بنعملها والافتراضي واحد ونغير زي ما احنا عايزين 2- عنوان المشروع ودا عشان بقي لزوم الكماليات عشان أي رسالة تنبيه مسج بوكس أي حوارات تظهر يبقي مكتوب فوقها في titlebar اسمنا كدا 3- ودي معلومات برنامجنا تحط فيه بقي كل بياناتك وحقوقك وشركتك وعلامات تجارية وملاحظات تظهر في خصائص برنامجنا. 4- ودي طبعا ايقونة المشروع بتاعنا النهائي واللي اخي عبد العزيز كان محتاجها بنختار ايقونة من ايقونات الفورمات الموجودة داخل المشروع طيب الايقونات الموجودة حاليا الافتراضية وشكلها رخم نعمل ايه ياعم عبد العزيز نروح للفورم واحد ونشوف كدا 1- نفتح لاختيار الايقونة المراد وضعها للفورم 2- نحددها ونضغط open لتظهر هكذا في اعلي يسار الفورم وايضا تظهر في الtaskbar عند فتح الفورم في البرنامج ملحوظة الايقونات اللي هتشتغل معانا الأيقونات بعمق ألوان 32bitاو اقل يعني 64 هتظهر اخطاء ومش هتنضاف للفورم نذهب بعد ذلك لخصائص المشروع ونروح ل Make كما بالصورة نجد ان الايقونة تغيرت لانه البرنامج بياخد الايقونة للفورم واحد افتراضي طيب لو غيرنا جبنا فورم اتنين كدا الايقونة الافتراضية للفورم اتنين لاننا لم نقم بوضع ايقونة له نرجع للفورم واحد ونحفظ مشروعنا ونحوله لملف تنفيذي ونشوف النتيجة وبكدا نكون خلصنا جزء خصائص المشروع والى اللقاء في درس اخر باذن الله تحياتي ياسر العربي يتبع

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

السلام عليكم ورحمة الله وبركاته كل ما سيأتي الفترة القادمة هو كيفية التعامل مع الادوات والفورم مثال باذن الله عن كيفية عمل برنامج بسيط لتشغيل القرأن الكريم من موقع tvquran كالعادة نبدأ بالادوات عدد فورم واحد كومند للخروج واحد image اداة الويب الشرح كما موجود امامنا الفورم وعليه الادوات الصورة والزر وصفحة النت فقط لتعديل الفورم بهذا الشكل يتم عمل كما في الصورة الاتية بعد اخفاء الشريط نأتي للصورة خلصنا من الصورة ندخل علي اداة الويب بعد وضع كل الادوات بهذا الشكل نقوم بوضع اسهل كود وهو كالتالي اول كود في الكومند1 Private Sub Command1_Click() End End Sub ثاني كود وهو في حدث تنشيط الفورم وظيفة الكود فتح الموقع www.tvquran.com/add/index.htm Private Sub Form_Load() WebBrowser1.Navigate "www.tvquran.com/add/index.htm" End Sub دائما الملف بعد الانتهاء منه لا يظهر في الاسفل في taskbar نقوم بتعديل الفورم كالاتي ليظهر في التاسك بار عند تشغيله واالاختيار بأسفله center screen لوضع الفورم في منتصف الشاشة عند الفتح كان هذا المصحف هدية لاخي الغالي ابو يوسف منذ فترة والان تم وضع كيفية عمل الهدية نفسها علها تنفعنا وتنفعكم والسلام عليكم يتبع مرفق المصحف ملف تنفيذي والمشروع المصحف.rar

وهذا الشرح : تم تحويل الوقت كاملا الى دقائق ! ثم القسمة بدون باقي على 60 لحساب عدد الساعات ! ثم ايجاد باقي القسمة على 60 لحساب الدقائق ! بالتوفيق

استدراك في العمود 113 قبل عمود النتيجة ... الخاله يعني ناجح أم دور تاني وعمود النتيجه معنناه مواد الدور الثاني ربنا يجزيك استاذنا الغلامة عنا كل خير

قي هذا المرفق ازلت جميع الخلايا المدمجة اختبارالفصل الدراسى الثانى لأي طالب في أي ماده يجب أن يساوي أو أكبر من 30 % من الدرجة النهائيه للماده ولاتكون غ الدرجة الأصلية لأي طالب في أي ماده يجب أن تساوي أو أكبر من 50% من الدرجة النهائيه للماده ولاتكون غ في الحالتين السابقتين يكون الطالب في هذه الماده ناجح أما إذا كان الطالب غايب في اختبار الفصل الدراسي الثاني أو أقل من 30 % أو (أقل من 50 % أو غايب في الدرجة الأصليه) يكون الطالب عتده دور ثاني في هذه الماذة حالة الطاالب.rar

الاخوة الافاضل ابو احمد وابو عبد الله وكيماس شكرا على التشجيع و خاصة الاستاذ كيماس الذي كان سباقا الى هذا العمل فنرجوا ان لا يحرمنا من صوته اما الاخ الكريم علي فشكرا على الاطراء الفرق هو ان الكود الذي تضعه في sheet1 sheet2.... فانه ينفذ على هذه الاوراق حصريا اما الكود الذي نضعه في this workbook فانه ينفذ على المصنف المفتوح و النشط باكمله

السلام عليكم ورحمة الله جرب اخى هذا المرفق _رأس و تذييل .rar

الأخ هاني إزي سعادتك!! بص اضغط على زر الأوفيس اضغط Excel Options Advanced Display options for workbook حتلاقي مربع اختيار show sheets tab شيل علامة الصح وعيش يا معلم أخوك أبو البراء

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