هادى محمد المامون سالم

بسم الله الرحمن الرحيم اخى الكريم الحل فى هذه المشاركه من هنـا السلام عليكم

بسم الله الرحمن الرحيم استاذى ابو هادى النتيجه الثانيه فقط غير مطابقه 0 اما النتيجه الاولى مطابقه وهى : =(MONTH(B2)-MONTH(A2))+1 السلام عليكم

الله يفتح عليك

بسم الله الرحمن الرحيم اخى الكريم ارفقت لك ملف اتمنى ان يكون هو المطلوب السلام عليكم Month.rar

الف مليون شكر على الهدية الرائعه جزاك الله خيرا عنها ولكن لى سؤال بسيط للغاية ماذا يفعل من لا يعلم من الانجليزية سوى كلمة (OK) لا يسعنى الا ان اقولها لك OK مشكور ونتمنى ان يقوم احد الاخوان فى يوم ما بترجمتها للعربية فى يوم ما.......................... والسلام عليكم ورحمة الله وبركاته بسم الله الرحمن الرحيم و جدت كتاب فى محفظتى الخاصه كتاب لتعليم اساسيات VBA للورد و الاكسيل باللغه العربيه لا اذكر من اين حملته و عند مراجعتى له قلت : هذا مايريده اخى مجاهد و باقى الاخوه هنا و لكنى فضلت رفعه مع مشاركه كتاب شرح الاكسيل حتى يستطيع باقى الاعضاء الوصول اليه ستجده فى المشاركه رقم (20) من هنـــا السلام عليكم ]

بسم الله الرحمن الرحيم ارفقت كتاب عن VBA و باللغه العربيه للورد و الاكسيل بسيط و مفيد جدا , و لكن بصراحه لا اذكر من اين حملته اتمنى ان يكون مناسبا السلام عليكم WrdExl.rar

بسم الله الرحمن الرحيم ستجد الحل ان شاء الله فى هذه المشاركه من هنــــــا السلام عليكم

بسم الله الرحمن الرحيم اخى الكريم elzaem بصراحه الشرح كان و اضح جدا و قد فهمته خاصه انى اعمل فى هذا المجال منذ حوالى 20 سنه شفت انى طلعت اكبر منك سنا و ليس مقاما 0 اما بخصوص اسالتك القيد لا يرحل عده مرات الا اذا اردت انت , حيث انى اعتبرت انك تقوم بتسجيل القيد ثم تقوم بترحيله ثم تسجل القيد التالى ثم تقوم بترحيله و هكذا , بمعنى القبد المرحل هو اخر قيد قمت بادخاله فقط 0 فى النهايه الحمد لله انك توصلت الى المطلوب و هذا هو الغرض النهائى بخصوص الملف برجاء اظهار الصفوف ثم اعاده ارساله السلام عليكم

بسم الله الرحمن الرحيم هذه المشاركه بالعربيه و تعتبر البدايه من هنا السلام عليكم

بسم الله الرحمن الرحيم هذا هو الملف الذى وعدنا به اخى ادم بالمرفقات و انا كل دورى هو رفع الملف فقط السلام عليكم مشكور اخى ادم على احلى هديه و كل سنه و انت طيبRAM1.rar

بسم الله الرحمن الرحيم تم تعديل رابط المشاركه رقم 8 كتاب Excel VBA هنــــــا السلام عليكم

بسم الله الرحمن الرحيم وجدت عندى احد الكتب الموجوده بمشاركه الاخ smail_d بالانجليزييه و قمت باعاده رفعها هنــــــا السلام عليكم

بسم الله الرحمن الرحيم اخى الكريم نسخ لصق خاص اختار القيم السلام عليكم

بسم الله الرحمن الرحيم اخى الكريم ااعتذر فى تاخرى بالرد لانشغالى هذه الايام 0 ارفقت لك ملف يقوم بالترحيل الى المبيعات و الضرائب مع التاثير فى البنك والخزينه سواء بالمدين او الدائن 0 اذا كان القيد كالتالى 90 من حـ / الضرائب 90 الى حـ / البنك ثم رحلت القيد فان حسابات الضرائب و البنك سوف تتأثر و سوف يهمل حساب المبيعات و النقديه 0 ان اقوم بالتسجيل فى اليومية ويقوم البرنامج بترحيل البيانات الى الحسابات المختصة مع عدم ظهور اى بيان فى حساب لا يختص بالعملية ولم يكن المقصود هو ظهور البيانات بشكل دائم فى البنك والخزينة اتمنى ان يكون هو المطلوب السلام عليكم _______________________1.rar

بسم الله الرحمن الرحيم اولا اعتذر عن تاخرى فى الرد لانشغالى هذه الايام لم افهم السؤال ولكم تحياتنا بصراحه يا جماعه انا لم اتعلم VBA عن طريق النت و هذه المشاركه لفتت نظرى فاردت المساعده بها 0 قدمت الكود و قمت بشرحه , فهل المطلوب مثال اخر ام ماذا ؟ السلام عليكم

بسم الله الرحمن الرحيم اخى مجاهد لاحظت هذه الجمله فى شيت PSheet فبدلا من القيام بها يدوى نستطيع ان نكتبها بكود مع ربطه بمقتاح Sub MacroFil1() Sheets("psheet").Range("B6:Ck6").Select Selection.AutoFill Destination:=Range("B6:Ck304") Range("A2").Select End Sub Sub MacroFil1() End Sub اغلب الدالات تبدأ ب Sub أو function ثم اسم الداله و تنتهى ب End Sub اوEnd function و اسم تلداله هنا MacroFil1 , وهذا المثال لداله Sub او اذا توفر لى وقت سوف اقوم بشرح مثال لداله function بعد ذلك و اليك الشرح Sheets("psheet").Range("B6:Ck6").Select = حدد من الخلية CK6 الى الخلية B6 Selection.AutoFill Destination:=Range("B6:Ck304") = واسحب بعدد الطلاب لديك و علما بان المجال حتى السطر 304 و تستطيع ان تغير المجال كما تريد Range("A2").Select = قف فى الخليه A2 هذه ترجمه للجمله التى كتبتها فى الشيت أعتقد بسيطه و قد أرفقت لك ملف بعد اضافه مفتاح Up Date بشيت psheet السلام عليكم 003_1.rar

بعد اذن اخى مجاهد ستجد ما تريد هنـا

الف شكر اخى ادم فعلا موضوع جميل

بسم الله الرحمن الرحيم اخى اسد حمدى اذا ادت تشغيل داله تفقيط اسمها Flor_hi نفرض ان المبلغ الذى تريد تفقيطه فى خانه A1 قف فى خانه B1 و اكتب الكود التالى =Flor_hi(A1) السلام عليكم

اخى مجاهد قبل الرد قمت بمراجعه المشاركه من البدايه لهدف معين فى ذهنى و سوف اخبرك به و لكن لفت نظرى مجموعه مشاركات قلت بينى و بين نفسى سبحان الله هذا درس لى و لك و للجميع 0 تابع معى ما لفت نظرى: هذه هى المشاركات و الخلاصه انك اقتنعت بكلامى و تركت الثواب على الله كم عدد مرات التحميل ؟ 11 مره انظر عدد مرات التحميل اليوم لقد ضاعف الله لك الثواب من 11 الى 478 و اذا اعتبرنا ان الحسنه بعشره امثالها و كم شخص استفاد و افاد غيره و العدد الذى سيقوم بالتحميل فى المستقبل ان شاء الله 00000لقد اغدق الله عليك فى الثواب اخى بسبب انك تركت الثواب على الله هذا ما الدرس الذى استفدت منه اخى بسم الله الرحمن الرحيم اخى مجاهد اخى اسد حمدى بخصوص الروابط قد تجد هذه المشاركه مفيده هنـــا أما الهدف الذى حدثتك عنه بالمشاركه السابقه هو انى بمراجعه المشاركات احاول ان اعمل كود مرتبط بملفك و تستطيع ان تكتبه بنفسك و اشرحه بطريقه بسيطه ليكون عملى اكثر و يكون بدايه ان شاء الله 0 السلام عليكم

بسم الله الرحمن الرحيم اخى الكريم اخى الكريم : تاخرى فى الرد بسبب السفر و لكن اريد ان اخبرك بعده نصائح استخرجتها من نقاط هامه لمرتادي قسم الأكسيل للاستاذ حسام نور ارجو منك ان تتقبلها منى كاخ اصغر او اكبر لا ادرى ؟ أما بالنسبه لمشاركتك فقد قمت بعمل مجهود فيها و بعد الردا كتشفت ان الشرح كان غير دقيق , فمنطقى ان ابدا بالرد اولا على المشاركات الاخرى ثم اعود مره اخرى لهذه المشاركه 0 خلاصه القول لا تقلق السلام عليكم

بسم الله الرحمن الرحيم اخى مجاهد لا يسعنى سوى ان اقول لك انك حبيب الجميع صعب ان تجد شخص فى هذا الزمان بهذه الاخلاق العاليه السلام عليكم

بسم الله الرحمن الرحيم اخى الكريم قف فى الخليه B1 و اكتب الكود التالى =IF(A1<>"";1;100) هذا الكود معناه اذا كانت الخليه A1 بها بيانات ( مش فاضيه ) ضع فى الخليه B1 رقم 1 و اذا كانت الخليه A1 ليس بها بيانات ضع فى الخليه B1 رقم 100 مع العلم ان <> معناها لا تساوى "" معناه خاليه السلام عليكم

بسم الله الرحمن الرحيم اخى الكريم ستجد شرح بسيط هنــــا السلام عليكم

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