alsihran

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

مع الاسف استاذ @saad abed هذا المطلوب انظر الصورة اتالية توضح العملية من خلال العد اليدوي والنتيجة التي ظهرت من خلال عملك جدول pivot table اللون الاحمر يوضح نتيجة العد اليدوي لكل قيمة من رقم 2 لكل خلية في كل عامود اما ما قمت به انت جزاك الله خير كل الاعمدة تعطي رقم 17

اعتذر منك أخي الكريم رفقت الملف الخطأ اليك المرفق الجديد المطلوب نفس اللي انت عملته عد القيمة رقم 2 لكل عامود حسب العمود Extension شاكر ومقدر لك datea.xlsx

مع الأسف ليس المطلوب شكرا لمحاولتك

ليس هذا المطلوب أخي الكريم المطلوب عمل Pivot Tabels واظهار الاعمدة s1 s2 s3 s4 s5 s6 s7 s8 s9 s10 وعد القيمة 2 لكل id_Ccallg من كل من عمود شكرا لك

السلام عليكم المطلوب بالمف المرفق عد الخلايا التي تتضمن القيمة 2 لكل id_Ccallg في كل عامود من خلال جدول Pivot Tabels المصنف1.xlsx

تمام هذا حل المشكلة وهذا تمام شكرا لك

بعد أذنك استاذ 1- لاحظت أن الفورم frm_relink لم يعد يغلق تلقائيا بعد فتحه كما في السابق لو كان عندي اكثر من جدول اكسل هل نعيد تكرار الكود مع تغير أسم الملف للربط If tdf.Name = "shet_Data" Then Call CurrentDb.TableDefs.Delete(tdf.Name) DoCmd.TransferSpreadsheet acLink, acSpreadsheetTypeExcel12Xml, _ "shet_Data", CurrentProject.Path & "\Data.xlsx", True, "ورقة1" & "$" Else

👍 شكرا لك

المرفق لو سمحت شكلك نسيت ترفعه😇

للرفع

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

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

السلام عليكم بالمرفق يوجد قاعدة بيانات للجداول و والواجه عند الدخول على الواجهة Data وفتح نموذج frm_relink يتم الاتباط بقاعدة الجدوال Data_be في نفس مجلد البرنامج والامور تمام المطلوب : الارتباط بجدول الاكسل الموجود في نفس المجلد بنفس طريقة الارتباط بجدول الاكسس برمجيا حاولت اطبق نفس الطريقة لكن فشلة محاولتي Relink.rar

اعتقد ولا أجزم بأن هذه الجزئية تمت اضافتها من قبل موقع الاستضافة مؤخراً لتخفيف الضغط على السيرفر تخيل ان كل شخص يفتح الاتصال مع قاعدة البيانات ويترك الاتصال مفتوح بدون العمل كم مقدار الضغط الذي سيتعرض له السيرفر لذلك وضعوا هذه البرمجية لفصل الاتصال أعيد وأكرر لا أجزم بهذا الكلام بعد مشاهدة رابط الموضوع اللي وضعه استاذنا ابو خليل صار عندي تصور عن المطلوب سؤالك هذا غير مجرى الموضوع 180 درجة سأعطيك رايي كمستخدم لمواقع الاستضافة لقواعد بيانات SQl Server لمدة 6 اشهر 1 - طريقة ربط الاكسس مع جداول قواعد بيانات Sql server عن طريق ODBC أو ما يعرف بالاتصال المتصل بحيث يتم انزال نسخه مرتبطه من الجداول في قاعدة بيانات الاكسس وعند فتح الجدول يبقى الاتصال مفتوح دون انقطاع هذه الطريقة غير مجديه فعند وصولك لعدد 500 سجل ومحاولة عمل استعلام فرز وعمليات حسابية او جلب بيانات مرتبطه ستكون هذه المعالجة للبيانات بطيئة جدا جدا اضف الى ذلك عند فتح الاستعلام من خلال نموذج وعمل بعض الاوامر البرمجية ستصاب بالملل لأن جلب البيانات للنموذج في حالة كان لديك عدد السجلات المذكورة سيأخذ منك وقت لايقل عن 3 دقائق كحد أدنى ربما يخطر لك سؤال هنا وتقول ان هذا بسبب موقع الاستضافة بناء على المساحة التي قمت بشرائها والسرعه ...... ألخ سأجيب واقول لك جربت اكثر من موقع ومن ضمنها مساحه على Azure وهذا من أفضل المواقع للاستضافة إن لم يكن أقواها على الاطلاق بناءً على نوع الاشتراك عند تجربته تحسن الاتصال نوعا ما وكان الأمر شبه مقبول ولكن قيمة الاشتراك في هذه السيرفرات مكلف جدا طبعا الأمر يختلف تماما عند عمل سيرفر على جهازك او من خلال شبكه داخلية ستجد الأوامر سريعه جدا بناء على مواصفات الجهاز نأتي للأمر الأخر 2- الاتصال بقواعد بيانات Sql Server في مواقع الاستضافة بتقنية Dbset أو ما يعرف بالاتصال المنفصل ان شاء الله يكون المصطلح صحيح بحيث تقوم بتعريف الاتصال والمتغيرات وتكتب جمل الاتصال بالجدول او stored procedure أو الاستعلام تفتح الاتصال وتجلب او ترسل البيانات ثم تقوم بإغلاق الاتصال بدون أن يكون عندك جداول حيث يتم تخزين البيانات في الذاكرة وتقوم باستعراضها عن طريق النموذج او تقوم بالاضافة او التعديل والحذف ثم تعيد ارسالها الى قاعدة البيانات مباشرة للجدول او عن طريق stored procedure هذه الطريقة مشابه بحد كبير الى طريقة برامج visual basic هذه الطريقة جدا ممتازة وسريعه جدا إذا كان بناء البرنامج صحيح وكل شي تمام ولكن تحتاج جهد وعمل كبير وكثير يعاب على هذه الطريقة عدم استطاعتك بناء بعض التقارير عن طريقها حيث ستحتاج الى تصميم جداول مؤقته ثم تجلب البيانات وتخزنها بالجدول وبعد ذلك تستطيع بناء التقرير وهذا هو موضوع كود الاتصال الذي وضعته لك أتمنى أكون قدرت افيدك بشي عن الموضوع

الكود اللي وضعته لك جاهز sqldb.Open "Provider=SQLOLEDB;Data Source=SQL8003.site4now.net;Initial Catalog=;User Id=أسم قاعدة البيانات;Password=الباسورد"

السلام عليكم ورحمة الله عندي جدول يوجد به عامود يحتوي على خلية تحتوي على ثلاث قيم 1 2 3 اريد انشاء عامود جديد في جدول Pivot Table يعد لي قيم الخلايا التي تحتوي الرقم 2 انا عملت المعادلة لكن المشكلة تقوم بعد جميع القيم =COUNT(Qry_tblData[S10])

جربت هذا الموقع جيد يعطيك تجربة 60 يوم https://www.smarterasp.net/ هذا كود الاتصال وعند تسجيلك وانشاء قاعدة البيانات سيعرض لك جميع انواع الاتصال تقريباً sqldb.Open "Provider=SQLOLEDB;Data Source=SQL8003.site4now.net;Initial Catalog=;User Id=UserName;Password=********"

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

قيمة المتغير Paath= string يتم جلبها من مربع تحرير وسرد من العمود الثالث paath = Me.city.Column(2)

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

السلام عليكم عندي هذا الكود لفتح ملف اكسل وشغال تمام sXlsFile = CurrentProject.Path & "\ReasonsExtension_Bad.xlsx" الان اريد اجعل اسم الملف متغير فقمت بعمل تعريف للمتغير بالشكل التالي Dim sXlsFile As String sXlsFile = Empty Dim paath As String paath = Empty paath = Me.city.Column(2) sXlsFile = paath وخزنت المسار بالكامل في الجدول لكل ملف كما موضح بالصورة المرفقة المشكلة عند تنفيذ الكود واستدعاء اسم الملف تظهر علامات تنصيص زياده ولا يتعرف على مسار الملف ارجو المساعده في حل الاشكال

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

عفواً اقصد تحديث نفسها جملة الاستعلام التي قمنا من خلالها بتحديث النصوص نجاح فشل Na الى ارقام عند تشغل الاستعلام مرة اخرى قوم بتحول رقم 1 و 2 الى رقم 3 بسبب ان تشغيل الاستعلام مرة اخرى سيجد ان رقم 1 و 2 لاتساوي نجاح فشل يقوم بتحديثها الى رقم 3 هذه الجملة من الاستعلام المسؤولة عن الامر IIf([ff] <> "نجاح" And [ff] <> "فشل" And [ff] <> "Na", 3,

نعم استاذ حلة المشكلة الى نوع ما لانه اذا اعدت تشغيل الاستعلام مره ثانية يقوم بتحويل رقم 1 ورق 2 الى رقم 3 حسب الشروط تحياتي وتقديري شكرا لك