أهم 10 نقاط لتعلم برنامج الإكسل

 إكسل vba/ الدرس 328 / فكرة بسيطة لكن عبقرية !!؟؟ حسابات ومعادلات من خلال الفورم 

أهم 10 نقاط لتعلم برنامج الإكسل

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

 

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

 

3. استخدم التنسيق الشرطي: التنسيق الشرطي هو أداة فعالة تسمح لك بالتعرف السريع على الأنماط أو الاتجاهات في بياناتك. يمكنك استخدامه لتمييز الخلايا ذات القيم المحددة أو نطاقات القيم، مما يسهل اكتشاف القيم المتطرفة أو الحالات الشاذة في مجموعة البيانات الخاصة بك.

 

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

 

5. إتمام المهام باستخدام وحدات الماكرو: تعد وحدات الماكرو طريقة رائعة لإتمام المهام المتكررة في Excel، مما يتيح لك توفير الوقت والجهد عند العمل مع كميات كبيرة من البيانات. يمكنك تسجيل وحدات الماكرو التي ستؤدي مهامًا محددة لك، مثل نسخ البيانات ولصقها من ورقة إلى أخرى أو تشغيل العمليات الحسابية على خلايا متعددة في وقت واحد.

 

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

 

7. استخدام وظائف البحث: وظائف البحث لا تقدر بثمن عند العمل مع كميات كبيرة من البيانات في Excel لأنها تسمح لك بالعثور على معلومات محددة بسرعة دون الحاجة إلى البحث يدويًا في جميع سجلاتك واحدًا تلو الآخر. تعد وظيفة VLOOKUP واحدة من أكثر وظائف البحث شيوعًا في Excel وهي مفيدة بشكل لا يصدق للعثور على قيم محددة داخل نطاق من الخلايا أو أعمدة البيانات.

 

8. الاستفادة من التحقق من صحة البيانات: يعد التحقق من صحة البيانات أداة مهمة تساعد على ضمان الدقة عند إدخال البيانات في جدول بيانات Excel عن طريق تقييد نوع المعلومات التي يمكن إدخالها في خلايا أو نطاقات معينة من الخلايا بناءً على معايير معينة تحددها مسبقًا (على سبيل المثال، فقط السماح للأرقام بين 1-10). يساعد هذا في تقليل الأخطاء الناتجة عن الإدخال غير الصحيح من المستخدمين الذين قد لا يكونون على دراية بمحتويات جدول البيانات أو هيكله

 

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

 

10 - استكشاف الوظائف الإضافية والتطبيقات: هناك العديد من الوظائف الإضافية المتاحة لبرنامج Excel والتي تعمل على توسيع وظائفه إلى أبعد مما هو مضمن بالفعل في البرنامج نفسه (على سبيل المثال، Power Query لتحليل مجموعات البيانات الكبيرة). بالإضافة إلى ذلك، هناك العديد من التطبيقات المتوفرة في متجر Microsoft Office Store والتي تتكامل مباشرة مع Excel وتوفر ميزات إضافية مثل أدوات التحليل المالي أو أدوات إدارة المشاريع

===================================================

كود استخدام InputBox 

Sub calcgo()

On Error Resume Next

Dim x As String, y As Double

x = InputBox("ادخل المعادلة", "اجراء العمليات الحسابية")

Range("aaa1") = x

y = Range("aaa1").Value

MsgBox y

Range("aaa1") = ""

End Sub

==================================================

كود زر احسب

Sub calcgo1()

On Error Resume Next

Dim x As String, y As Double

x = form1.cmbc.Text

Range("aaa1") = x

y = Range("aaa1").Value

form1.txt48.Text = y

Range("aaa1") = ""

End Sub

====================================================

كود تعبئة الكومبوبوكس

Sub calcgo2()

On Error Resume Next

form1.cmbc.List = Array("=AVERAGE()", "=COUNT()", "=MAX()", "=MIN()", "=SHEET()" _

, "=SHEETS()", "=SUM()")

End Sub

===================================================

احمي ملفاتك / ملف إكسل يعمل علي جهاز كمبيوتر واحد فقط

 إكسل vba/ الدرس 327 / احمي ملفاتك / ملف إكسل يعمل علي جهاز كمبيوتر واحد فقط / يتم حذفة اتوماتيكيا

كود الحصول على سيريال الكمبيوتر

Sub sngo()

Dim sn, x, y, z

With GetObject("winmgmts:\\" & "." & "\root\cimv2")

For Each x In .ExecQuery("SELECT * FROM Win32_computerSystemProduct", , 48)

y = x.Name

z = x.UUID

Next x

End With

sn = y & "_ " & z

Range("a1") = sn

End Sub

---------------------------------------------------------------------------------------------------------

كود حذف الملف

Sub deletego()

Dim f, ff, x

Set f = CreateObject("scripting.filesystemobject")

Set ff = f.getfolder(ThisWorkbook.Path)

ThisWorkbook.Saved = True

ThisWorkbook.ChangeFileAccess xlReadOnly

For Each x In ff.Files

x.Delete True

Next

ThisWorkbook.Close False

End Sub

----------------------------------------------------------------------------------------------------------

كود مقارنة السيريال 

Sub serialgo()

Dim sn, x, y, z

With GetObject("winmgmts:\\" & "." & "\root\cimv2")

For Each x In .ExecQuery("SELECT * FROM Win32_computerSystemProduct", , 48)

y = x.Name

z = x.UUID

Next x

End With

sn = y & "_ " & z

If sn = form1.snxyz.Caption Then

Else

deletego

End If

End Sub

---------------------------------------------------------------------------------------------------------

مكان استدعاء الكود

Private Sub Workbook_Open()

serialgo

End Sub

--------------------------------------------------------------------------------------------------------

شرح الدالة InStr

تُستخدم الدالة InStr في Excel للعثور على موضع سلسلة فرعية ضمن سلسلة أكبر. يمكن استخدامه 

لتحديد ما إذا كانت سلسلة معينة موجودة في سلسلة أخرى، وإذا كان الأمر كذلك، فأين تقع.

 

بناء الجملة للدالة InStr هو:

InStr(x, y, z)

الوسيطة x اختيارية وتحدد موضع الحرف في y الذي يجب أن يبدأ البحث منه. إذا تم حذفه، فسيتم تعيينه افتراضيًا على 1.

 

الوسيطة y مطلوبة وتحدد السلسلة التي سيتم البحث عنها للسلسلة الفرعية.

 

وسيطة السلسلة الفرعية x مطلوبة وتحدد السلسلة التي سيتم البحث عنها داخل y.

 

على سبيل المثال، إذا كنت تريد معرفة ما إذا كان "d" موجودًا في "wagdy"، فيمكنك استخدام

 هذه الصيغة:

= InStr(1,"wagdy","d")

سيؤدي هذا إلى إرجاع 4 لأن "d" يبدأ عند الحرف 4 من "wagdy ".

--------------------------------------------------------------------------------------------------------

كود بسيط يوضح استخدام الدالة InStr

Sub InStrgo()

Dim x

x = InStr(1, "wagdy", "a")

MsgBox x

End Sub

كود بسيط جدا لتنفيذ أي كود آخر في البرنامج في أي وقت تريد

 

إكسل vba/ الدرس 326 / كود بسيط جدا لتنفيذ أي كود آخر في البرنامج في أي وقت تريد !!؟؟

كود تنفيذ أي كود آخر في أي وقت

Sub code0()

On Error Resume Next

Dim t As String, x As String

x = InputBox("ادخل اسم الكود:", "اسم الكود", "code")

t = InputBox("ادخل وقت التنفيذ:", "تنفيذ كود محدد", "00:00:00")

Application.OnTime Now + TimeValue(t), x

End Sub

كود حصري. إدراج صورة داخل أي خلية تريدها وحذفها من خلال الفورم بضغطة زر

 كود حصري. إدراج صورة داخل أي خلية تريدها وحذفها من خلال الفورم بضغطة زر

كود إضافة صورة إلي خلية محددة

Sub InsertPicture() 'اضافة صورة في خلية محددة

On Error Resume Next

Dim P As String, x As String

P = Application.GetOpenFilename("Pictures (*.jpg;*.png;*.gif),*.jpg;*.png;*.gif")

If P <> "False" Then

x = InputBox("ادخل اسم الخليةالمراد وضع الصورة بها", "اسم الخلية")

ActiveSheet.Range(x).Select

ActiveSheet.Pictures.Insert(P).Select

End If

MsgBox "تم ادراج الصورة"

End Sub

كود حذف صورة محددة

Sub DeleteImage1() 'حذف صورة محددة

On Error Resume Next

Dim x As Integer

x = InputBox("ادخل رقم الصورة المراد حذفها", "اسم الخلية")

ActiveSheet.Shapes.Range(Array("Picture " & x)).Select

Selection.Delete

MsgBox "تم حذف الصورة"

End Sub

كود حذف جميع الصور دفعة واحدة

Sub DeleteImage2() 'حذف جميع الصور

On Error Resume Next

Dim x As Integer

For x = 1 To 100

ActiveSheet.Shapes.Range(Array("Picture " & x)).Select

Selection.Delete

Next x

MsgBox "تم حذف الصور"

End Sub

استخدامات الدالة VLOOKUP

1. مقارنة البيانات في ورقتي عمل مختلفتين: يمكن استخدام VLOOKUP لمقارنة البيانات بين ورقتي عمل مختلفتين. هذا مفيد بشكل خاص عندما تحتاج إلى مقارنة البيانات من ورقة إلى أخرى، مثل مقارنة أرقام المبيعات من شهر إلى آخر.

 

2. البحث عن قيمة محددة في نطاق من الخلايا: يمكن استخدام VLOOKUP للعثور بسرعة على قيمة محددة في نطاق من الخلايا. يكون هذا مفيدًا عندما تحتاج إلى تحديد موقع عنصر معين بسرعة في مجموعة بيانات كبيرة.

 

3. إنشاء مخططات ورسوم بيانية ديناميكية: يمكن استخدام VLOOKUP لإنشاء مخططات ورسوم بيانية ديناميكية يتم تحديثها تلقائيًا عند إضافة بيانات جديدة أو تغييرها. هذا مفيد بشكل خاص لإنشاء تمثيلات مرئية لمجموعات البيانات الكبيرة التي تتغير باستمرار.

 

4. إتمام مهام إدخال البيانات: يمكن استخدام VLOOKUP لإتمام بعض مهام إدخال البيانات، مثل إدخال معلومات العميل في نموذج طلب أو تحديث مستويات المخزون في نظام المخزون. يؤدي ذلك إلى توفير الوقت وتقليل الأخطاء المرتبطة بمهام إدخال البيانات يدويًا.

أكواد اضافة الصور وملفات pdf الي صفحات الإكسل

 إكسل vba/ الدرس 324 / اضافة الصور وملفات pdf الي صفحة الإكسل من خلال الأكواد

الكود الأول

الإكسل والبرمجة

 الإكسل والبرمجة

يعد Excel أداة قوية لتحليل البيانات ومعالجتها، ويمكن أن يكون أداة قيمة للمبرمجين الذين يتطلعون إلى تبسيط سير عملهم وإتمام المهام المتكررة. لكي تكون مبرمجًا ناجحًا في برنامج Excel، هناك بعض المهارات والاستراتيجيات الأساسية التي يجب أن تركز عليها:

 

Learn VBA (Visual Basic for Applications): VBA هي لغة البرمجة المستخدمة لإنشاء وحدات الماكرو وإتمام المهام في Excel. تعرف على أساسيات بناء جملة VBA، وتدرب على كتابة وحدات ماكرو بسيطة لإتمام المهام مثل فرز البيانات وتصفيتها.

 

فهم وظائف Excel المضمنة: يحتوي Excel على مجموعة متنوعة من الوظائف المضمنة التي يمكن استخدامها لتحليل البيانات ومعالجتها، مثل SUM وAVERAGE وCOUNTIF. إن معرفة كيفية استخدام هذه الوظائف بفعالية يمكن أن يوفر لك الكثير من الوقت ويجعل شفرتك أكثر كفاءة.

 

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

 

التعرف على نموذج كائن Excel: نموذج كائن Excel هو بنية مكونات Excel المختلفة، مثل أوراق العمل والخلايا والمخططات. سيساعدك فهم كيفية عمل نموذج الكائن على التنقل والتعامل مع Excel بشكل أكثر فعالية.

 

استخدم أدوات تصحيح أخطاء Excel: يحتوي Excel على أداة تصحيح أخطاء مدمجة تتيح لك التنقل خلال التعليمات البرمجية الخاصة بك وعرض المتغيرات ومشاهدة التعبيرات. سيساعدك هذا في تحديد الأخطاء والأخطاء في التعليمات البرمجية الخاصة بك، مما يسهل إصلاحها.

 

إتمام المهام المتكررة: يعد Excel أداة رائعة لإتمام المهام المتكررة، مثل إدخال البيانات وتنظيف البيانات وتحليل البيانات. ابحث عن طرق لإتمام هذه المهام باستخدام وحدات الماكرو ووظائف VBA وExcel المضمنة.

 

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

أهم 10 نصائح لتكون مبرمجا جيدا في الإكسل

1-    فهم قوي لصيغ ووظائف Excel، بما في ذلك برمجة VBA.

2-    فهم تقنيات إدارة البيانات ومعالجتها في Excel.

3-    الإلمام بأدوات Excel المضمنة لتحليل البيانات والتصور.

4-    معرفة أدوات التسجيل والتحرير الماكرو في Excel.

5-    الإلمام بميزات التعاون والمشاركة في Excel.

6-    فهم ميزات أمان Excel وكيفية استخدامها.

7-    القدرة على استخدام Excel لإتمام المهام والعمليات المتكررة.

8-    فهم تكامل برنامج Excel مع البرامج ومصادر البيانات الأخرى.

9-    معرفة أفضل الممارسات لتصميم وهيكلة أوراق عمل ومصنفات Excel.

10- مهارة قوية في التحليل وحل المشاكل.

شرح مُبَسط لأهم 10 دوال في الإكسل

أهم 10 دوال في الإكسل 

SUM – 1:

 تجمع هذه الدالة معًا نطاقًا من الخلايا وتعيد المجموع. على سبيل المثال،

SUM (A1: A10) =

ستجمع القيم الموجودة في الخلايا من A1 إلى A10 معًا.

 

COUNT - 2:

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

COUNT (A1: A10) =

  تُرجع عدد الخلايا في النطاق من A1 إلى A10 التي تحتوي على أرقام.

 

AVERAGE - 3:

تحسب هذه الدالة متوسط نطاق من الخلايا. على سبيل المثال،

AVERAGE (A1: A10) =

 ترجع متوسط القيم في الخلايا من A1 إلى A10.

 

MAX - 4:

 ترجع هذه الدالة أكبر قيمة في نطاق من الخلايا. على سبيل المثال،

MAX (A1: A10) =

تُرجع أكبر قيمة في النطاق من A1 إلى A10.

 

MIN - 5:

 تعرض هذه الدالة أصغر قيمة في نطاق من الخلايا. على سبيل المثال،

MIN (A1: A10) =

تُرجع أصغر قيمة في النطاق من A1 إلى A10.

 

IF - 6:

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

= IF(A1>10,"Greater than 10","Less than or equal to 10")

وتكون القيمة الصحيحة أكبر من 10 وتكون القيمة الخاطئة أقل من أو تساوى 10

 

VLOOKUP - 7:

 تبحث هذه الدالة عن قيمة في العمود الموجود في أقصى اليسار من الجدول، ثم تُرجع قيمة في نفس الصف من عمود محدد. على سبيل المثال،

VLOOKUP (A1, A2:B10,2, FALSE) =

سيبحث عن القيمة الموجودة في الخلية A1 في العمود الموجود في أقصى اليسار من الجدول في النطاق A2: B10 وإرجاع القيمة في نفس الصف من العمود الثاني من الجدول.

 

MATCH - 8 و INDEX:

تسمح لك هذه المجموعة من الوظائف بالبحث عن قيمة في جدول بناءً على معيار محدد. على سبيل المثال،

= INDEX (A1:B10, MATCH (A1, A1:A10,0),2)

سيبحث عن القيمة في الخلية A1 في العمود الأول من الجدول في النطاق A1: B10 وإرجاع القيمة في نفس صف من العمود الثاني من الجدول.

 

CONCATENATE - 9:

 تجمع هذه الوظيفة نصًا من خلايا متعددة في خلية واحدة. على سبيل المثال،

CONCATENATE (A1," ", B1) =

تقوم بدمج النص في الخلية A1 والخلية B1 بمسافة بينهما.

 

LEFT - 10 و RIGHT و MID:

 تسمح لك هذه الوظائف باستخراج نص من خلية. على سبيل المثال، ستُرجع

  LEFT (A1،3) =

الأحرف الثلاثة الأولى من النص في الخلية A1،

= RIGHT (A1،4)

وستُرجع الأحرف الأربعة الأخيرة من النص في الخلية A1،

= MID(A1,2,4)

وأربعة أحرف من النص في الخلية A1، بدءًا من الحرف الثاني.