تغير التاريخ فى كامل العمود

[طارق زكريا حسين جاه الرسول]

بسم الله الرحمن الرحيم

بعد التحية

كل عام وانتم بخير

المطلوب ان شاء الله

عند تغير السنة فى الخلية (A2) يتم تغير التاريخ فى كامل العمود (A)

ولكم الشكر والتقديرتغير التاريخ.rar

[طارق زكريا حسين جاه الرسول]

شرح داخل المرفقتغير التاريخ.rar

[سليم حاصبيا]

اكتب هذه المعادلة في الخلية A4 واسحب نزولاً

=TEXT(DATE($A$2,1,1)+ROWS($A$1:A1)-1,"dddd  yyyy/mm/dd")

 

[ياسر العربى]

تفضل كود بحث واستبدال لعله يفي بالغرض

تغير التاريخ.rar

[طارق زكريا حسين جاه الرسول]

استاذى

سليم حاصبيا

لم افهم الجواب

[طارق زكريا حسين جاه الرسول]

لك جزيل الشكر والتقدير

 

[سليم حاصبيا]

16 دقائق مضت, طارق زكريا حسين جاه الرسول said:

استاذى

سليم حاصبيا

لم افهم الجواب

لم افهم ماذا تقصد بالسؤال

فقط انسخ المعادلة من المشاركة وضعها في الخلية المطلوبة 

كبسة Enter وهذا كل شيئ

ثم اسحب المعادلة الى باقي العامود

[طارق زكريا حسين جاه الرسول]

عند نسخ المعادلة يعطينى خطا

[سليم حاصبيا]

7 دقائق مضت, طارق زكريا حسين جاه الرسول said:

عند نسخ المعادلة يعطينى خطا

حازل ان تستبدل الفاصلة الغادية بفاصلة منقوطة بالمعادلة

لتصبح هكذا

=TEXT(DATE($A$2;1;1)+ROWS($A$1:A1)-1;"dddd  yyyy/mm/dd")

تم تعديل يونيو 16, 2016 بواسطه سليم حاصبيا

[طارق زكريا حسين جاه الرسول]

اشكرك جزيل الشكر والتقدير

[أبو حنــــين]

السلام عليكم

يمكن ان تستعمل الكود التالي

 

Sub N_Year()

For x = 4 To 369
Range("A" & x) = Replace(CStr(Range("A" & x)), Year(Range("A" & x)), Range("A2"), 1, , vbTextCompare)
Range("A" & x) = Format(Range("A" & x), "dd-mm-yyyy")
Next

End Sub

 

 

تم تعديل يونيو 16, 2016 بواسطه أبو حنــــين

[طارق زكريا حسين جاه الرسول]

معلمى

أبو حنــــين

اشكرك جزيل الشكر

[صلاح الصغير]

ا / ابو حنين

الكود ده فيه مشكلة فى التنسيق بالنسبة للتاريخ