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

الحذف من الليست بوكس و قاعدة البيانات معا بعد النقر


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

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

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

وكذلك حذف المكرر

وجزاكم الله كل خير

الحذف من الليست بوكس.rar

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

بعد اذن استاذى / خزانى

استاذ / زوهير

اليك حل اخر ربما ينال اعجابك 

انقر دبل كليك على الصف المراد حذفه من الليست بوكس

تقبل منى وافر الاحترام والتقدير :fff:

الحذف من الليست بوكس.zip

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

جزاكم الله خيـرا
وبارك في جهودكم
وأسال الله لكم التوفيق دائما ويزيدكم علما
وأن يجمعنا على الود والإخاء والمحبة
وأن يثبت الله أجركم
وينفعا الله وإياكم بما تقدموه

------------------------------------

وهو المطلوب

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

بعد اذنكم

صلح في ملف

-------------------------------------------------------------------------------------------------------------------------------------------------------------

و بعد استعماله في ملف اخر  عدد الاعدة 15 وعدد الصفوف اكثر من 500 صف لم يستجب

وقع الخطأ هنا

 

.Range("$a$1:$e$1").AutoFilter Field:=1, Criteria1:=ww
 ll = .Range("a10000").End(xlUp).Row + 1
 .Range("$a$1:$e$1").AutoFilter
.Range(Cells(ll - 1, "a"), Cells(ll - 1, "a")).Select
 Selection.EntireRow.Delete

 

وجزاكم الله خيرا

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

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

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

Important Information