رمهان

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

موست ويلكم !

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

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

جزاكم الله خيرا وجزيل الثواب اخ محمد عصام ويمكن اضافة العدد 1 على التاريخ او انقاصه فهو بمثابة زيادة يوم او انقاصه ! فالتعبير في مثال الاستاذ يوسف ممكن ان يكون : Me.txtDate = Me.txtDate + 1 للزيادة و -1 للانقاص تحياتي

اهاه ! فهمت الان ! لا اعتقد مباشرة او متسمى on fly ولكن كفكرة صدر التقرير في مجلد ال temp لديك ثم اعرض منه وهنا عند اغلاق الجهاز ستذهب كل الملفات المؤقتة ! بالتوفيق

مشكور استاذ عبدالرحمن وهذه مشاركة معكم تعديل حقل التعبير بعمود balance في الاستعلام ليصبح : Balance: Nz(DSum("[الوارد]-[الصادر]";"العمليات";"[التسلسل]<=" & [التسلسل] & " and [رقم العميل]=" & [العملاء].[رقم العميل]);0) تحياتي

تفضل SHsabShahry.rar

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

حياك الله اخ احمد قبل الاجابة حنسولف معاك شوية انت تريد معرفة من قام بادخال البيانات ؟ صح ؟ هنا ماعليك الا ان تضع خاصية القيمة الافتراضية للعناصر بنموذج frm مساوية للعناصر بنموذج الدخول ! ثم اعمل استبدل السطر التالي : DoCmd.Close acForm, "frmLogin", acSaveNo ب : me.visible=false ام تريد معرفة من قام بالتعديل ؟

اخ حسين : قلت غير مكرره ؟ ثم قلت نفس البيانات ؟ حصل لدي لبس ! اللي عايز اوصل له هو : هل التقرير الواحد به اكثر من سجل ام سجل واحد فقط ويتم تكراره؟ وعايز اعرف لما تعمل معاينه للتقرير : كم ملصق لديك في الصفحة الواحدة ؟ وكم صفحة بالتقرير؟ ممكن تدخل الدردشة اعلى المنتدى اخ حسين !!

ممكن توضيح اكثر اخ محمد ؟

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

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

تنبيه:بقي شرط العميل مع شرط التسلسل الموجود استاذ عبدالرحمن !

اعزائي عزيزي واخي الاستاذ الخبير ابو عارف وبعد اجمل واطيب تحية اقول دائما ان التفكير منطقيا في المشكلة قبل الحل هو ذات اهمية كبيرة ! فكرت في هل طافت هذه على ميكروسوفت ! فبحثت قليلا في دوال الاكسس فوجدت الدالة التالية : formatnumber واتوقع هي لما نحتاج في التقريب ! وهنا نفذت فكرة كانت تدور في ذهني وكاتالي : Function ramhan_round(xnumber, xrounded) ramhan_round = Format(xnumber, IIf(InStr(1, xnumber, ".") > 0 And xrounded <> 0, "0.", "0") & String(xrounded, "0")) End Function =ramhan_round(125.366, 2) وباستخدام الدالة فورمات ! واخيرا يمكنكم تجربة الدوال : formatcurrency,formatdate,formatpercent لفائدة اكثر ! تحياتي

واقول المنتدى منور ؟ وشامين ريحة عود وعنبر ! تحياتي الاستاذ القدير ابو احمد

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

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

حيا الله الاستاذ ابا عارف اعجبني في الموضوع علاقته بالمواضيع التالية وتحديدا دالتي val و format ووجودهما في الرابط السابق! ودالة fix ووجودها في الرابط والذي لم يعجبني : وافقتني استاذ ابو عارف ان الموضوع ينحل بدالة فورمات وفي الرابط السابق الاول ! ولكن يوحي بموضوعك هذا ان لك وجهة نظر اخرى حول جدوى الدالة فورمات في التقريب ! فهل هناك ايحاء فعلا ام هو فيض من علمكم اثابكم الله ! تحياتي

صباح الورد اخوي جعفر Private Sub TreeView1_nodeClick(ByVal node As Object) On Error GoTo 10: MsgBox (CurrentDb.OpenRecordset("select sum(nz(credit,0))-sum(nz(debit,0)) from trans where account_id in(" & CurrentProject.AccessConnection.Execute("select id from accounts where code like '" & Left(node.Text, InStr(1, node.Text, ".") - 1) & "%'").GetString(, , , ",") & ")")(0)) 10: End Sub طبعا هي سطر واحد ولكن تم اضافة صيد الخطأ تحسينا ! وللعلم وضعت نفس معادلة اخوي جعفر مع التاكد بان المحاسبين حيزعلو ! فالرصيد هو طرح الاصغر من الاكبر ويبقى الفاصل هو طبيعة الحساب اما دائن او مدين ! تحياتي :: مبرمجين ومحاسبين واعضاء

جرب On Error GoTo 10: DoCmd.OutputTo acOutputReport, "q1", acFormatPDF MsgBox "meeting report has been saved succefully", vbInformation, "saving confirmed" 10: بالتوفيق

مررت بالصدفة بالرابط التالي وبه مشاركة قيمة للاستاذ ابو ادم ! تحياتي

السلام عليكم استفسار : لماذا تصدر التقرير للاكسل ؟ الهدف !! تحياتي

اخي الكريم سؤالك هو شبح المبرمجين ومنوة المحاسبين ! ولكن قبل مشاركة اخي جعفر هناك ملاحظة : وجود العمود c&n في الجدول وهو يمكن ان يكون محسوب ويستغنى عنه ولتوفير جهد كبير في الادخال ! استفسار : هل عمود code هو المرجع لتكويد الحسابات ولن يكون فارغ او به خطأ في التكويد ؟ مع العلم انني وجدتك معتمدا على id وال father في تعبئة التري ! بمعنى لو عمود code سيكون دقيقا في التكويد ساستخدمه لما طلبت وبطريقة سهلة جدا بل مرنة لمعرفة اجمالي ابناء كل حساب ! لاحظ قلت لك اجمالي لانه اعتقد هذا ماتقصده في كلمة رصيد ! اما رصيد الحساب فهذه قصة اخرى ستظهر لك لاحقا وبناء على الحركات الدائنة والمدينة لكل حساب بل مايزيدها تعقيدا ان لديك تعدد عملات والرصيد سيظهر بعملة واحدة ! وتعقيدا عندما يكون هناك عدة سنوات ! نرجع للموضوع وبالتحديد حول الملاحظة والاستفسار ! تحياتي