حذف السطر المحدد بناء على قيم معينة

[أنس دروبي]

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

أساتذتي واخواني الكرام مبارك عليكم التحديث الجديد للموقع 

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

وهو حذف السطر أو الصف المحدد بناء على شرطين او أكثر  في قيم خليتين أو أكثر 

نرجو عرض الافكار والأراء حول الموضوع وان يكون الكود سهل وبسيط الفهم لكي نتعلم من بحركم الذي لاينتهي من الافكار الرائعة والمبتكرة

والسلام عليكم

 

 

حذف السطر المحدد بناء على قيم خليتين.rar

[عبدالله المجرب]

السلام عليكم 

اخواني الكرام اعذروني على قلة المشاركات 

==============

اخي السائل (انس دروبي) 

اليك هذا الكود

Sub Abu_AhmedDEL()
Dim cl As Range
For Each cl In [A2:A16]
If cl = [O1] And cl.Offset(0, 5) = [Q1] Then cl.Resize(1, 10).Delete Shift:=xlUp: Exit For
Next
End Sub

 

[أنس دروبي]

السلام عليكم 

اعتذر عن التاخير في الرد 

الله يبارك فيك وجزاك الله كل خير أخي عبد الله المجرب 

أنت أفضالك كثيرة عليي في مجال التعلم على لغة vba وتعليم اكسل

هذا المطلوب بكل معنى الكلمة 

تقبل مروري وشكراً لك مرة أخرى