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

السلام عليكم ورحمة الله إخواني الكرام، أشارككم الموضوع بهاتين المعادلتين: =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 وطرق اضافتها والعمل عليها عيب يامعلم ابراهيم احنا مش بنبيع الفانكوش احنا بنصنعه البرنامج شغال وتمام التمام ولكن ارد ان يكون بموافقة الجميع ولو مستعجل هات ملف تنفيذي وارجعه ليك ملف اكسيل وشوف شرح الفيديو

السلام عليكم ورحمة الله وبركاته في احد البرامج التي اشتغلت عليها ، كان المطلوب احد الاشياء التالية مثلا: مدة الخدمة ، من تاريخ التوظيف الى اليوم ، إضافة خدمة (سنوات/اشهر/ايام) الى تاريخ التوظيف ، خصم مدة (سنوات/اشهر/ايام) من تاريخ التوظيف ، فبدل الحساب اليدوي ، عملت نموذج لآلة حاسبة ، للتواريخ النموذج frm_Date_Diff : حساب الفرق بين تاريخين: 1. ادخل التاريخ الاكبر في الحقل 1 ، وعند تغيير التاريخ سنرى الفرق بين التاريخين في الحقول سنة/شهر/يوم ، 2. ادخل التاريخ الاصغر في الحقل 2 ، وعند تغيير التاريخ سنرى الفرق بين التاريخين في الحقول سنة/شهر/يوم ، وعند النقر المزدوج على 1 او 2 ، فان القيم سيتم حفظها في الحقول 11 و 22 مؤقتا ، بحيث تستطيع ان تقوم بعمليات اخرى وتغيير التواريخ ، بينما تحتفظ بأصل التواريخ في 11 و 22 ، إضافة / طرح (سنوات / اشهر / ايام) من تاريخ: 1. احذف التاريخ من الحقل 2 ، 2. ادخل سنة/شهر/يوم الى الخانات 3 و4 و5 ، 3. حسب الحاجة ، اختر 6 لإضافة السنة/شهر/يوم الى التاريخ الاول ، وسترى النتيجة في الحقل 2 ، 4. حسب الحاجة ، اختر 7 لطرح السنة/شهر/يوم من التاريخ الاول ، وسترى النتيجة في الحقل 2 ، وعند النقر المزدوج على 3 او 4 او 5 ، فان القيم سيتم حفظها في الحقول 543 مؤقتا ، بحيث تستطيع ان تقوم بعمليات اخرى وتغيير السنوات/الاشهر/الايام ، بينما تحتفظ بالاصل في 3 و4 و5 وهنا مثال متحرك: جعفر 301.Dates_Calculations.mdb.zip

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

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

برنامج لحساب ضريبة كسب العمل للعاملين بالقطاع الحكومى بمصر طبقا لتعديلات القانون 2013 و 2014 ومرفق شرح للبرنامج على الرابط http://arabsh.com/files/0c324d4b64fa/برنامج الضرائب والتعليمات الخاصه بتشغيله.rar.html

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

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

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

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

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

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

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

Parent بمعنى والدين وبما اننا ننادي من النموذج الفرعي ، ننادي حقل في النموذج الرئيسي ، فلهذا السبب نخبر الكمبيوتر ان الحقل n1 موجود في النموذج الاب (النموذج الرئيسي) جعفر

من غير ما اشوف المشروع كفيت ووفيت اخي عبد العزيز انا سايب رجالة ورايا قد المسئولية بارك الله فيك اخي الغالي وفي كل ا لاخوة الموجودين لكم مني كل الشكر والتقدير

السلام عليكم ورحمة الله وبركاته الحقيقة نحن في الشهر 12 من العام وتعلم خصوصية هذا الشهر بالنسبة للمحاسبين . وأنا ضمن مؤسسة قريبة من شركة تعهدات ومقاولات ومواد بناء فيها محاسب واحد وهو العبد الفقير الذي يراسلكم أحياناً أتمنى أن ساعات العمل مثل ساعات الصيف حيث الرحابة والسعة والدفء....سأقترح تغيير رأس السنة ليكون صيفاً...فما قولك؟!!.

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

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

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

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

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

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

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

جرب هذا الملف Book1.rar

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

دائما روعة أخى الحبيب / ياسر جزيت خير الجزاء على الأعمال الرائعة التى تقدمها تقبل تحياتى

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

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

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

حياك الله أخي طه محمد حامد trim يستخدم لإزالة الفرغات التي تسبق وتلحق متغير نصي string مثلا لو كان النص " محمد " = name فإن (trim(name سوف ترجع لنا النص بدون الفرغات يعني "محمد" ويوجد أيضا الإقتران Ltrim الذي يزيل الفرغات التي تسبق المتغير النصي فقط والإقتران Rtrim الذي يزيل الفرغات التي تلحق المتغير النصي فقط str ويرجع نتيجة نصية للرقم المدخل فمثلا MyString = Str(459) وهي نصية "459 " النتيجة هي MyString = Str(-459.65) وهي نصية "459.65-" النتيجة هي MyString = Str(459.001) وهي نصية "459.001 " انتيجة هي cdate اقتران تحويل نوع بيانات حيث يرجع القيمة بنوع تاريخ لأي تاريخ مدخل بأي تنسيق مقبول والجدول التالي يبين أنواع اقترانات تحويل أنوا البيانات مع النتيجة ومدى التحويل ----------------------------------------------------- النتيجة تكون من نوع / الإقتران / المدى للقيمة لمدخلة CBool/ Boolean / أي متغير أو تعبير نصي CByte / Byte / من 0 إلى 255 CCur / Currency / من -922,337,203,685,477.5808 إلى 922,337,203,685,477.5807 CDate / Date / أي تنسيق تاريخ مقبول CDbl / Double / المدى من -1.79769313486231E308 إلى-4.94065645841247E-324 للقيم السالبة; 4.94065645841247E-324 إلى 1.79769313486232E308 لقيم الموجبة. CDec / Decimal / المدى +/-79,228,162,514,264,337,593,543,950,335 للأرقام التي بدون منازل فواصل عشرية، للأرقام التي لها أكثر من 28 منزلة عشرية +/-7.9228162514264337593543950335. أصغر رقم أقل من صفر 0.0000000000000000000000000001. CInt / Integer / المدى -32,768 إلى 32,767; الكسور تقرب. CLng / Long/ المدى -2,147,483,648 إلى 2,147,483,647; الكسور تقرب. CSng / Single / المدى -3.402823E38 إلى -1.401298E-45 للقيم السالبة; 1.401298E-45 إلى 3.402823E38 للقيم الموجبة. CStr / String / القيمة المرجعة تعتبر على العامل المدخل للإقتران. CVar / Variant / نفس المدى مثل Double للأعداد. نفس المدى مثل String للأرقام النصية (غير الأعداد) مع وافر الاحترام

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