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

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

قام بنشر

السلام عليكم و رحمة اللة 

بعد طول غياب نحب المنتدى و اهله

كود اثبات وجود و  انتماء للمنتدى  ليس اكثر 

 For i = 1 To UsedRange.Rows.Count
    For x = i + 1 To UsedRange.Rows.Count
     If Cells(i, 1).Value = Cells(x, 1).Value Then Cells(x, 1).Delete
    Next x
   Next i

Return To Excel Offciena.rar

  • Like 1
  • Thanks 1
قام بنشر

أخي وحبيبي في الله ..الغائب عن العين الحاضر في القلب ..أبو أسامة (أسد الإكسيل )  :smile:  :yes:

أخيراً عاد الأسد لعرينه ..فهنيئاً لنا ثم هنيئاً لنا ثم هنيئاً لنا بعودتك :dance1: :dance1:

ونرجو من الله أن يديم عليك الصحة والعافية ...

تلميذكم أبو البراء :fff: :fff:

قام بنشر

جزاكم الله خيرا استاذى ابواسامه

عوده حميده وان شاء الله متحرمناش من ابداعاتك

تقبل تحياتى

  • 2 months later...

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
×
×
  • اضف...

Important Information