seddiki_adz قام بنشر مايو 4, 2022 مشاركة قام بنشر مايو 4, 2022 طلب مساعدة في ترحيل العمودين C و D من الشيت BASE الى العمودين E و F من الشيت RÉSULTAT حسب قيمة الخلية الموحودة في العمود D BINOME2223.xlsx رابط هذا التعليق شارك More sharing options...
رضا على قام بنشر مايو 4, 2022 مشاركة قام بنشر مايو 4, 2022 بعد ادن الادمن الاجابة على حسب قهمى البسيط بعد ادن الادمن الاجابة على حسب قهمى البسيط BINOME2223.xlsx رابط هذا التعليق شارك More sharing options...
seddiki_adz قام بنشر مايو 4, 2022 الكاتب مشاركة قام بنشر مايو 4, 2022 شكرا عاى المحاولة لكن ليس هذا المطلوب لان 9009 تقابلها القاعة A السطر 76 الى ما فوق رابط هذا التعليق شارك More sharing options...
أفضل إجابة lionheart قام بنشر مايو 4, 2022 أفضل إجابة مشاركة قام بنشر مايو 4, 2022 Sub Test() Application.ScreenUpdating = False With Sheet2 .[A1].CurrentRegion.Columns("B:D").AdvancedFilter xlFilterCopy, , .[H1], True End With With Sheet1 With .Range("E2:F" & .Cells(Rows.Count, "D").End(xlUp).Row) .Formula = "=INDEX(BASE!I$1:I$272,MATCH($D2,BASE!$H$1:$H$272,0))" .Value = .Value End With End With Sheet2.[H1].CurrentRegion.Clear Application.ScreenUpdating = True End Sub 1 رابط هذا التعليق شارك More sharing options...
هانى محمد قام بنشر مايو 4, 2022 مشاركة قام بنشر مايو 4, 2022 تفضل seddiki_adz .. ولكن هذه مسألة بسيطة جداً وكان عليك وضع الكود بالملف بنفسك .. وطالما انك تريد حل مشكلتك بالأكواد فكان عليك من باب أولى رفع الملف بإمتداد يقيل اضافة الأكواد من البداية مثل Xlsm والشكر موصول لأستاذنا الكبير lionheart ولكن بكل بساطة لإضافة الكود بالملف عليك بالضغط على Alt+F11 ثم بعد ذلك الضغط على قائمة Insert واختيار Module ستفتح لك نافذة جديدة عليك بلصق الكود بها وشكراً BINOME2223.xlsm 3 1 رابط هذا التعليق شارك More sharing options...
seddiki_adz قام بنشر مايو 4, 2022 الكاتب مشاركة قام بنشر مايو 4, 2022 شكرا اخي رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.