حسونة حسين

آمين يارب العالمين

تفضل احذف الكود الخاص بك الموجود في حدث الشيت ثم ضع هذا الكود Private Sub Worksheet_Change(ByVal Target As Range) Dim X As Range Application.EnableEvents = False For Each X In Target If X.Column = 2 Then If X.Value = "" Then X.Resize(, 6).ClearContents Else X.Offset(0, 2) = Date X.Offset(0, 2).NumberFormat = "dddd yyyy/mm/dd" End If End If Next Application.EnableEvents = True Search_SUM End Sub

اخي الكود يعمل بالفعل ما تريد عدل البيانات كما تريد ثم شغل الكود الموجود في module1 المسمى search_sum

وعليكم السلام ورحمه الله وبركاته تفضل اخي لعله طلبك ان شاء الله التوزيعات بدون حماية.xlsm

رمضان مبارك علينا وعليكم وعلى جميع الامه الاسلاميه

السلام عليكم ورحمة الله وبركاته وبها نبدأ ارفق ملف للعمل عليه

وعليكم السلام ورحمه الله وبركاته ممكن شرح بالتفصيل ما هو المطلوب حتي يتسنى لمن يريد المساعده فهم طلبك اي بيانات تريد عرضها واي فورم تريد عرض الصور عليه

وعليكم السلام ورحمة الله وبركاته تفضل اخى لعلها طلبك =ROUNDDOWN(L10/N10,0) & " " & L10-SUM(ROUNDDOWN(L10/N10,0)*N10) & "/" & N10

بارك الله فيك وجعله الله في ميزان حسناتك

جزاكم الله خيرا اخي @Hani Abdulsamad على دعاؤكم الطيب

امين يارب العالمين يارب عجل بنصرك الذي وعدت

قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف هذا الموضوع مخالف لقوانين المنتدي ×××××××× انتهاك حقوق الملكيه ×××××××× يغلق ××××××××

السلام عليكم ورحمة الله وبركاته تم غلق الموضوع للتكرار

وعليكم السلام ورحمة الله وبركاته لطفا ارفق ملف

جرب هذا الملف على ميديا فاير

وعليكم السلام ورحمة الله وبركاته يوجد في بدايه الموضوع ملف اسمه MSCOMCT2.ocx وشرح لكيفيه تسجيله لكي يعمل الكود بدون اخطاء قم بمراجعه الشرح وتحميل الملف ثم اطلعنا على النتائج

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

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

السلام عليكم ورحمة الله وبركاته وبها نبدأ ضع كلمه Ptrsafe قبل كلمه Function لتصبح Ptrsafe Function

السلام عليكم ورحمة الله وبركاته وبها نبدأ مرحبا بك بين اخوانك وفي اولى مشاركاتك يرجي رفع ملف

السلام عليكم ورحمه الله وبركاته وبها نبدأ ارفق ملفك عسي ان نستطيع مساعدتك

السلام عليكم ورحمه الله وبركاته الخلية D617 ليس بها معادله مكتوب بها مبلغ 600 والمفروض نكون بها معادله اعتقد هذا سبب المشكلة اضف لها المعادلة وان شاء الله تظبط الرصيد معاك

السلام عليكم ورحمة الله وبركاته وبها نبدأ الملف عليه كلمه مرور للفتح الغي الحمايه وارفع الملف مره اخرى او اكتب رقم الحمايه

بارك الله فيك أخي @أبومروان وجزاكم مثله اخى الغالي @محمد يوسف ابو يوسف بارك الله فيك اخى @hafez81 بارك الله فيك أخي @Yasser Fathi Albanna وجزاكم الله خيرا اخوتى على دعواتكم وعلى مروركم العطر

وعليكم السلام ورحمة الله وبركاته ارفق ملف pdf