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

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

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

ومشاركة مع الأستاذ السيد جمال هنا اعدادات الوهتميل hotamil Set emailObj = CreateObject("CDO.Message") 'بريد المرسل emailObj.From = "xxx@hotmail.com" ' العناوين المراد الإرسال لها emailObj.To = "xxxx@gmail.com" & ";" & "xxxx@yahoo.com" & ";" & "xxxx@hotmail.com" emailObj.Subject = "عنوان الرسالة" emailObj.TextBody = "نص الرسالة " 'emailObj.AddAttachment "c:\windows\win.ini" Set emailConfig = emailObj.Configuration emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.live.com" 'Exclude the following line 'emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 587 emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "xxx@hotmail.com" ' هنا تضع بريد الهوتميل وكلمة المرور emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "كلمة المرور هنا" emailConfig.Fields.Update emailObj.Send If Err.Number = 0 Then MsgBox "Done" بالتوفيق

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

وعليكم السلام انا غيرت في الجدول ، وجعلت الامكانية ، لكل نموذج اسم مستقل الوحدة النمطية التي تقوم بالعمل: Function myName(F) myName = DLookup("[frm_Caption]", "tbl_frm_Caption", "[frm_Name]='" & F & "'") End Function ونناديها سواء على حدث "تحميل النموذج" او "فتح النموذج" ، هكذا: Me.Caption = myName(Me.Name) والنتيجة جعفر 365.for form.Caption.mdb.zip

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

شكرا أخي الكريم وجزاك الله خير الجزاء تمت بحمد الله وتوفيقيه الامر ثم بفضل جهدك الطيب لقد قمت بترحيل جميع الكائنات الى ملف أخر وجربت الكود Me![Désignation] = Me![ID_Tarif].Column(1) Me![Prix_unitaire] = Me![ID_Tarif].Column(2) ونجح الامر الف شكر للاستفادة هذا تمريني الأول facture new.rar

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

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

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

حياك الله والفضل يعود للأستاذ رمهان جعفر

وعليكم السلام من خصائص التقرير / لسان التبويب تنسيق الاتجاه / اجعله من اليسار الى اليمين

السلام عليكم قد يكون الموضوع مش جديد وعلى المبتدئين ! ولكن يمكن ان يكون من نوع السهل الممتنع ! الموضوع : عند اضافة بيانات لحقل معين اريد ان يشيك اولا هل هو موجود فيذهب لذلك السجل او يستمر في الاضافة عند عدم وجود المكرر ان ما جعلني اكتب هذا الموضوع هو ان احد الاخوة طرح هذا السؤال وهو شخص اعرف ان مستواه جيدا فقمت بالبحث في اماكن عدة فلم اجد جوابا شافيا ! ويكثر الطلب عليه دائما ! وضعت هنا طريقتين وعند الحدث قبل التحديث للحقل: 1. وهي المطبقة في المرفق: Private Sub Id_BeforeUpdate(Cancel As Integer) Set rs = Me.RecordsetClone rs.FindFirst "id=" & Me.Id If Not rs.NoMatch Then Undo Me.Bookmark = rs.Bookmark MsgBox ("موجود هنا") End If End Sub 2. Private Sub Id_BeforeUpdate(Cancel As Integer) idx = Me.Id If DCount("*", "persons", "id=" & idx) Then Undo DoCmd.FindRecord idx MsgBox ("مكرر هنا") End If End Sub تحياتي متمنيا الفائدة ومستقبلا التعقيب وراغبا في المشاركة بافكار اخرى check_before_ins_upd.rar

صدر بحمد لله كتاب (مشروعي) و هو كتاب متكامل باللغة العربية في إدارة المشاريع والاعداد لشهادة PMP. الكتاب من تأليف كلٍ من: د/عمرو مسلم و م/ محمد طاهر عرفه ويقع في أكثر من 800 صفحة تغطي المجالات المعرفية الأساسية لإدارة المشروع ،كما يمثل الكتاب مرجع عربي متكامل لمن يرغب في الاستعداد لشهادة مدير المشروع المحترف PMP. اعتمد الكاتبان بالأساس على تبسيط الإصدار الخامس من الدليل المعرفي لإدارة المشروعات ليس من خلال الاختصار ولكن عن طريق الشرح والتوضيح وإضافة أمثلة وتلميحات ورسومات توضيحية وخرائط ذهنية ومعلومات يحتاجها كل مدير مشروع مع الكثير من التمارين المتنوعة في أسلوبها وذلك لضمان استيعاب القارئ لما جاء في كل فصل من معلومات. ويحوي الكتاب خاصية فريدة لتوضيح أين سيتم استخدام أهم مخرجات كل عملية كمدخلات للعمليات الأخرى، مما يؤدي لمساعدة القاريء على الربط المتميز بين كافة العمليات و المجالات المعرفية الواردة في الكتاب. بالإضافة الى ذلك، يحوي الكتاب ما يقارب 500 سؤال تدريبي للاستعداد لاختبار شهادة مدير المشروع المحترف PMP بالإضافة الى 60 نموذج من أهم النماذج المستخدمة في إدارة المشاريع ، فضلا عن تطبيق عملي لاستخدام أهم النماذج ضمن فصول الكتاب، وأخيرا قائمة بأهم المصطلحات المستخدمة في إدارة المشاريع وترجمتها. أخيراً، فإن الكتاب مُوَجه لكل من يفتقد مادة علمية متكاملة في إدارة المشاريع باللغة العربية والتي قد تمثل عاملاً مهماً لتخطي حاجز اللغة الانجليزية والتي جاءت بها معظم الكتب والمراجع في هذا المجال. لمعلومات التوزيع و التواصل ووصلة الكتاب على موقع أمازون إضغط هنا

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

السلام عليكم ورحمة الله وبركاته إخواني الكرام وأحبابي في الله أقدم لكم اليوم موضوع خفيف دمه ظريف ، ومفيد جداً جداً إلى أبعد مما تتصور ...الموضوع يتمركز حول استخدام كلمة NOT والتي تعكس القيمة أي إذا كانت القيمة True فإنها تصبح False ، وإذا كانت القيمة False تصبح القيمة True ... وإليكم أمثلة تطبيقية لتأكيد المعلومة وكيفية الاستفادة منها المثال الأول : Sub ToggleFormulaBar() Application.DisplayFormulaBar = Not Application.DisplayFormulaBar End Sub نجد نفس السطر اللي على اليسار هو هو كما على اليمين ، فقط أضفنا كلمة NOT والتي تعكس القيمة فإذا كان شريط المعادلات مخفي أصبح ظاهراً ، وإذا كان شريط المعادلات ظاهراً أصبح مخفياً .. سأدرج بقية الأمثلة مع ذكر الفائدة من كل كود ، والفكرة نفسها في كل الأمثلة ------------------------------------------------------------------------------------------ المثال الثاني : Sub ToggleShowZeros() ActiveWindow.DisplayZeros = Not ActiveWindow.DisplayZeros End Sub الكود لإظهار القيم الصفرية وإخفائها المثال الثالث : Sub ToggleGridlines() ActiveWindow.DisplayGridlines = Not ActiveWindow.DisplayGridlines End Sub الكود لإظهار خطوط الشبكة وإخفائها المثال الرابع : Sub ToggleDisplayHeadings() ActiveWindow.DisplayHeadings = Not ActiveWindow.DisplayHeadings End Sub الكود لإظهار عناوين الصفوف والأعمدة المثال الخامس : Sub ToggleScrollBars() ActiveWindow.DisplayHorizontalScrollBar = Not ActiveWindow.DisplayHorizontalScrollBar ActiveWindow.DisplayVerticalScrollBar = Not ActiveWindow.DisplayVerticalScrollBar End Sub الكود لإظهار أشرطة التمرير الأفقية والرأسية وإخفائها المثال السادس : Sub ToggleWorkbookTabs() ActiveWindow.DisplayWorkbookTabs = Not ActiveWindow.DisplayWorkbookTabs End Sub الكود لإظهار تبويبات المصنف أي أسماء أوراق العمل المبوبة وإخفائها المثال السابع : Sub ToggleStatusBar() Application.DisplayStatusBar = Not Application.DisplayStatusBar End Sub الكود لإظهار شريط الحالة وإخفائه المثال الثامن : Sub ToggleShowFormulas() ActiveWindow.DisplayFormulas = Not ActiveWindow.DisplayFormulas End Sub الكود لإظهار المعادلات في ورقة العمل وإخفائها (التعامل هنا ليس مع شريط المعادلات) المثال التاسع : Sub ToggleShowColumns() Columns("I:J").Hidden = Not Columns("I:J").Hidden End Sub الكود يقوم بإظهار الأعمدة I و J وبالطبع إخفائها أرجو أن يكون الموضوع نال إعجابكم ... وهذه صورة من الملف المرفق حمل الملف من هنا وأخيراً تقبلوا وافر تقديري واحترامي

السلام عليكم هذه الطريقة في توليد الأرقام صالحة لأي برنامج بمعنى ليس بالضرورة أن يكون منجز بالإكسل ملاحظة 1 يمكن توليد أكثر من 100 صف أفقيا كما هو الآن و ذلك بتغيير المتغير x و يمكن توليد أكثر من عشر أعمدة رأسيا كما هو الآن و ذلك بتغيير المتغير y كما أن الكود يقوم بالتأكد من تشابه الأرقام التسلسلية فإن كانت هناك مشكلة يخبرك بها و يقوم بتلوين الخلايا المتشابهة ملاحظة 3 كل هذه الحيل لا تنطلي على متخصص في الإكسل لكن المعروف أن المتخصص لا يشتري برنامجا بل يصنعه بنفسه . و السلام عليكم توليد سريل نمبر.rar

وجزيت خيراً أيها المتهرب من ذكر اسمه .. قلت لك مش هسيبك بارك الله فيك وجزيت خيراً على مساهمتك الجميلة والرد عليها بهذا السطر CommandButton1.Caption = IIf(CommandButton1.Caption = "1", "2", "1") أبسط وأيسر

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

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

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

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

اذا صورة او صورتين صغار ، فما في مشكلة ان شاء الله هذا كود السطر الواحد ، واللي يربط الصورة بالنموذج/التقرير: شوف هذا الرابط ، فيه الكثير ، بس إقرأه على كيفيك ، إبدأ من اول السؤال وهذا جعفر

السلام عليكم ورحمة الله وبركاته اخي ابو يوسف جزاك الله كل خير وبارك الله فيك على هذه الموضوع هل يمكن تلوين خمس أزرار الفورم

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

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

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

السلام عليكم و رحمة الله و بركاته .... إكمالاً لعملك الكبير أخي ابو سليم أرفق ملفين الأول من تصميمي و سبق لي أن و ضعته بالمنتدى في وقت سابق و الآخر مأخوذ من أحد المواقع الأجنبية ... _______________________________________________ في المرفق MoNo أقدم لكم ( برنامج المطبعة ) نسخة تجريبية من البرنامج مع ملف يشرح أساسيات البرنامج _______________________________________________ في المرفق Mohammed هل تريد أن تظهر لك حكمة اليوم أو نكتة اليوم أو حديث اليوم كلما فتحت برنامجك ؟؟؟ هل تريد أن يكون برنامجك كاملاً ... حتى أن شاشة الـ TIPs تظهر لك كلما فتحته ؟؟؟ و أن تقوم بتعطيل ظهورها إن أردت تماماً كبرنامج الأوفيس الذي صنعت برنامجك به !!! حمل المرفق MONO.rar Mohammed.rar

وعليكم السلام اخي سلمان انا استعملت حقل من نوع ATTACHMENT وادخلت الصورة مياشرة في الجدول. جعفر 366.SA1.accdb.zip

أخي الحبيب وائل صراحة أخشى أن أخطيء .. فالخطأ هنا لا محل له من الإعراب قمت بتعديلات بسيطة على الملف بحيث يكون أيسر للناظرين اطلع عليه وراجعه بشكل جيد حتى يكون مرجع للجميع وتكون نسخة موحدة .. وأفضل بعد عمليات المراجعة أن يتم حذف هذا الموضوع أو التنويه أن الموضوع مغلق وهناك موضوع أحدث منه وتوضع فيه النسخة النهائية بعد المراجعة الدقيقة لها جزاك الله خير الجزاء على كل لحظة قضيتها في حفظ كتاب الله تقبل وافر تقديري واحترامي UthmanicHafs1 V.9 14-4-2016.rar

اخى محمد جزاك الله خيرا

الله ينور حبيبي (أنجم) نفس كلمة ابو البراء بس مصري بارك الله فيك وجزاك كل خير تقبل تحياتي

أخي الفاضل مشكلتك ليست في الكود ، وانما في البرنامج ككل ، واعدادات الوندوز ، والدليل هو رسالة OLE Active x . افتح ملف اكسس جديد ، واستورد جميع كائنات هذه البرنامج الى البرنامج الجديد ، ثم جرب الكود جعفر

السلام عليكم عمل جميل جزاكم الله خيرا اخي ابو البراء واخي وائل و جعله الله في موازين حسناتكم

شكرا اخي jjafferr وبعد اذن حضرتك انا غيرت الحل اني لغيت قرأه الوحده النمطيه اني ادخل فيها الجمله مباشره من غير قراه من الجدول

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

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

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

اخى محمد فكره جميله ومشكورا على المجهود المبذول بارك الله فيك تقبل تحياتى

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

طيب قبل إضافة الحماية هل كان الكود يعمل بشكل جيد يرجى إرفاق آخر نسخة من الملف للإطلاع عليه

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

استاذ كرار ايش رايك Private Sub aaa_AfterUpdate() tw.Visible = aaa = "متوفي" ts.Visible = aaa = "شهيد" End Sub

جرب ان تضع التعبير التالي كعمود جديد بالاستعلام query1 Expr1: DCount("*","items","categoryid=" & [CategoryID] & " and itemid<=" & [ItemID]) بالتوفيق

السلام عليكم الاخ الكريم ناصر ما تقصد بقولك ..... اضغط على زر اظهار السري وهو بدون كلمة سر اريد ان اجعل الكود الموجود يعمل بمتل هذه الطريقة جزاك الله خيرا ارجو توضيح طلبك حتى بتم العمل على تحقيقة

حياك الله اعمل استعلام وفي حقل تاريخ اخر معاملة اعمل المعيار التالي date()+30 بالتوفيق

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

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

علي فكرة أستاذي أنافي أنتظارك منذ الصباح الباكر منذ إشتراكي في هذا المرفق لأني متشوق للجديد من حضرتك بصراحة قمة في الروعة والجمال بارك الله فيك بصراحة أشتراك حضرتك في عمل لية بيضفي علية قيمة وجمال بارك الله فيك أستاذي وأكثر من أمثالك عفوا أستاذي فعلا ( دالة sumif ) تعمل في جميع نسخ الأوفيس ولكن يتم إستدعائها كتابتا في النسخ مابعد 2003 لحكمة من ميكروسوفت

السلام عليكم تم التعديل على التفقيط الإنجليزي ويبقى عملية إضافة s الجمع فهل هي مطلوبة هنا وخصوصا أنه كثير من الأحيان يستخدم اختصارات للعملة مثل S.R أو علامة الدولار $ . تم معالجة القيم Null بعد عمل دالة شبيهة للـ Nz حيث هي غير متوفرة في الأكسل ومطلوبة بشدة في الأكسس وهي بإسم myNz . شكرا لكل من أبدى برأيه وملاحظاته ولازلت بانتظار المزيد . تحياتي . الملفات المرفقة Num2Text_97.zip ( 56.12ك ) عدد مرات التنزيل: 267