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

السلام عليكم 🙂 مجهود مميز من فريق عمل 🙂 اهلا وسهلا برجوعك اخي ابو ياسين 🙂 وانت الآن تحت اعين المراقبة 🙂 جعفر

ان شاء الله يكون طلبك Expr1: IIf([Movement]="بيع" Or [Movement]="مرتجع بيع" Or [Movement]="هدية" Or [Movement]="تالف" Or [Movement]="مفقود";DLookUp("[CustomerName]";"CustomersT";"[CustomerID]= " & DLookUp("[CustomerNum]";"InvoiceHT";"[InvoiceNum]= '" & [InvoiceNum] & "'"));IIf([Movement]="شراء";DLookUp("[SupplierName]";"SuppliersT";"[SupplierID]= " & DLookUp("[SuppliersNum]";"InvoiceHT";"[InvoiceNum]= '" & [InvoiceNum] & "'"));IIf([Movement]="مرتجع شراء";DLookUp("[SupplierName]";"SuppliersT";"[SupplierID]= " & DLookUp("[SuppliersNum]";"InvoiceHT";"[InvoiceNum]= '" & [InvoiceNum] & "'"))))) Inv1.accdb

طريقة اخرى [رقم العقد] = Format(Int(Rnd * 123456 + Me.id), "000000")

بيانات الموظف ومرفقات منوعة للموظف الفيديو الصور

انظر مثالك ..... prog_Nouveau Microsoft Access Base de données (2).accdb

ابحث في المنتدى هناك الكثير من الموضوعات حول صلاحيات المستخدمين مثل هذا على سبيل المثال ....

حياك الله ....

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

وعليكم السلام ورحمة الله وبركاته حياك الله أخي @ناقل في المنتدى ... اهلا وسهلا بك . اولا : إقرأ هذا : اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف ثانيا : اسئل بعد البحث في الموضوع في المنتدى ..... وجميع الاعضاء هنا يحاولون الإجابة أهلا وسهلا بك أيضا اقرأ هذا ما يخص المواضيع القديمة بما أنك عضو جديد في المنتدى

أخي @بلال اليامين وضح سؤالك والمطلوب .... هل تقصد صلاحيات مستخدمين

استاذ عصام انت استاذنا ومنك نتعلم

أخى الفاضل qathi نظرا لأن نوع الحقل RepairType نصى فيجب وضع الارقام الخاصة به بين علامتى تنصيص Expr1: IIf([RepairType]="1";"صيانة";IIf([RepairType]="2";"برمجة";IIf([RepairType]="3";"صيانة وبرمجة";""))) بالتوفيق عفوا أخى kha9009lid لم أدرك انك قمت بالاجابه

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

شكرا لك اخوي خالد ، بحثت عن المجاميع في المكان الخطأ ، فما لقيته وكما قال اخوي خالد: . . . جعفر

جرب المرفق Inv1.accdb

شكرا أستاذ @محمد احمد لطفى شكرا لمرورك واهتمامك لكني اردت ان اجعلة في التقرير ليس استعلام او نموذج

حسب ما فهمت من السؤال ربما يكون هذا الملف نموذج عما تريد اذا ادركت انك ادرجت اسماً بالخطأ اضغط على الزر Undo كلما ضغطت مرة على Undo تستطيع أن تمسح اخر تسجيل في الصفحة الثانية اذا اردت مسح كل البيانات من الصفحة الثانية اضغط على الزر Clear Data Direct to Other_Sheet.xlsm

اذا تم الحصول على رقم تسلسل ، ثم بعدها تم الانتقال الى سجل جديد (يعني الامرين بعد بعض) ، فهذا يحفظ السجل السابق ، ولا يتحقق التكرار 🙂

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

أخي الحبيب @kha9009lid أشكرك على ماتبذله من مجهود .. بارك الله فيك ورزقت الخير والصلاح في دنياك واخرتك

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

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

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

جرب الان Inv1.accdb

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

ما قصرت رحم الله والديك

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

يمكن وضعه في التقرير من خلال اضافة حقل غير منضم وضع الكود في مصدر السجل لهذا الحقل ويمكن تحديد عدد خانات الترقم من خلال عدد خانات الرقم وعدد الاصفر =Format(Int(Rnd()*12345+1);"00000")

وعليكم السلام-تفضل كما بالملف لتفعيل الماكرو تلقائيا وهذا ملف اكسل تنفيذي لتمكين وحدات الماكرو تفعيل الماكرو 2تلقائياً.xlsm ملف اكسل تنفيذي لتمكين وحدات الماكرو.rar

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

أستاذ @kha9009lid سوف اتعبك معي بما اني ضغيف جدا بالاكواد ممكن تخبرني اين اضع هذا الكود وماذا تعني برقم العقد وكذلك ماذا يعني ME.ID

صديقي تستطيع ان تحصل على نفس النتيجة من خلال هذه المعادلة (بدون 6 مسلسلات من شروط IF ) اذ ربما كان هناك 50 شرط او اكثر =C3+LOOKUP(B3;{1;10;25;50;100};{0.5;1;1.5;2;3}) اذا لم تعمل معك المعادلة استبدل الفاصلة المنقوطة " ; " بفاصلة عادية " , " خارج الأقواس فقط { } اما داخل الاقواس لك حق الاختيار او تغيرها كلها او تبقيها كلها لتبدو المعادلة هكذا =C3+LOOKUP(B3,{1;10;25;50;100},{0.5;1;1.5;2;3}) في القوسين الاولين الشروط وفي القوسين الباقيين النتيجة (ترتيب الارقام من الأصغر للأكبر داخل أقواس الشروط ضروري)

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

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

وعليكم السلام-تفضل Vendor Accounts Receivables.xlsm

تفضل بعد اذن الأستاذ عبدالله الرقم المسلسل.xlsx

نعم ، الكل سيحصل على نفس الرقم المكرر ، ولتلافي هذا ، يجب حفظ السجل بعد عملية اخذ الرقم التالي مباشرة ، مثلا: me.ID=Nz(DMax("[id]";"monsrf";"Month([c_date])=Month(date())"))+1 docmd.runcommand accmdsaverecord . بهذه الطريقة ، سيكون هناك فاصل زمني بين نقر زر كل مستخدم ، حتى ولو بجزء من الثانية ، والبرنامج تلقائيا سيعطي الارقام بدون تكرار 🙂 جعفر

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

بارك الله فيك وجزاك الله كل خير

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

أحسنت استاذى الكريم بارك الله فيك

اهلا بك اخى الكريم فى المنتدى-بالتأكيد بعد اذن استاذنا الكبير ضاحى الغريب وذلك كما بالصورة

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

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

وعليكم السلام -كل عام وانتم بخير وعيد مبارك انظر الى هذه الصورة فقد تفيدك في كيفية وضع ولصق الكود في ملف وورد

أحسنت استاذ مجدى نشاط ملحوظ بارك الله فيك

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

الحل الأول : الاول اختيار النص المطلوب تحديث الاشارات به ،و ليكن صفحة او فصل او فقرة او حتى المستند ككل من خلال Ctr+A و ان كان ذلك قد يكون اجراء بطيئ فى حال المستندات الكبيرة ، ثم اضغط F9 فيتم تحديث الحقول ( الاشارة ضمن سياق الكلام) فى النطاق المختار دفعة واحدة الحل الثاني : و هو هام جدا ايضا ، و هو التأكد من التحديث قبل الطباعة و هذا من خلال File Options Display Printing Options Update Fields before printing و هذا الخيار غير مفعل بصورة نمطية و يجب تفعيله بصورة يدوية

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

حياك الله استاذ محمود .