كل الانشطه

تقدّم شركة سندك للاستشارات الأكاديمية والترجمة خدمة احترافية في إعداد خطة البحث العلمي، مع الالتزام بالمعايير الأكاديمية التي تساعد الباحث على بناء خطة متكاملة وواضحة، وللإجابة عن سؤال ما هي مكونات خطة البحث؟ فإن الخطة تتكوّن عادة من عناصر رئيسية تشمل: عنوان البحث، مشكلة الدراسة، أهداف البحث، أسئلته أو فروضه، أهمية الدراسة، المنهجية، الأدوات، وحدود البحث، والمراجع الأساسية، وتُعتبر معايير خطة البحث ضرورية لضمان جودة الخطة، مثل الوضوح والدقة في الصياغة، ترابط العناصر، تناسب المنهج مع أهداف الدراسة، وسلامة التوثيق العلمي، كما يتناول البحث أيضًا أهم الأسئلة الشائعة عن مكونات خطة البحث العلمي، لتوضيح نقاط الغموض التي قد تواجه الباحثين، وتقديم إرشادات عملية لتجنب الأخطاء الشائعة وضمان اعتماد الخطة أكاديميًا. https://www.sanadkk.com/blog/post/2720/%D9%85%D8%A7-%D9%87%D9%8A-%D9%85%D9%83%D9%88%D9%86%D8%A7%D8%AA-%D8%AE%D8%B7%D8%A9-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB.html

تقدّم شركة سندك للاستشارات الأكاديمية والترجمة خدمة متخصصة في إعداد خطة البحث العلمي وفق المعايير الأكاديمية المعتمدة، وبما يتوافق مع متطلبات الجامعات والمجلات العلمية، ويقصد بـ إعداد خطة البحث وضع تصور منهجي واضح للدراسة قبل الشروع في تنفيذها، يشمل تحديد مشكلة البحث وصياغة أهدافه وأسئلته أو فروضه، واختيار المنهج العلمي المناسب، مع بيان أدوات جمع البيانات وحدود الدراسة وأهميتها العلمية، ويُعد التوثيق في خطة البحث عنصرًا أساسيًا لضمان الأمانة العلمية ودعم الإطار النظري، حيث يتم الاستشهاد بالمصادر العلمية الموثوقة وفق أساليب التوثيق المعتمدة مثل APA أو غيره، مع الالتزام بالدقة في التوثيق داخل المتن وقائمة المراجع النهائية، أما معايير تقييم خطة البحث فتتمثل في وضوح مشكلة الدراسة، وترابط عناصر الخطة واتساقها، ودقة المنهجية المختارة، وجودة التوثيق العلمي، وسلامة اللغة والأسلوب الأكاديمي، إضافة إلى قابلية الخطة للتنفيذ وتحقيق أهداف البحث بموضوعية ومنهجية واضحة. https://www.sanadkk.com/blog/post/2721/%D9%85%D8%A7-%D9%87%D9%8A-%D8%A7%D8%B9%D8%AF%D8%A7%D8%AF-%D8%AE%D8%B7%D8%A9-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB.html

تقدّم شركة سندك للاستشارات الأكاديمية والترجمة خدمة احترافية في إعداد خطة البحث العلمي وفق الضوابط الأكاديمية المعتمدة في الجامعات العربية والدولية، مع مراعاة طبيعة التخصص ومتطلبات الجهة العلمية، ولمن يتساءل ما هي خطوات كتابة خطة البحث؟ تبدأ الخطة باختيار موضوع دقيق وقابل للدراسة، ثم صياغة مشكلة البحث وأهدافه، وتحديد أسئلته أو فروضه، يلي ذلك اختيار المنهج العلمي المناسب وأدوات جمع البيانات، مع تحديد حدود الدراسة وأهميتها العلمية، وصولًا إلى توثيق المراجع بطريقة منهجية سليمة، كما تحرص الشركة على تنبيه الباحثين إلى أخطاء كتابة خطة البحث العلمي الشائعة، مثل غموض المشكلة البحثية، وعدم اتساق الأهداف مع المنهج، وضعف التوثيق العلمي، إلى جانب تقديم إرشادات كتابة خطة البحث العلمي التي تضمن تنظيم المحتوى، ودقة الصياغة، وزيادة فرص اعتماد الخطة دون ملاحظات. https://www.sanadkk.com/blog/post/2722/%D9%85%D8%A7-%D9%87%D9%8A-%D8%AE%D8%B7%D9%88%D8%A7%D8%AA-%D9%83%D8%AA%D8%A7%D8%A8%D8%A9-%D8%AE%D8%B7%D8%A9-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB.html

توفّر شركة سندك للاستشارات الأكاديمية والترجمة خدمة متكاملة في إعداد خطة البحث العلمي وفق المعايير الجامعية المعتمدة، وبما يتوافق مع متطلبات الدراسات العليا والبحث الأكاديمي الرصين، وللإجابة عن سؤال ما هي طريقة كتابة خطة البحث؟ تبدأ الخطة بتحديد موضوع الدراسة بدقة، وصياغة مشكلة بحث واضحة، ثم وضع الأهداف والأسئلة أو الفروض، واختيار المنهج العلمي المناسب، مع تحديد أدوات البحث، وحدود الدراسة، وأهميتها العلمية والتطبيقية، كما تتيح الشركة نموذج خطة بحث علمي جاهز PDF يُعد مرجعًا إرشاديًا للباحثين، إلى جانب دليل يوضّح معايير كتابة خطة البحث PDF، بما يساعد على تنظيم الأفكار، وضبط المنهجية، وتجنّب الأخطاء الشائعة، وزيادة فرص اعتماد الخطة من الجهة الأكاديمية. https://www.sanadkk.com/blog/post/2723/%D9%85%D8%A7-%D9%87%D9%8A-%D8%B7%D8%B1%D9%8A%D9%82%D8%A9-%D9%83%D8%AA%D8%A7%D8%A8%D8%A9-%D8%AE%D8%B7%D8%A9-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB.html

تقدّم شركة سندك للاستشارات الأكاديمية والترجمة خدمة احترافية في إعداد خطة البحث العلمي وفق الضوابط المعتمدة في الجامعات والكليات البحثية، مع الالتزام الكامل بالمنهجية العلمية ومتطلبات الإشراف الأكاديمي، وعند الإجابة عن سؤال ما هي شروط خطة البحث؟ فإن الخطة البحثية الجيدة يجب أن تتسم بالوضوح والدقة، وأن تُبنى على مشكلة بحثية محددة، وأهداف قابلة للقياس، ومنهج علمي مناسب لطبيعة الدراسة، إضافة إلى سلامة الصياغة اللغوية، وحداثة المراجع، والالتزام بنظام التوثيق المعتمد، كما توفّر الشركة دليلًا إرشاديًا يوضّح شروط إعداد خطة البحث PDF، يساعد الباحثين على فهم المعايير الأكاديمية المعتمدة، وتجنّب الأخطاء الشائعة في كتابة خطة البحث العلمي، بما يعزّز فرص قبول الخطة ومناقشتها بثقة. https://www.sanadkk.com/blog/post/2724/%D8%B4%D8%B1%D9%88%D8%B7-%D8%AE%D8%B7%D8%A9-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB.html

تقدّم شركة سندك للاستشارات الأكاديمية والترجمة خدمة متكاملة في إعداد خطة البحث العلمي وفق المعايير المعتمدة في الجامعات العربية والدولية، مع مراعاة الدقة المنهجية ومتطلبات القبول الأكاديمي؛ ولفهم ما هي عناصر خطة البحث العلمي؟ تعتمد الخطة على مجموعة من المكونات الأساسية التي توضّح مسار الدراسة منذ الفكرة وحتى التنفيذ، مثل عنوان البحث، مشكلة الدراسة، أهداف البحث، أسئلته أو فروضه، أهمية البحث، منهجيته، وحدوده، والدراسات السابقة، وتوفّر الشركة نماذج إرشادية توضّح عناصر خطة البحث PDF بصياغة واضحة ومنسقة تساعد الباحث على استيعاب البناء الصحيح للخطة، كما يتم شرح كيفية كتابة خطة البحث خطوة بخطوة، مع تجنّب الأخطاء الشائعة وضمان الاتساق بين عناصر الخطة ومحتواها العلمي. https://www.sanadkk.com/blog/post/2725/%D9%85%D8%A7-%D9%87%D9%8A-%D8%B9%D9%86%D8%A7%D8%B5%D8%B1-%D8%AE%D8%B7%D8%A9-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB-%D8%A7%D9%84%D8%B9%D9%84%D9%85%D9%8A.html

توفّر شركة سندك للاستشارات الأكاديمية والترجمة خدمة احترافية في إعداد خطة البحث العلمي وفق الضوابط المنهجية المعتمدة في الجامعات، وتهدف الخدمة إلى مساعدة الباحثين على فهم مما تتكون خطة البحث وبنائها بصورة علمية متكاملة، وتشمل الخطة البحثية مجموعة من مكونات خطة البحث PDF التي توضّح الإطار العام للدراسة، مثل مشكلة البحث، وأهدافه، وأهميته، ومنهجيته، وحدود الدراسة، مع الالتزام بالتسلسل المنطقي والدقة الأكاديمية، كما تولي الشركة اهتمامًا خاصًا بتجنب أخطاء خطة البحث الشائعة، مثل ضعف صياغة المشكلة، وعدم اتساق الأهداف مع المنهج، أو القصور في توثيق المراجع، لضمان قبول الخطة واعتمادها أكاديميًا. https://www.sanadkk.com/blog/post/2726/%D9%85%D9%85%D8%A7-%D8%AA%D8%AA%D9%83%D9%88%D9%86-%D8%AE%D8%B7%D8%A9-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB.html

تقدّم شركة سندك للاستشارات الأكاديمية والترجمة خدمة متكاملة في إعداد خطة البحث العلمي وفق المعايير الأكاديمية المعتمدة في الجامعات العربية والدولية، وتركّز الخدمة على توضيح كيفية كتابة الخطة البحثية بصورة منهجية تبدأ من تحديد مشكلة البحث وصياغة الأهداف، وصولًا إلى اختيار المنهج العلمي المناسب وبناء الإطار النظري والدراسات السابقة، كما تتيح الشركة نماذج خطة بحث جاهزة Word تساعد الباحث على فهم البناء الصحيح للخطة، مع إمكانية كتابة خطة البحث العلمي بشكل مخصص يتوافق مع تخصص الباحث ومتطلبات المشرف الأكاديمي. https://www.sanadkk.com/blog/post/2727/%D9%83%D9%8A%D9%81%D9%8A%D8%A9-%D9%83%D8%AA%D8%A7%D8%A8%D8%A9-%D8%A7%D9%84%D8%AE%D8%B7%D8%A9-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB%D9%8A%D8%A9.html

تفضل . Mon_Excel_Bilal_Yamen-1.rar

شكرا استاذ جازاك الله كل خير الملف يعمل أستاذ.

استاد نعم يضيف سطر جديد

بوركت استاذ على تعبك ولكن عندي مشكلة في تنفيد البروجرسبار ماعرفت اين تكمن كما في الصورة الرجاء التعديل على المرفق 2026.rar

كل شيء ممكن في الاكسل ولكن المشاكل تحل خطوة بخطوة جرب الملف Horaire2.xlsb

حتى ولو البيانات لم تتغير يضيف سطر جديد أم نضيف حقل لتاريخ اليوم .

يضيف عليه سطر جديد استاذ

تقصد لنفس الموظف .... يحدث الموجود أم يضيف عليه سطر جديد .

استاذنا الفاضل بارك الله فيك استاذ عند اضافة موظف جديد في ملف الاكسيل ونقوم بالاستراد في جدول يتم حدف البيانات الموجودة في الجدول اريد عند اضافة موظف في الاكسيل يتم إضافته في الجدول

استاذ @بلال اليامين هل تقصد جلب الورقة بجدول جديد باسم الورقة (Feuil1) . طالع المرفق ووافني بالرد . انت بطول في الرد .... رد بأسرع وقت قبل نسياني لأني من كثرة الاعمال لديا بنس عملت ايه ولمين ...... لا تعتمد اني أقرأ ما بداخلك اشرح بالتفصيل يا بخيلي .... اليك المرفق وطالع الجدول الجديد .. Mon_Excel_Bilal_Yamen.rar

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

جزاك الله خير 🌹 لقد علمتني كيف أصطاد، واستخدمت Gemini واعطاني هذا الكود وكان سريع وجلب البيانات بثواني ... قمت بتكرار النتائج ولم تكن المخرجات منسقة، ولكن سأعمل على تطويره ليخدم عملي الكود ستجده في موديل Array لا حرمني الله منكم 😘😘 Array.xlsb

وعليكم السلام جرب الملف , هل تم حل المشكلة الأولى ؟ Horaire1.xlsb

شكرا ايها الخبير المبدع جزاك الله بكل الخير وزادك من علمه

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

السلام عليكم استاذ kkhalifa1960 أستاذ لدي ملف اريدعند تصدير ملف لاكسل بجوار البرنامج اسمه Horaire . أريد عند تصدير واستراد يظهر بملف الاكسيل الذي هو بجوار البرنامج إسمه Horaire وإسم الورقة Feuil1 أستاذ اريد عند الضغط على إسم الموظف يتم تحميل ملف لاكسل الذي بجوار البرنامج. بارك الله فيك استاذ Mon_Excel.zip

مكتبة كافة الادوات المساعدة والمميزة والكواد والمشاريع 2026-2027 Ms_hanan : https://sites.google.com/view/mas-projectss/home لضم بعض الاعمال وتنزيل المباشر من غير اذونات الكل مفتوح المصدر ******************************************************************************************************** توسيــــع واستكمال 1- اضافة خيار الخلفية صوره او فيديو وكامل الشاشة HD فقط الفيديو اما الصوره شاشة بحجم الجدار 2- اضافة واستكمال تسجيل الدخول التحقق من احرف الانجليزي الكبيره والصغيره بداله واحده مصغره فقط اسم المستخدم وكلمة المرورو 😇 'داله التحقق اذا كانت الاحرف كبيرة او لا Public Function SameCasePattern(ByVal Txt1 As String, _ ByVal Txt2 As String) As Boolean Txt1 = Nz(Txt1, "") Txt2 = Nz(Txt2, "") ' الطول يجب أن يكون متساوي If Len(Txt1) <> Len(Txt2) Then SameCasePattern = False Exit Function End If ' مقارنة حساسة لحالة الأحرف SameCasePattern = (StrComp(Txt1, Txt2, vbBinaryCompare) = 0) End Function Public Function SameCasePattern_Name(ByVal Txt1 As String, _ ByVal Txt2 As String) As Boolean Txt1 = Nz(Txt1, "") Txt2 = Nz(Txt2, "") ' الطول يجب أن يكون متساوي If Len(Txt1) <> Len(Txt2) Then SameCasePattern_Name = False Exit Function End If ' مقارنة حساسة لحالة الأحرف SameCasePattern_Name = (StrComp(Txt1, Txt2, vbBinaryCompare) = 0) End Function Private Sub EX_3_Click() Dim ftps As String '================( Chack Value Smoll Or capitl : Dim DBValue_User As String Dim DBValue_PWD As String DBValue_User = Nz(DLookup("[User_Name]", "[User]", "[User_Name]='" & Form_into_logen.x1 & "'"), "") DBValue_PWD = Nz(DLookup("[Password]", "[User]", "[User_Name]='" & Form_into_logen.x1 & "'"), "") If IsNull(Form_into_logen.x1) Or Form_into_logen.x1 = "" Then If Not Me.f_1.Width = Me.Form.InsideWidth Then Me.f_1.Width = Me.Form.InsideWidth If Not Me.f_3.Width = Me.Form.InsideWidth Then Me.f_3.Width = Me.Form.InsideWidth If Me.f_1.Visible = False Then Me.f_1.Visible = True If Me.f_2.Visible = False Then Me.f_2.Visible = True If Me.f_3.Visible = False Then Me.f_3.Visible = True Me.f_1.Caption = " حقل المستخدم فارغ ؟! " & " - " & Now Exit Sub End If If IsNull(Form_into_logen.x2) Or Form_into_logen.x2 = "" Then If Not Me.f_1.Width = Me.Form.InsideWidth Then Me.f_1.Width = Me.Form.InsideWidth If Not Me.f_3.Width = Me.Form.InsideWidth Then Me.f_3.Width = Me.Form.InsideWidth If Me.f_1.Visible = False Then Me.f_1.Visible = True If Me.f_2.Visible = False Then Me.f_2.Visible = True If Me.f_3.Visible = False Then Me.f_3.Visible = True Me.f_1.Caption = " حقل كلمة المرور فارغة ؟! " & " - " & Now Exit Sub End If If Form_into_logen.x1 = DLookup("[User_Name]", "[User]", "[User_Name]='" & Form_into_logen.x1 & "'") Then If Form_into_logen.x2 = DLookup("[Password]", "[User]", "[User_Name]='" & Form_into_logen.x1 & "'") Then 'فحص الاحرف EN If SameCasePattern_Name(DBValue_User, Form_into_logen.x1) Then If SameCasePattern(DBValue_PWD, Form_into_logen.x2) Then '=========================( Yes ) If Me.f_1.Visible = True Then Me.f_1.Visible = False If Me.f_2.Visible = True Then Me.f_2.Visible = False If Me.f_3.Visible = True Then Me.f_3.Visible = False 'ftps = CurrentProject.Path & "\IMG_Size\" & DLookup("[User_Name]", "[user]", "[ID]='" & Me.ID & "'") & "_3.png" ftps = CurrentProject.path & "\IMG_Size\" & Form_into_logen.x1 & "_3.png" Me.tx.Caption = " Logen: مرحبا بك " & Form_into_logen.x1 If Not Dir(ftps) = "" Then Me.sx.Picture = ftps Call zx_Click Else If Not Me.f_1.Width = Me.Form.InsideWidth Then Me.f_1.Width = Me.Form.InsideWidth If Not Me.f_3.Width = Me.Form.InsideWidth Then Me.f_3.Width = Me.Form.InsideWidth If Me.f_1.Visible = False Then Me.f_1.Visible = True If Me.f_2.Visible = False Then Me.f_2.Visible = True If Me.f_3.Visible = False Then Me.f_3.Visible = True Me.f_1.Caption = " خطأ تسجيل الدخول تأكد من الاسم وكلمت المرور ثم عاود الحاولة ؟! " & " - " & Now Exit Sub End If Else If Not Me.f_1.Width = Me.Form.InsideWidth Then Me.f_1.Width = Me.Form.InsideWidth If Not Me.f_3.Width = Me.Form.InsideWidth Then Me.f_3.Width = Me.Form.InsideWidth If Me.f_1.Visible = False Then Me.f_1.Visible = True If Me.f_2.Visible = False Then Me.f_2.Visible = True If Me.f_3.Visible = False Then Me.f_3.Visible = True Me.f_1.Caption = " خطأ تسجيل الدخول تأكد من الاسم وكلمت المرور ثم عاود الحاولة ؟! " & " - " & Now Exit Sub End If End If End If End Sub 3- عرض التقرير بتقسيم بسيط جدا داخل كل تقرير حدث عند الفتح + كود بسيط في القائمة ادوات التقرير وكل ما زاد عن الف 1000 سجل اصبح 2 مع الطباعة الفورية ( لمعالجة الثقل وسرعة والسهولة سأحاول تجربته 😇 Private Sub nzV() Dim rpt As String Dim SourceSQL As String Dim rpt_X As Report Dim Give_itme As Integer Dim N_R As Long 'جلب اسم مصدر التقرير كان جدول او استعلام Set rpt_X = Reports(Me.Name_report_X.Caption) SourceSQL = rpt_X.RecordSource Me.sexo = Nz(DCount("*", SourceSQL), 0) If Len(Nz(DCount("*", SourceSQL), 0)) < 3 Then N_R = 1 Else N_R = Right(Nz(DCount("*", Me.Name_report_X.Caption), 1), 4) End If Me.txtPageSize.RowSourceType = "Value List" With Me.txtPageSize For Give_itme = 1 To N_R .AddItem Give_itme Next End With End Sub والكود داخل كل تقرير Option Compare Database Private Sub Report_Load() DoCmd.Maximize If IsNull(DLookup("[IMG_1]", "[Ass]")) Then Me.PX_1.Visible = False If IsNull(DLookup("[IMG_1]", "[Ass]")) Then Me.PX_2.Visible = False End Sub Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) Dim Parts() As String Dim StartRow As Long, EndRow As Long ' قراءة النطاق من TAG If Me.Tag <> "" Then Parts = Split(Me.Tag, "|") StartRow = CLng(Parts(0)) EndRow = CLng(Parts(1)) ' إذا رقم السجل الحالي خارج النطاق ? اخفِه If Me.currentRecord < StartRow Or Me.currentRecord > EndRow Then Me.Visible = False Else Me.Visible = True End If End If End Sub Private Sub Report_Open(Cancel As Integer) Dim PageNumber As Long Dim PageSize As Long Dim StartRow As Long Dim EndRow As Long ' إعدادات PageSize = 1000 ' عدد السجلات لكل مجموعة PageNumber = Nz(Forms!Top_Report!txtPageSize, 1) ' الحقل غير منضم في النموذج StartRow = (PageNumber - 1) * PageSize + 1 EndRow = PageNumber * PageSize ' نحفظ النطاق في TAG التقرير لاستخدامه لاحقاً Me.Tag = StartRow & "|" & EndRow End Sub .... تابع الفيديو للتوضيح مشاهده ممتعة تحميل المرفق https://drive.google.com/file/d/1hF1CX00nJh0JmNowOzyPJVW-swPkAuWl/view?usp=drive_link