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

(قسم الاعلانات) الموضوع:الأستاذ الدكتور عصام شرف رئيسا لمؤتمر الجامعات الخامس بالقاهرة بالتعاون مع NCC Education بواسطة: (ميرفت شاهين) :: (أخبار التكنولوجيا) الموضوع:تحميل برامج موبايل مجانى بواسطة: (sara100) :: (أخبار التكنولوجيا) الموضوع:تحميل برنامج انستقرام 2017 للاندرويد برابط مباشر بواسطة: (sara100) :: (أخبار التكنولوجيا) الموضوع:تحميل لعبة كاندي كراش 2017 بواسطة: (sara100) :: (قسم الدعم الفني) الموضوع:صيانة ايديال زانوسى 01141252525بالاسكندرية بواسطة: (masa2016) :: (منتدى الأكسس) الموضوع:الفوترة الإلكترونية تدخل العالم العربي بواسطة: (ألف ياء) :: (منتدى التصميم والجرافيكس) الموضوع:تصميم شعارات مطاعم مبتكرة ابداعية – منتظر ردكم لتعليق عليها بواسطة: (نقطة انطلاق) :: (قسم الاعلانات) الموضوع:كاميرات مراقبة داخلية مقاومة للصدمات HIKVISION بواسطة: (sara hassan) :: (منتدى ال SQL العام) الموضوع:برنامج حسابات ومخازن بواسطة: (ahmedhabeb) :: (منتدى الأكسس) الموضوع:نموذج طباعة بيانات الحوالات البنكية والايداعات بواسطة: (alhop) :: (منتدى Microsoft Visual Basic) الموضوع:مشكلة في برنامج بلغة فيجول ستوديو2010 بواسطة: (thams) :: (قسم الجوال) الموضوع:شاهد وتعرف الى مميزات تطبيق تعارف عربي رائع بواسطة: (سيرياتالك) :: (قسم الاعلانات) الموضوع:حجز دومين وهوست 00201141844482 بواسطة: (atiafco9) :: (أخبار التكنولوجيا) الموضوع:تحميل برامج جديدة بواسطة: (sara100) :: (منتدى Microsoft Excel) الموضوع:كيفية اخفاء مفتاح save as بواسطة: (nadjib) :: (أخبار التكنولوجيا) الموضوع:برنامج ايمو للدردشة بواسطة: (sara100) :: (أخبار التكنولوجيا) الموضوع:واتس اب للاندرويد بواسطة: (sara100) :: (منتدى الأكسس) الموضوع:برنامج للمحلات التجارية الصغيرة بواسطة: (aly elhedewy) :: (منتدى الأكسس) الموضوع:طريقه الوارد اولا يصرف اولا بواسطة: (aly elhedewy) :: (أخبار التكنولوجيا) الموضوع:واتس اب من البرامج المميزه بواسطة: (sara100)


راديو القرآن

المواضيع المثبته: (منتدى البرامج) الموضوع:شروط وضع المواضيع في قسم البرامج بواسطة: (kkarem55) :: (منتدى أنظمة الشبكات وأمنها) الموضوع:الشبكات الحاسوبية ..Computer Network.. بواسطة: (مرحبا الساع) :: (منتدى الكتب الالكترونية) الموضوع:موقع لتحقق من وجود الكتاب الذى تبحث عنه بواسطة: (يوسف) :: (منتدى Microsoft Excel) الموضوع:هيا بنا نتعلم كتابة الكود فى الاكسيل VBA بواسطة: (ramies) :: (منتدى Microsoft Excel) الموضوع:معلومات سريعة من برنامج اكسل بواسطة: (junkbki) :: (منتدى أنظمة الشبكات وأمنها) الموضوع:طريقة عمل شبكة لاسلكية بين جهازين او أكثر ..اكس بي.. لمشاركة الملفات والإنترنت بواسطة: (مرحبا الساع) :: (Oracle قسم قواعد البيانات أوراكل) الموضوع:تعرف على تقنية Oracle APEX بواسطة: (وليد القدسي) :: (القسم المفتوح) الموضوع:إلا رسول الله صلى الله عليه وسلم بواسطة: (alanees) :: (منتدى الكتب الالكترونية) الموضوع:كتاب كامل من جزئين يشرح access وبالتفصيل وقواعد البيانات وبالتفصيل بواسطة: (m.i.a.r) :: (منتدى مبرمجي Microsoft Visual VB.NET) الموضوع:المخازن المتطور الاصدار الثانى بواسطة: (alaa gomaa) :: (منتدى تحليل و تصميم نظم المعلومات) الموضوع:مراحل تحليل النظم لدراسة نظام قائم بواسطة: (jbsa) :: (Oracle قسم قواعد البيانات أوراكل) الموضوع:E-Business Suite بواسطة: (وليد القدسي) :: (القسم المفتوح) الموضوع:قصص الأنبياء عليهم السلام .جميعا بواسطة: (غزاوية أصيلة) :: (منتدى مبرمجي Microsoft Visual VB.NET) الموضوع:دورة تحزيم البرامج Setup & Deployment Applications by VS 2008 بواسطة: (Max Bayne) :: (القسم المفتوح) الموضوع:شاهد واشكر ربك على نعمة الاسلام بواسطة: (غزاوية أصيلة) :: (منتدى Microsoft Visual Basic) الموضوع:بنك اكواد المحيط العربي بواسطة: (محمد جمعة) :: (قسم الدروس و الدورات) الموضوع:لتحميل مجموعة امثله على الفيجوال بيسيك دوت نت 2005 بواسطة: (HnHn) :: (منتدى تصميم صفحات الويب) الموضوع:أرشيف المواضيع المميزة بواسطة: (alanees) :: (منتدى ADO.NET العام) الموضوع:ربط قاعدة البيانات والفرق بين الوضع المتصل والوضع المنفصل وشرحها بالتفصيل بواسطة: (علاء عبدالخالق) :: (منتدى برمجة التقارير) الموضوع:كيف ربط الكرستال ربورت بالنت2008 بواسطة: (raaddawood)

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

> أكواد جاهزة للإستخدام في اكسل ( ماكروات ),أكواد فيجوال بيسك, ماكروات, اضافات مفيدة
Bookmark and Share
تقييم الموضوع Label معدل التقيم:0
مشاركةالجمعة,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
الرتبة في المنتدى:لواء

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

المجموعة: مشرفي الموقع
المشاركات: 1728
سجل في:الثلاثاء,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   > » إضافة رد جديد إضافة موضوع جديد



 
الوقت الأن:اليوم,07:18 مساءً بتوقيت القدس المحتلة

Powered By arabmoheet v3.1

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