Foksh

وعليكم السلام ورحمة الله وبركاته .. معلمنا الفاضل ، أسعد الله مسائك . قد مررت بهذا السؤال مسبقاً وكنت لا أعلم سببه ، ولكني اكتشفت السبب بالصدفة 😅 موضحاً في الصورة التالية :- وأعتقد أن السبب في هذا يعود الى أن الجداول مرتبطة بـ SQL Server أو قاعدة بيانات خارجية . والمرجح عندي سابقاً لأنني كنت أقوم بتثبيت نسختين من أوفيس ( 64 بلإصدار أعلى = 2019 ، و 32 بإصدار 2010 ) فقد يكون هو أحد الأسباب . مع أنني غير متأكد من الإحتمال الثاني حقيقةً . هذا والله أعلم

العفو اخي الكريم 😇 وسعيد أن الفكرة أعجبتك 💐

وعليكم السلام ورحمة الله وبركاته .. بما أن الأستاذ @منتصر الانسي قد فتح باب المشاركات مع المعلم @ابوخليل ، اسمحولي أشارك بفكرة ثانية .. حيث أمكنت المستخدم من التوزيع العشوائي أو المتسلسل ED.zip

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

اقرأ هذه الموضوع

أين هي الرسالة 😎 ما الجديد ؟؟؟؟

وعليكم السلام ورحمة الله وبركاته .. جرب هذه الفكرة ، قد تجد أفضل منها من عباقرة قسم الآكسل وأنا متأكد من هذا .. حيث تم تجاوز حرف الألف المهموز مثل ( أ ، آ ، إ ) بحيث يأتيك بالقيم للحرف ا بجميع أشكاله . 77.zip

ارسل ملف يحتوي نموذجك وجدوله وحدد اسم مربع نص المصدر ومربع نص الهدف . وماذا تريد بالضبط اشرحه حتى نفهم مقصدك . مع العلم أن لطلبك هذا :- حل بسيط باستخدام الدالة Mid :- =Mid([txtNID], 3, 5) حيث الرقم 3 = من اي خانة تريد أن يبدأ الإقتطاع . وحيث رقم 5 = عدد الخانات التي تريد جلبها . طبعاً مع ضرورة أن تكون واثقاً من أن قيمة مربع النص المطروح كمثال هنا يحتوي قيمة تتكون من 7 خانات على الأقل حسب وصفك وكلامك . وحتى تعلم أيضاً أنه يمكنك استخدام هذه الدوال مع مساعدات كثيرة ، ولكن بدايةً جرب ما تم ذكره سابقاً . وإن شاء الله تنحل مشكلتك . خلاف ذلك نعود معك بعد ارسالك ملف

هنا ستضطر لدمج VBA في التنفيذ لأن الاستعلامات لا تقبل الدالة Replace المتعددة في الإستعلامات . وحيث أنك في تمنيك لم تفصح عنه إلا أن هذه محاولة بسيطة .. db2.zip

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

وعليكم السلام ورحمة الله وبركاته ,, هذه فكرتي المتواضعة التي استعملها ، وقد تجد أفكار أفضل بكثير منها .. فلا تتسرع 😉 db1.zip

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

وعليكم السلام ورحمة الله وبركاته ,, أخي الكريم أنت في كود زر التصدير والذي يعمل بشكل سليم بشكل مبدأي ، تقوم بتصدير الاستعلام ContactsExtended ، والذي هو فارغ فعلاً . من خلال السطر :- TableName:="ContactsExtended", _ لذا لا يتم تصدير البيانات التي تريدها ( واعتقد الجدول هو "بيانات" ) ، ولذا لتجربة النتيجة ، امسح ملف اكسل ، واستبدل السطر السابق بالسطر التالي كتجربة :- TableName:="بيانات", _ وتحقق هل يتم التصدير فعلاً ؟؟؟؟

وعليكم السلام ورحمة الله وبركاته .. استخدم الدالة Left أو Right حسب عدد الخانات التي تريد جلبها من اليمين أو اليسار ، مثل :- الدالة Left :- =Left([txtNID], 7) لنفترض ان مربع النص txtNID يحتوي على القيمة 28305678857 ، فالنتيجة ستكون أول 7 قيم من اليسار = 2830567 الدالة Right :- =Right([txtNID], 7) ولنفترض ان مربع النص txtNID يحتوي على القيمة 28305678857 ، فالنتيجة ستكون أول 7 قيم من اليمين = 5678857 وهناك تداخلات كثيرات قد يتم اضافتها لهذه الدالة .. ولكن جرب السابق إن كان يحقق طلبك أولاً 🤗

وعليكم السلام ورحمة الله وبركاته .. بداية نسأل الله أن يكون لك الأجر على النية التي تقصدها بنشرك هذه الفكرة . عند تشغيل الملف تظهر هذه الرسالة :- وعند النقر على Yes تظهر الرسالة التالية أيضاً :-

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

ملاحظة للأستاذ ابو البشر ، لاحظت انك حجزت المتغير العام :- Public PageSum As Double ولكنك استخدمت :- PageTot هلا أوضحت لي الفكرة !!! أم ان المتغير لا حاجة له

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

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

اخي وائل ، ربي يبارك فيك. وشكراً لمرورك 💐

وعليكم السلام ورحمة الله وبركاته .. بداية أهلاً بك معنا في عالمك المتواضع هنا .. قد اطلعت على الملف الآن ، وأول ما لفت انتباهي أنك ارسلت المشروع كاملاً متكاملاً وبجميع عناصر التي للأسف كانت باللغة العربية !!! لا أريد أن أكسر من مجاديفك أو أقلل من قيمة البداية الجميلة التي بدأتها ، وخصوصاً في العلاقات بين الجداول . خذ مني نصيحة أخذتها من أساتذتي هنا بأن :- أبتعد عن التسميات العربية للعناصر ومكونات الجداول والنماذج والتقارير . استخدام أكثر من كلمة للتسميات كافة ( وجود مسافة بين الكلمات ) ؛ حيث الأصح في بناء مشروع سليم هو استخدام إما إشارة Under Score "_" ، او أن تجعل الإسم بدون فراغات ولكن لتميز بين كلماته اجعل أول حرف من كل كلمة = حرف كبير = طبعاً للتسميات الإنجليزية . أدرج بيانات أكثر ولو بقليل من مجرد صنفين ، رغم وجود حركات كثيرة لها . لا تبخل في الشرح اذا كان طلبك متشعباً ( كثير الأحداث ) . فأسرف بالتوضيح ولا تبخل = من اين يبدأ التتبع أو البيع أو أين تسجل كل حركة ... إلخ من توضيح تراه مناسباً و وافياً . أعجبتني أيضاً فكرة ان الجداول الفرعية تحتوي على مفاتيح القيم الأساسية ( مثل اسم الصنف ، جهات التوريد ، المواقع ... ) فهي تسهل عليك لاحقاً الإستعلامات ( من وجهة نظري طبعاً ) . ومتأملين منك أن تعيد النظر في ملاحظاتي التي هي ليست إلا اقتراحات - وأنت صاحب الشأن - في النهاية وقد اكون اخوك الصغير الذي لا يفضل التعامل مع المسميات العربية لأنها مربكة ، وشكراً لتفهمك

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

بانتظار نتيجة تجربتك 😁 وربنا يستر 🤣

وعليكم السلام ورحمة الله تعالى وبركاته .. أحد الكتب الإلكترونية التي شاركه أحد الأخوة سابقاً تعلم آكسيس.pdf

وعليكم السلام ورحمة الله وبركاته .. استخدم هذه المعادلة كفكرة مبدأية في الخلية O3 ، ثم اسحب للتطبيق حتى X3 ( في نطاق الجدول 2 ) =IFERROR(INDEX($B$3:$B$22,AGGREGATE(15,6,ROW($B$3:$B$22)-ROW($B$3)+1/(COUNTIF($E$3:$N$3,$B$3:$B$22)=0),COLUMNS($O$3:O3))),"") جرب وأخبرنا بالنتيجة