قواعد المشاركة في المنتدى

(قسم الاعلانات) الموضوع:تنظيف سجاد بالبخار بالشارقة بواسطة: (امل بكير) :: (قسم الاعلانات) الموضوع:شركة تصليح وصيانة مكيفات الفجيرة 0524280067 الامين بواسطة: (امل بكير) :: (قسم الاعلانات) الموضوع:بعض النصائح المهمة لتنظيف الكنب بالشارقة بواسطة: (شام السيد) :: (قسم الاعلانات) الموضوع:شركة ركن الجنوب لتنظيف كنب بخميس مشيط بواسطة: (غعا) :: (قسم الاعلانات) الموضوع:الوقاية من فيروس كورونا بواسطة: (شام السيد) :: (قسم الاعلانات) الموضوع:مغاسل رخام صناعي بواسطة: (مسوقه سيدرا) :: (أخبار التكنولوجيا) الموضوع:نور المدينة شركة تنظيف بمكة بواسطة: (عفاف الجمال) :: (أخبار التكنولوجيا) الموضوع:موقع عرب دانلود بواسطة: (رفيف الحياه) :: (أخبار التكنولوجيا) الموضوع:أفضل شركة كشف تسريبات المياة بواسطة: (اميرة جمال) :: (أخبار التكنولوجيا) الموضوع:نور المدينة شركة تنظيف بمكة بواسطة: (عفاف الجمال) :: (قسم الدعم الفني) الموضوع:شركه تنظيف سجاد بالرياض بواسطة: (uj]hggعبدالله) :: (قسم الاعلانات) الموضوع:شركه تنظيف خزنات بالرياض بواسطة: (uj]hggعبدالله) :: (قسم الاعلانات) الموضوع:طريقة عمل طاجن المسقعة باللحمة المفرومة و البشاميل بواسطة: (سهام عبد الله) :: (منتدى الوورد والباور بوينت) الموضوع:تحميل Fts 21 بواسطة: (Darplay) :: (قسم الاعلانات) الموضوع:شبوك أراضي الرياض شبوك حمايةالأراضي 0552444300 شبوك المزارع بواسطة: (اسماء عومر) :: (قسم الاعلانات) الموضوع:احدث وحدات حمام – كرياتيف جروب للاتصال 01026185183 بواسطة: (emo rafy) :: (قسم الاعلانات) الموضوع:وحدات الحمام – افضل سعر للاتتصال 01026185183 بواسطة: (emo rafy) :: (قسم الاعلانات) الموضوع:وحدات الحمام بافضل سعر في مصر للاتصال 01026185183 بواسطة: (emo rafy) :: (قسم الدعم الفني) الموضوع:تنظيف يخوت في الامارات 0507765798 بيت العز بواسطة: (RODY2020) :: (قسم الدعم الفني) الموضوع:شركات التعقيم فى الفجيرة 0569795951 زهرة الاندلسدلس بواسطة: (RODY2020)

المواضيع المثبته: (القسم العام) الموضوع:كل موضوع تم شرحه فيديو هنا بواسطة: (startnet) :: (منتدى أنظمة الشبكات وأمنها) الموضوع:طريقة عمل شبكة لاسلكية بين جهازين او أكثر ..اكس بي.. لمشاركة الملفات والإنترنت بواسطة: (مرحبا الساع) :: (منتدى أنظمة الشبكات وأمنها) الموضوع:امن المعلومات وامن الشبكات بواسطة: (khaled helal) :: (منتدى مبرمجي ASP) الموضوع:مواقع يعطي سكربتات لكل لغات البرمجة بواسطة: (ahmadtec) :: (قسم الدروس و الدورات) الموضوع:تعلم معي البرمجة بالفيجوال بيسك .. بواسطة: (كوثــــــــــــر) :: (Oracle قسم قواعد البيانات أوراكل) الموضوع:يجب المرور هنا للأهمية بواسطة: (وليد القدسي) :: (القسم المفتوح) الموضوع:الى الاخوه الاعضاء مع التحيه والتقدير بخصوص العناوين للمشاركة بواسطة: (startnet) :: (كتب عن VB.NET) الموضوع:مكتبة مرفقات الدوت نت (المحيط العربى) بواسطة: (alaa gomaa) :: (منتدى مبرمجي لغة جافا JAVA) الموضوع:درس : الاستثناءات في جافا Exceptions بواسطة: (nardien28) :: (منتدى Microsoft Excel) الموضوع:دروس إكسل و شرح الدوال و تقنيات متقدمة بواسطة: (صهيب جاويش) :: (منتدى الوورد والباور بوينت) الموضوع:دورة انتاج برامج تفاعلية بإستخدام الباور بوينت بواسطة: (خليل إبراهيم) :: (منتدى برمجة الألعاب) الموضوع:تصميم الألعاب باستخدام game maker بواسطة: (Bahr ahmodah) :: (منتدى Microsoft SQL Server) الموضوع:SQL SERVER vs ORACLE بواسطة: (m.atassi) :: (قسم الدروس و الدورات) الموضوع:دورة مجانية في الفجوال بيسك دوت نيت و خاصة بالمبتدئين بواسطة: (ITPROGRAMMER) :: (كتب عن VB.NET) الموضوع:كتب VB.NET عربي بواسطة: (عبد الرحمن) :: (Oracle قسم قواعد البيانات أوراكل) الموضوع:دورة قواعد البيانات (( اوراكل للمبتدئين )) بواسطة: (السند العربي) :: (منتدى التصميم والجرافيكس) الموضوع:الكتابة باللغة العربية في برنامج فلاش بواسطة: (مبرمجة فلسطينية) :: (منتدى Borland Delphi) الموضوع:أحفظ برامجك الديلفاوية من أذي العابثين باستخدام رقم الهارد (محترفين) بواسطة: (Hadyabady) :: (منتدى Microsoft Excel) الموضوع:أكواد جاهزة للإستخدام في اكسل ( ماكروات ) بواسطة: (junkbki) :: (منتدى برمجة الجرافكس) الموضوع:الجزء الاول من دروس تعلم GDI بواسطة: (alaa gomaa)

عدد الصفحات : 4  1  2  3  4   > » إضافة رد إضافة موضوع جديد

> أكواد جاهزة للإستخدام في اكسل ( ماكروات ),أكواد فيجوال بيسك, ماكروات, اضافات مفيدة
Bookmark and Share
تقييم الموضوع Label معدل التقيم:5
مشاركةالجمعة,19/جمادى الثانية/1430 هـ,09:22 صباحاً
المشاركة #1

مشرف سابق لمنتدى الإكسل
الرتبة في المنتدى:عقيد

أيقونة المجموعة

المجموعة: المشرفين القدامى
المشاركات: 964
سجل في:الثلاثاء,02/جمادى الثانية/1430 هـ,08:05 مساءً
الدولة:سوريا
رقم العضوية: 87433



السلام عليكم

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

بنبلش على بركة الله مع أول كود 
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالجمعة,19/جمادى الثانية/1430 هـ,09:25 صباحاً
المشاركة #2

مشرف سابق لمنتدى الإكسل
الرتبة في المنتدى:عقيد

أيقونة المجموعة

المجموعة: المشرفين القدامى
المشاركات: 964
سجل في:الثلاثاء,02/جمادى الثانية/1430 هـ,08:05 مساءً
الدولة:سوريا
رقم العضوية: 87433



كود لتلوين الخلية الفعالة ( اللي بنكون واقفين عندها )




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

الكود:
 اقتباس
[ALIGN=LEFT]
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object,ByVal Target As Excel.Range)
Static OldRange As Range
On Error Resume Next
Target.Interior.ColorIndex = 6 ' yellow - change as needed
OldRange.Interior.ColorIndex = xlColorIndexNone
Set OldRange = Target
End Sub

من الرابط أدناه فيك اتحمل بإذن الله مثال جاهز لهذا الكود.

http://www.4shared.com/file/111388756/4b48e90c/highlight_active_cell_with_yellow_color.html



للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالسبت,20/جمادى الثانية/1430 هـ,04:12 مساءً
المشاركة #3

الرتبة في المنتدى:ملازم

أيقونة المجموعة

المجموعة: أعضاء فعالين
المشاركات: 69
سجل في:الجمعة,05/ربيع الثاني/1429 هـ,02:15 صباحاً
الدولة:مصر
رقم العضوية: 51277



كود جميل
بارك الله فيك
منتظرين الكثير من هذه الأكواد الرائعة
دمتم بكل الخير


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالسبت,20/جمادى الثانية/1430 هـ,04:22 مساءً
المشاركة #4

مشرف سابق لمنتدى الإكسل
الرتبة في المنتدى:عقيد

أيقونة المجموعة

المجموعة: المشرفين القدامى
المشاركات: 964
سجل في:الثلاثاء,02/جمادى الثانية/1430 هـ,08:05 مساءً
الدولة:سوريا
رقم العضوية: 87433



السلام عليكم

أهلاً بك أخي الكريم, الأكواد سأضيفها تباعاً بإذن الله القدير فتوكل على الله.
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالسبت,20/جمادى الثانية/1430 هـ,04:40 مساءً
المشاركة #5

مشرف سابق لمنتدى الإكسل
الرتبة في المنتدى:عقيد

أيقونة المجموعة

المجموعة: المشرفين القدامى
المشاركات: 964
سجل في:الثلاثاء,02/جمادى الثانية/1430 هـ,08:05 مساءً
الدولة:سوريا
رقم العضوية: 87433



السلام عليكم,
أعتذر إليكم أخوتي وأخواتي بالله لظهور الكود في المشاركة الأولى من هذا الموضوع بهذا الشكل المخزي, حيث أنني كنت قد نسقت الكود ولكن عدلت بعدها على المشاركة, ولم أنتبه إلى أني قد أثرت بتنسيق الكود.
عموماً ها أنا اعيد كتابة الكود بتنسيق صحيح ليكون مفهوماً ممن يهتم بهكذا أكواد.

 كود


Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
Static OldCell As Range

If Not OldCell Is Nothing Then
OldCell.Interior.ColorIndex = xlColorIndexNone
End If

Target.Interior.ColorIndex = 6

Set OldCell = Target


End Sub


للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالسبت,20/جمادى الثانية/1430 هـ,05:56 مساءً
المشاركة #6

مشرف منتدى Microsoft Excel
الرتبة في المنتدى:لواء

أيقونة المجموعة

المجموعة: مشرفي الموقع
المشاركات: 1735
سجل في:الثلاثاء,10/محرم/1430 هـ,10:31 صباحاً
الدولة:مصر
رقم العضوية: 73488



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


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

ومن يتق الله يجعل له مخرجا ويرزقه من حيث لا يحتسب ومن يتوكل على الله فهو حسبه
((كن مع الله ولا تبالي))


بريدى الخاص بالمنتدى ( للتواصل ) imramies@arabmoheet.net
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالأحد,21/جمادى الثانية/1430 هـ,05:33 صباحاً
المشاركة #7

مشرف سابق لمنتدى الإكسل
الرتبة في المنتدى:عقيد

أيقونة المجموعة

المجموعة: المشرفين القدامى
المشاركات: 964
سجل في:الثلاثاء,02/جمادى الثانية/1430 هـ,08:05 مساءً
الدولة:سوريا
رقم العضوية: 87433



السلا م عليكم

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

عنما أكون جاهزاً لهكذا أمر بإذن الله, سأضعه هنا ليستفيد منه الجميع إن شاء الله
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالثلاثاء,23/جمادى الثانية/1430 هـ,01:28 مساءً
المشاركة #8

مشرف سابق لمنتدى الإكسل
الرتبة في المنتدى:عقيد

أيقونة المجموعة

المجموعة: المشرفين القدامى
المشاركات: 964
سجل في:الثلاثاء,02/جمادى الثانية/1430 هـ,08:05 مساءً
الدولة:سوريا
رقم العضوية: 87433



السلام عليكم

اليوم رح أحكي عن مكان اضافة الكود. مانو مطلوب منك إن تكون ذو خبرة مرتفعة باكسل ليكون لتتعامل مع الأكواد, فأنت ستستخدم الأكواد ولن تكتبها, واستخدام الأكواد مثله مثل استخدام أي دالة موجودة أصلاً باكسل. سأشرح اليوم أين تضع الكود ( طبعاً بشكل عام إذ دائماً هناك استثناءات ) من حيث المبدأ, الكود اللي بنضيفه, سيتعرف عليه اكسل فقط لما بيكون مكان التخزين لهالكود مفتوح أما إذا مغلق فماتتوقع إنو اكسل رح يتذكر الكود, وبالتالي إما نخزن الكود بمكان بيفتحه اكسل ديماً, أو نعمل ملف اكسل, بنخصصه لوضع هذه الأكواد وبالتالي لما بنا نستخدمها, بنفتح هالصفحة وبالتالي رح يتعرف اكسل ع الكود. الآن, لما بتنزل اكسل ع كمبيوترك لأول مرة, وتفتح اكسل, رح يكون في صفحة مخفية اسمها personal بتشتغل كل ما شغلنا اكسل, بس لأنها مخفية مابنشوفها, هاد أفضل مكان لتخزن فيه الأكواد كون اكسل بيشغل هالملف فور اقلاعه, بس أحياناً مثل مارح انشوف هلا بجهازي, هالصفحة محذوفة بسبب برنامج منزله مع اكسل, مافي مشكل, مثل ماحكيت من شوي, بخزن الكود بملف مخصص للأكواد, وبالتالي لما بدي استخدم هالأكواد, بشغل هالملف, ولما بخلص بغلقه. خلونا مع الشرح المصور. الشرح رح يكون على كود سأضيفه بعد قليل بإذن الله.











ملاحظة, بالكود الأول اللي أضفته في هذا الموضوع, مكان الكود كان مختلفاً عن الصورة السابقة, كما في الصورة التالية,



في المشاركة التالية سأتكلم عن الكود الذي أضفته الآن بإذن الله
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالثلاثاء,23/جمادى الثانية/1430 هـ,01:38 مساءً
المشاركة #9

مشرف سابق لمنتدى الإكسل
الرتبة في المنتدى:عقيد

أيقونة المجموعة

المجموعة: المشرفين القدامى
المشاركات: 964
سجل في:الثلاثاء,02/جمادى الثانية/1430 هـ,08:05 مساءً
الدولة:سوريا
رقم العضوية: 87433



سأضيف كود مهم جداً للبعض, حيث أنه خلال عملنا كثيراً مانصادف بيانات من أكثر من نوع في خلية واحدة ( أرقام وأحرف ) وبالتالي نريد حذف الأرقام أو الأحرف.

هذا الكود ببساطة يقوم بذلك.

نبدأ بنص الكود

 كود
Option Explicit

Function AlphaNum1(txt As String, Optional numOnly As Boolean = True) As String
'same result as AlphaNum2
With CreateObject("VBScript.RegExp")
.Pattern = IIf(numOnly = True, "\D+", "-?\d+(\.\d+)?")
.Global = True
AlphaNum1 = .Replace(txt, "")
End With
End Function





دعونا مع صور الكود وكيفية استخدامه, ثم صفحة اكسل فيها الكود. بالتوفيق بإذن الله العزيز الحكيم













وأخيراً صفحة اكسل فيها الكود مضاف للتشغيل والتجربة مباشرة

http://www.4shared.com/file/112252747/48cd0536/delete_letters_from_cell.html

بالتوفيق والرضى من الله




للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالثلاثاء,23/جمادى الثانية/1430 هـ,04:08 مساءً
المشاركة #10

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 43
سجل في:الأربعاء,05/ذو الحجة/1429 هـ,03:48 صباحاً
الدولة:مصر
رقم العضوية: 70642



الموضوع مفيد جدا لجميع مستخدمي الأكسل

جزاك الله عنا كل خير


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة

    

عدد المتصفحين لهذا المنتدى «1»: (الضيوف «1» - المتخفون «0»)
الأعضاء «0»: .

عدد الصفحات : 4  1  2  3  4   > » إضافة رد جديد إضافة موضوع جديد



 
الوقت الأن:اليوم,05:40 صباحاً بتوقيت القدس المحتلة

Powered By arabmoheet v3.1

منتديات المحيط العربي  -  راسلنا  -   أعلى
X   رسالة المنتدى
(سوف يتم اغلاق هذه النافذة بعد 2 ثانية)
X   رسالة المنتدى
(سوف يتم اغلاق هذه النافذة بعد 2 ثانية)