انا عندى شيت كبير فيه معادلات كتير فعرفت انى ممكن اعمل معادله فى الvbaيسهل عليا ويظهر النتيجه علطول بس لما طبقتها مااشتغلتش وده نص المعادله
Sub formula()
Range("a140:a2000").Formula = "=VLOOKUP(D140,Sheet5!A:E,5,0)"
Range("a140:a2000") = Range("a140:a2000").Value
الرجاء المساعده