اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

تعديل كود


الردود الموصى بها

اخواني الاعزاء  تحية طيبه  ارجو المساعده في :

   1- تعديل الكود لالغاء الخليه الفارغه التي تظهر عند التفعيل 

   2- امكانية الترحيل لهذه الخلايا ( ارقام القوائم ) بالمعادلات

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

كود لترحيل ارقام غير مكرره.rar

رابط هذا التعليق
شارك

استبدل الكود عندك بها الكود  وسوف ترى النتيجة

Sub زر_1()
lh = Cells(Rows.Count, "H").End(3).Row
lc = Cells(Rows.Count, "c").End(3).Row

Range("H5:H" & lh).Clear
Range("c5:c" & lc).SpecialCells(xlCellTypeConstants, 1).Copy Range("H5")

End Sub

 

  • Like 2
رابط هذا التعليق
شارك

حل رائع من استاذ اروع طلب اخير لو سمحت  حيث ظهرت الحاجة لتغيير الاعمده مما استوجب تعديل الكود ارجو المساعده  مع تقديري واحترامي

كود لترحيل ارقام غير مكرره 2.rar

رابط هذا التعليق
شارك

استاذنا القدير مع تقديري وامتناني لردكم ما وددت الحصول عليه في ورقة ( التصفيه 2 ) هو نفس الكود الرائع في ورقة ( التصفيه بزر ) لكن بتغيير في الاعمده فقط  مع اعتذاري

رابط هذا التعليق
شارك

استاذنا القدير مع جزيل شكري واحترامي يظهر اني لم اوفق في ايصال الطلب بصورة واضحه  المطلوب كود للترحيل بدل المعادلات كما في المرفق مع الشكر

كود لترحيل ارقام غير مكرره3 salim.rar

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information