بسم الله الرحمن الرحيم
اهلا بكم متابعى موقع عالم الاوفيس
حرصا من موقع عالم الاوفيس على تقديم العلم النا فع للجميع نقدم لكم اليوم موضوع جميل جدا ومفيد فى عالم برمجة الاكسل Excel VBA
اهم 100 كود فى الاكسل Excel VBA
نستعرض فى هذا الموضوع مجموعة من الاكواد الشائعة الاستخدام فى الاكسل Excel VBA ولكن سنقوم تباعا بتنزيل الاكواد وتحديث الموضوع اول باول نظرا لان هذة الاكواد سوف تنشر على قناة عماد غازى رحمة على اليويتوب
الكود الاول
كيفية عمل high light على القيم المتشابهة
فى هذا الكود سوف نقوم بعمل تظليل للقيم المتشابهة داخل جدول الاكسل الخاص بنا خصوصا لو كانت الداتا او البيانات كبيرة جدا ولا نستطيع تمييز القيم المتشابهة فمن خلال هذا الكود سوف نقوم بعمل ذلك بمنتهى السهولة
الكود المستخدم فى الشرح
Sub
code_1()
'first
code
Dim
myRange As Range
Dim
myCell As Range
Dim
lr As Long
lr
= Cells(Rows.Count, 1).End(xlUp).Row
Set
myRange = Range("a1:a" & lr)
For
Each myCell In myRange
If
WorksheetFunction.CountIf(myRange, myCell.Value) > 1 Then
myCell.Interior.ColorIndex
= 36
Else
myCell.Interior.ColorIndex
= 0
End
If
Next
myCell
End
Sub
قد يعجبك ايضا
- تحميل برنامج حركة الخزينة مجانا
- اسطوانة التعريفات الشاملة DriverPack Solution بدون نت
- شيت بجميع اكواد الخدمة في فورى Fawry اكواد فوري
- برنامج مجانى لمتابعة حركة الخزينة Excel
- تحميل برنامج مخازن مجانى 100 % كامل ومفتوح المصدر | Store Management System
- برنامج متابعة الشيكات (شيكات دفع / شيكات قبض ) Cheques Management + نسخة تجريبية
- تحميل برنامج الكاشير2020 المجانى لادارة حسابات المحلات التجارية Cashier
- تحميل برنامج مجانى حضور وانصراف الموظفين بالبصمة( دوام الموظفين المجانى)
- تحميل برنامج مخازن مجانى 100%
- -برنامج المنجز 2024
- تحميل برنامج محاسبى كامل كفعل مدى الحياة