معتصم محمد

بسم الله كل عام وأنتم بخير ،،، عيدكم سعيد إن شاء الله يعتبر Power Query أحد الإضافات الحديثة في برنامج الاكسل، والذي يحصل على تحديثات دورية من مايكوروسفت لتحسين أدائه سواء بتحسين مميزات وخصائص الأدوات الحالية أو بإضافة أدوات جديدة لمن لا يعرف ما هو Power Query، فهو أداة تعمل على إتمام 3 وظائف رئيسية هي: إستيراد البيانات من العديد من مصادر البيانات كقواعد البيانات (اكسس / SQL / ...) أو من الويب أو من ملفات الاكسل والعديد من المصادر الأخرى. معالجة البيانات التي تم إستيرادها من المصادر المختلفة، وهذه من وجهة نظري تشغل أكثر من 50% من قوة الاداة. تخزين البيانات بعد المعالجة سواء في جدول اكسل / عملية ربط فقط / اضافة لل Data Model. يرجى الأخذ في الإعتبار أن إستخدام Power Query داخل الاكسل مكافئ لحدٍ ما لإستخدام Power Query في Power BI Desktop. في هذا الموضوع أضع بين أيديكم الفيديوهات التي قمت بإعدادها لشرح هذه الأداة بداية من التعرف على طريقة إضافة وتثبيت Power Query مروراً بعمليات الإستيراد والمعالجة للبيانات. أرجو أن تكون هذه الفيديوهات ذات عون لكم في التعرف على استخدام الاداة. 01 - كيفية إضافة Power Query في الإكسل 2010 و 2013 02 - مقدمة تعريفية بالوظائف الرئيسية لل Power Query وعناصر شاشة محرر الإستعلامات https://youtu.be/Kd6g1vTfQuI 03.1 - الربط والإستخلاص من ملفات الإكسل في Power Query الأمر From Excel https://youtu.be/pSOLLngRbAA 04 - إستخدام الأمر Unpivot Columns في Power Query https://youtu.be/SNqC5Wsd7IM 05 - الدمج الرأسي للإستعلامات بالأمر Append Query إستعلام الإلحاق | Power Query https://youtu.be/1t9qWAmGJPM 06. الدمج الأفقي للإستعلامات في Power Query - الأمر Merge Query https://youtu.be/Py5D-JBEmpE 07. دمج ملفات CSV أو TXT في Power Query - الأمر Combine Binaries https://youtu.be/48OeFmvajPc 101. طريقة الوصول لقائمة دوال Power Query https://youtu.be/0MtZ_XUm9k8

بسم الله ما شاء الله ملف أكثر من رائع بارك الله فيك

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

الأستاذ / Roby_7650 تم إضافة فيديو خاص بالترحيل بالصف التالي للصف الاخير الإخوة و الأساتذة / أحمد النجار أحمد عباس عبدالله المجرب سعد عابد محمد أبو البراء شرفت بمروركم وكلماتكم الطيبة كذلك شكراً على تثبيت الموضوع؛ وأرجو من الله أن يكون ذا عون لكل الأعضاء وفقنا الله وإياكم لكل خير

لحساب الجذر التكعيبي للقيمة 8 استخدم المعادلة التالية =8^(1/3) الجذر الرابع للقيمة 16 =16^(1/4)

الفيديو الخامس : شرح فكرة ترحيل البيانات الى الصف التالي للصف الأخير تحميل الملف المستخدم في المرفقات Last Row.rar

الأستاذ / Roby الهدف من الفيديو شرح عملية الترحيل فقط من الفورم الى الشيت عملية الترحيل الى الصف التالي لاخر صف به بيانات تتم من خلال كود يحدد اخر صف في العمود به بيانات ثم تضيف واحد لقيمة هذا الصف هذه العملية سيتم اعداد فيديو مستقل لها بإذن الله

الأستاذ / عادل ابوزيد الأستاذ / عطاء الله وجزاكم الله كل خير

الأستاذ / سعد عابد ... وجزاكم الأستاذ / دغيدى ... وعليكم السلام ورحمة الله وبركاته لم يتم تسجيل فيديو التدريب العملي بعد؛ بإذن الله بعد تسجيل الفيديو سيتم إضافته للموضوع + الملف المرفق

الأستاذ / أبو حنين ... وجزاكم الأستاذ / ضاحي الغريب ... تشرفت بمرورك الكريم

الأستاذة / أم عبدالله،،، وجزاكم الأستاذ / خالد القدس،،، وإياكم

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

4 - ما هي الأحداث Events؟ الملف المستخدم في المرفقات بالمشاركة رقم 1 أرجو أن تكون هذه الفيديوهات ذات إفادة لكم جميعا

3 - ما هي الخصائص Properties؟ المرفقات في المشاركة رقم 1

2 - ما هي عناصر التحكم Controls المرفقات في المشاركة رقم 1

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته في هذا الموضوع أقدم 4 فيديوهات تشرح المفاهيم الأساسية في اليوزرفوم بعد أن قمت بالبدء في تسجيل الفيديوهات وجدت أن الأستاذ / ضاحي الغريب قد بدء سلسلة تعليمية لليوزرفورم ولكنها بالطبع تشتمل على معلومات أكثر من التي سترد بالفيديوهات 1 - اضافة اليوزر فورم لشيت الإكسل الملف المرفق للدروس الأربعة. Excel VBA - Basics of Userforms.rar

أعتقد أن رد الاستاذ / حمادة عمر قد كفى عن اي اضافة

للأسف السؤال غير واضح بالنسبة لي

تفضل Book1.rar

شاهد هذا الفيديو الأكواد المستخدمة Sub NweSheeetCustomeName() On Error GoTo ErrorHandler Dim NewSheet As Worksheet Dim SheetName As String Set NewSheet = Sheets.Add SheetName = InputBox("Please Insert sheet name.") If SheetName = "" Or Len(SheetName) > 31 Then MsgBox ("You did not insert a name OR sheet name lenth is greater than 31 Characther") Exit Sub End If NewSheet.Name = SheetName ErrorHandler: If Err.Number = 1004 Then MsgBox ("This name already exist") Application.DisplayAlerts = False NewSheet.Delete Application.DisplayAlerts = True Exit Sub End If End Sub

الأستاذ / a_laiser85 بالنسبة للنقطة الأولي اعتقد انك ستقوم بنفس خطوات الفيديو لكن بدلاً من ان يكون الزر يعمل على تشغيل الإستعلام سيقوم بتشغيل التقرير المراد طباعته (والذي سيكون -التقرير- معتمداً على الإستعلام) موضوع ان كل طلب يكون في صفحة مستقلة فللأسف لا أعرف النقطة الثانية ايضاً لا اعرف لها اجابة لانني لم اعمل على اكسس 2003 كذلك فإنني مازلت في اول الطريق في الأكسس يمكنك طرح السؤال في المنتدى وستجد من يساعد بإذن الله

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

السلام عليكم ورحمة الله وبركاته أول درس أقدمه في مايكروسوفت أكسس وهو يستعرض استخدام المعامل between لتصفية البيانات بين قيمتين في الإستعلامات الفيديو : أرجو منك التقييم وإبداء الملاحظات عن الدرس وإن كانت هناك اية اخطاء في الملف المرفق شكراً مقدماً Books.rar

تفضل كشف باسماء المشتركين.rar

راجع هذا الموضوع http://support.microsoft.com/kb/295971/ar