angelloay قام بنشر فبراير 3, 2011 مشاركة قام بنشر فبراير 3, 2011 السلام عليكم عندي مشكلة صغيرة وانتم اهل الخبرة في هذا المنتدى العظيم فقد حللتم جميع مشاكلي السابقة مشكلتي هي انه اريد كتابة تاريخ تلقائي في خلية ما عند كتابة اي رقم او اسم في خلية اخرى نجحت في تنفيذ الفكرة ولكن هناك مشكلة انه عند تغير تاريخ اليوم تتغير جميع التواريخ السابقة اللتي سبق وكتبتها بالطريقة نفسها والفكرة هي كالتالي: لدي مجموعة من الاسماء وعليهم مالغ مستحقة بجانبهم وعند تسديد ماعليهم من ديون يتم تسجيل تاريخ اليوم ولا يتغير بتغير اليوم التالي . استخدمت الدالة التالية =IF((O5>0);(TODAY());("") وطلب ثاني: اريد ان اضيف خيار في القائمة او زر في الاكسل لنقل اي اسم احدده الى صفحة اختارها يدويا هل يمكن ذلك؟ الملف والصورة بالمرفقات وشكرا لمساعدتكم date.rar رابط هذا التعليق شارك More sharing options...
ابو القبطان قام بنشر فبراير 3, 2011 مشاركة قام بنشر فبراير 3, 2011 اخي اليك مرفق من اعمال اساتذة المنتدى ، ومن مقتنياتي لأعمالهم الذهبية auto date.rar auto date.rar رابط هذا التعليق شارك More sharing options...
ابو القبطان قام بنشر فبراير 3, 2011 مشاركة قام بنشر فبراير 3, 2011 اخي اليك مرفق من اعمال اساتذة المنتدى ، ومن مقتنياتي لأعمالهم الذهبية .. احاول رفع المرفق ،، ولكن يوجد عطل يعيق الرفع Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo t_time If Target.Column = 1 Then Cells(Target.Row, 3) = Now t_time: Application.EnableEvents = True Application.ScreenUpdating = False End Sub تعذر ارفاق الملف .. فأرسلتلك الكود عسى ان يفيدك .. دعواتك .. ربنا يهدي الحال auto date.rar auto date.rar 1 رابط هذا التعليق شارك More sharing options...
angelloay قام بنشر فبراير 3, 2011 الكاتب مشاركة قام بنشر فبراير 3, 2011 (معدل) مشكور اخي وحبيبي حليتلي نصف المشكلة والله انو عمالقة وشكرا كتييييييييييييييييييييييير بس لما ركبتوا مااشتغل معي طيب مو لازم يكون في بالكود اختيار للخلاياي يلي بدي ياها تتغير؟ مالقيت اي شي ياريت الحل تم تعديل فبراير 3, 2011 بواسطه angelloay رابط هذا التعليق شارك More sharing options...
angelloay قام بنشر فبراير 3, 2011 الكاتب مشاركة قام بنشر فبراير 3, 2011 (معدل) لقيت الحل وشكرا كتير الك بس بقي النص الثاني من المشكلة ياريت تساعدوني وشكرا اريد ان اضيف خيار في القائمة او زر في الاكسل لنقل اي اسم احدده الى صفحة اختارها يدويا هل يمكن ذلك؟ مثال على ذلك عندما ننقر على اي ملف نجد زر ارسال الى نضغط عليه فتظهر خيارات الارسال : بلوثوت . قرص مرن . سواقة . سطح المكتب الفكرة نفسها ولكن عند الضغط على اسم في ملف الاكسل بزر الفارة اليمين تظهر خيارات النقل وعند الضغط عليها تظهر نافذة لاختيار الورقة والصف او الخلية المراد النقل اليها تم تعديل فبراير 3, 2011 بواسطه angelloay رابط هذا التعليق شارك More sharing options...
صاحب السعادة قام بنشر فبراير 3, 2011 مشاركة قام بنشر فبراير 3, 2011 انا في غاية السعادة بكم وبهذا المتندى الرائع 1 رابط هذا التعليق شارك More sharing options...
nashwan28 قام بنشر مايو 28, 2011 مشاركة قام بنشر مايو 28, 2011 السلام عليكم شباب انا منبهر بهذا المنتدى الفضيع حاولت تطبيق التاريخ التلقائي تنفذ تمام بس عندي اغلاق الاكسل واعادة فتحي يمتسح هذاولا ينفذ التاريخ التلقائي ارجو منكم الافادة Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo t_time If Target.Column = 1 Then Cells(Target.Row, 3) = Now t_time: Application.EnableEvents = True Application.ScreenUpdating = False End Sub و مشكورين رابط هذا التعليق شارك More sharing options...
nashwan28 قام بنشر مايو 28, 2011 مشاركة قام بنشر مايو 28, 2011 عفوا شباب طبعا محمل اوفيس 2010 مرفق لكم الملف الذي اريد ان انفذه و اذا كان عندكم افكار افضل لا تبخلوش علينا مشكورين daily report.rar رابط هذا التعليق شارك More sharing options...
hamada1963 قام بنشر يوليو 22, 2014 مشاركة قام بنشر يوليو 22, 2014 (معدل) السلام عليكم لو اردت وضع اكثرمن خلية في الصفحة بالتاريخ بنفس الكود بنفس الطريقة اي كل تاريخ مستقل بالخلية الخاصة به كذلك لو اردت تحديد الخلايا التي سوف استخدمها للتاريخ ليس العمود كله ولكم جزيل الشكر تم تعديل يوليو 22, 2014 بواسطه hamada1963 رابط هذا التعليق شارك More sharing options...
amgadkh2003 قام بنشر أكتوبر 27, 2018 مشاركة قام بنشر أكتوبر 27, 2018 شكرا جزيلا للأخ السائل و الأخوة الذين تفضلوا بالإجابات و المشاركة و كذلك الشكر موصول للمشرفين على المنتدى منتدانا العظيم و تحياتى رابط هذا التعليق شارك More sharing options...
الردود الموصى بها