كل الانشطه

شكرا استاذ ظريقة سهلة جدا ونقلت القيم لأماكنها المخصصة في الورد كما صمم لها ملاحظة : احببت طريقة ProgressBar فوجدت بها مشكلة عند الصورة

فعلا مع التجربة لاحظت أن البوكمارك يمكن أن تنحذف أو تنلغي بسهولة مع أي تعديل للملف .. فكرتك عبقرية فعلا 👌

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

بما انك وصلت لهنا النتيجة انك فهمت الموضوع لكن اذكرك لاتنسى حفظ مستند الوورد بعد أي تعديل . تفضل المرفق بعد التعديل بطلبك 4 اماكن مختلفة . طالع كود الاكسس ومستند الوورد . اليك المرفق . هذه الطريقة لا تمنع المستخدم من تعديل النصوص المدمجة بشكل عشوائي . كما ظهرت في تجارب المستخدم السابقة . Taher DZ-1.rar

بقيت مشاكل في النقل بالترتيب انظر المرفق استاذ نقل ورد.rar

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

تفضل استاذ @jo_2010 كود الزر بعد التعديل بطلبك .ووافني بالرد . Private Sub أمر1595_Click() Dim TaskDialog As Y_CTaskDialog Set TaskDialog = New Y_CTaskDialog Dim sSubReport As String sSubReport = Screen.ActiveControl.Caption ' مسار التصدير Dim sBasePath As String Dim sFolder As String Dim sPDF As String sBasePath = CurrentProject.Path sFolder = sBasePath & "\MyReports" ' إنشاء المجلد إن لم يكن موجودًا If Dir(sFolder, vbDirectory) = "" Then MkDir sFolder End If With TaskDialog .Init .ParenthWnd = Me.hwnd .Flags = TDF_RTL_LAYOUT Or TDF_USE_COMMAND_LINKS _ Or TDF_USE_IMAGERES_ICONID_BUTTON .AddCustomButton 101, _ " طبـاعـة كـل التقـارير بتاريخ " & " / " & DDate & vbLf & _ " عدد التقارير " & URn & " تقرير ", 5380 .AddCustomButton 102, _ " طبـاعـة تقــريــــر واحــــد " & vbLf & _ " باســــم / " & PNAME & " ", 5351 .AddCustomButton 103, _ " تــراجــــــع عـن الطبــاعـة ", 5315 .SetWindowsButtonIconSize 32 .MainInstruction = "جمعية حماية البيئة من التلوث" .Content = "معمـل الام والطفــل" .IconMain = 76 .Title = "طباعـــة" .Width = 250 .ShowDialog Select Case .ResultMain ' ===== الحالة 101 ===== Case 101 Me.Refresh ' مسار واسم ملف PDF sPDF = sFolder & "\AllReports_" & _ Format(Me.DDate, "yyyy-mm-dd") & ".pdf" ' فتح التقرير في وضع مخفي DoCmd.OpenReport "Y_N_Report", acViewPreview, , _ "ddate = #" & Format(Me.DDate, "yyyy-mm-dd") & "# AND NOT IsNull(colour)", _ acHidden, sSubReport ' تصدير التقرير إلى PDF DoCmd.OutputTo acOutputReport, "Y_N_Report", acFormatPDF, sPDF, False ' إغلاق التقرير DoCmd.Close acReport, "Y_N_Report" ' فتح ملف الـ PDF بعد التصدير Application.FollowHyperlink sPDF ' ===== الحالة 102 ===== Case 102 Me.Refresh Dim PatientName As String Dim FileDate As String Dim RLM As String Dim LRM As String RLM = ChrW(&H200F) ' Right-To-Left Mark LRM = ChrW(&H200E) ' Left-To-Right Mark ' اسم المريض PatientName = Me.PNAME ' تنظيف الرموز غير المسموحة PatientName = Replace(PatientName, "/", "-") PatientName = Replace(PatientName, "\", "-") PatientName = Replace(PatientName, ":", "-") ' التاريخ FileDate = Format(Date, "dd-MM-yyyy") ' اسم الملف (اتجاه مضبوط 100%) sPDF = sFolder & "\" & _ RLM & PatientName & RLM & "_" & LRM & FileDate & ".pdf" ' فتح التقرير بشكل مخفي DoCmd.OpenReport "Y_N_Report", acViewPreview, , _ "[PCode]=" & Me.PCode, acHidden, sSubReport ' تصدير PDF DoCmd.OutputTo acOutputReport, "Y_N_Report", acFormatPDF, sPDF, False ' إغلاق التقرير DoCmd.Close acReport, "Y_N_Report" ' فتح ملف الـ PDF Application.FollowHyperlink sPDF Case 103 Exit Sub End Select End With Set TaskDialog = Nothing End Sub

الملف نفس الثقل مثل ما سويته أنا باستخدتم worksheetfounction هل يمكن تسريعه أكثر من كذا؟ هل المصفوفات تعمل على معالجة البيانات خارج ملف الإكسل ثم تضع النتائج؟

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

التوفيق للجميع ان شاء الله استاذي العزيز 🌹 زر البحث موجود بالقاعدة التي تم تحميلها مسبقاً ☝️ ويكون البحث مخصص لسجلات موظف معين في النماذج الفرعية

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

ممتنه لك استاذي العزيز تعبتك معي 🌹🌹 وجميلةً جداً طريقة الحل التي طرحتها👍 بالنسبة لنماذج الادخال هي بالفعل كذلك ( نماذج ادخال وبنفس الوقت تستخدم للبحث ) 😉 ولكن لن اضطر للضغط 50 مرة للبحث لاني وضعت زر مخصص للبحث مرة اخرى شكراً لك استاي العزيز جعلها ربي في ميزان حسناتك

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

من المفترض انها نماذج إدخال بيانات وليست نماذج عرض سجلات ، إلا اذا كنتي رح تضطري تضغطي 50 مرة للبحث عن سجل معين داخل سجلات الجدول !!!! على العموم ، تم إضافة زرين ( التالي - السابق ) للنموذجين مع دالة تستعرض السجلات الخاصة بالموظف الحالي فقط .. تفضلي :- ربط واجهات3.zip

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

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

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

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

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

تُقدّم شركة مكتبتك – شبكة المعلومات العربية خدمة أكاديمية متخصصة في التحليل الإحصائي باستخدام برنامج EViews لتحليل البيانات الاقتصادية والقياسية بدقة عالية، إلى جانب التحليل الإحصائي للبيانات باستخدام Smart PLS لبناء النماذج الهيكلية وتحليل العلاقات بين المتغيرات وفق منهجية علمية متقدمة، كما نوفر شرح برنامج SPSS بالصور بأسلوب مبسّط وتطبيقي يساعد الباحثين على فهم خطوات التحليل الإحصائي وتفسير النتائج وكتابتها أكاديميًا، ونحرص في مكتبتك على تقديم دعم علمي متكامل يُسهم في رفع جودة البحث وزيادة فرص قبوله وتميّزه الأكاديمي.

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

تُقدّم شركة مكتبتك – شبكة المعلومات العربية خدمة أكاديمية متكاملة في التحليل الإحصائي باستخدام Excel لإعداد الجداول وتحليل البيانات بدقة ووضوح، إلى جانب التحليل الإحصائي باستخدام برنامج R لتنفيذ الاختبارات الإحصائية المتقدمة واستخلاص النتائج العلمية، كما نوفر دعمًا احترافيًا في برنامج NVivo لتحليل البيانات النوعية يشمل ترميز المقابلات وتحليل النصوص واستخلاص النتائج وربطها بأهداف الدراسة، ونحرص في مكتبتك على تقديم تحليل علمي متكامل ومفسّر أكاديميًا، بما يُسهم في رفع جودة البحث وزيادة فرص قبوله وتميّزه الأكاديمي.

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

تُقدّم شركة مكتبتك – شبكة المعلومات العربية خدمة أكاديمية متخصصة في التحليل الإحصائي للبيانات وتحليل البيانات الإحصائية وفق منهجية علمية دقيقة ومعايير جامعية معتمدة، نُساعد الباحثين في تنفيذ تحليل إحصائي لرسالة ماجستير بدءًا من إعداد وتنظيف البيانات، مرورًا باختيار الاختبارات الإحصائية المناسبة، وصولًا إلى تفسير النتائج وكتابتها بأسلوب أكاديمي احترافي، ونحرص في مكتبتك على تقديم تحليل دقيق ومفسَّر علميًا، بما يُسهم في رفع جودة الرسالة العلمية وزيادة فرص قبولها وتميّزها الأكاديمي.

دفعني الفضول للسؤال عن هذه النقطة والتوضيح لها أستاذ خليفة ،، لماذا ليست آمنة !!!