عبد الله-بلال قام بنشر نوفمبر 4, 2011 مشاركة قام بنشر نوفمبر 4, 2011 إخواني السلام عليكم : أنا عندي قاعدة بيانات أكسس و أريد أن أجزأ التاريخ في الإكسل حيث يكون كل رقم في خلية بواسطة ماكرو (vba) و الله يجازيكم خير الجزاء رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر نوفمبر 4, 2011 مشاركة قام بنشر نوفمبر 4, 2011 اكسس واكسل اخي عبدالله هناك معادلة لتجزئة التاريخ الى خانات (اليوم و الشهر و السنه) وهي Day & Month & Year هذه الدوال الثلات تقوم باللازم او ارفق مثال للعمل عليه رابط هذا التعليق شارك More sharing options...
عبد الله-بلال قام بنشر نوفمبر 4, 2011 الكاتب مشاركة قام بنشر نوفمبر 4, 2011 بارك الله فيك أخي عبد الله المجرب على هذا الرد السريع . إليك المثال بالمرفق رابط هذا التعليق شارك More sharing options...
عبد الله-بلال قام بنشر نوفمبر 4, 2011 الكاتب مشاركة قام بنشر نوفمبر 4, 2011 معذرة أخي عبد الله المجرب أحيانا لا يطهر لنا أزرار إضافة المرفقات رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر نوفمبر 5, 2011 مشاركة قام بنشر نوفمبر 5, 2011 جرب هذا المرفق تجزئة التاريخ.rar رابط هذا التعليق شارك More sharing options...
عبد الله-بلال قام بنشر نوفمبر 5, 2011 الكاتب مشاركة قام بنشر نوفمبر 5, 2011 بارك الله فيك أخي و لكن أريد أن أجزأ التاريخ بواسطة ماكرو في vba بحيث كل رقم يكون في خلية و شكرا رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر نوفمبر 6, 2011 مشاركة قام بنشر نوفمبر 6, 2011 السلام عليكم اخي عبدالله طلباتك أوامر فانت في ملتقى مبرمجي الاوفيس العرب اكتب التاريخ في الخلية وشاهد النتيجة Private Sub Worksheet_Change(ByVal Target As Range) LR = Range("A" & Rows.Count).End(xlUp).Row If Not Intersect(Target, Range("a2:a" & LR)) Is Nothing Then Set x = Application.WorksheetFunction Target.Offset(0, 1).Value = x.Text(Target.Value, "dd") Target.Offset(0, 2).Value = x.Text(Target.Value, "mm") Target.Offset(0, 3).Value = x.Text(Target.Value, "yyyy") End If End Sub جرب المرفق === تم وضع زر امر في الورقة الثانية ليكون لديك خيارين اما الزر او الادخال والتحويل المباشر تجزئة التاريخ (1).rar رابط هذا التعليق شارك More sharing options...
عبد الله-بلال قام بنشر نوفمبر 6, 2011 الكاتب مشاركة قام بنشر نوفمبر 6, 2011 الله يجازيك يا أخي عبد الله و أنت دائما في خدمة الآخرين هذا فضل منك . مشكور رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.