المسلم العربي

كنت أعاني من هذا المشكل وتمحله بهذا الشكل #If win64 Then declare PtrSafe Sub Sleep Lib "kernel32" (byval dwmilliseconds as Long ) #Else Declare Sub sleep Lib "kernel32" (ByVal dwmilliseconds As Long) #End If

إخواني الكرام هل ممكن مساعدة وشكرا

أريد كود لأظهر الصورة بعد عمل بحث فوري و أحيانا تظهر نتائج متعددة أريد أن تظهر الصورة عند النقر على احدى النتائج سؤال.rar

أرجو الرد إخواني

تفضل أخي الفاضل بحث فوري.rar

أريد كود لأظهر الصورة بعد عمل بحث فوري و أحيانا تظهرنتائج متعددة أريد أنتظهر الصورة عند النقر على احدةى النتائج لم أستطع ارفاق الملف لأنه أكبر من 1 ميجا أرجوالمساعدة

Sub SCAN() Range("A1").Select ActiveCell.FormulaR1C1 = 1 Const FromScannerorCamera As Long = 1764 Application.CommandBars.FindControl(, FromScannerorCamera).Execute Selection.ShapeRange.LockAspectRatio = msoTrue Selection.ShapeRange.Width = 912# Selection.ShapeRange.Height = 1092# End Sub

أرجو المساعدة

طلب تعديل كود المرفق حتى استطيع عمل ما اريد و هو نسخ ما في الورقة 1 ثم لصقه في الورقة 2 ثم حفظ الورقى 2 بمجلد جديد و باسم أنا اختاره موجود بخلية معينة أتمنى المساعدة سؤالي.rar

طلب دالة لحساب عدد الاشخاص بشرط معين و شكرا لكم حساب عدد الاشخاص.rar

كمبومبوس تحوي قائمة ( ماذا تريدها أن تحوي )؟؟؟

تفضل سيدي الكريم و أرجو ان يكون المطلوب المنصوري.rar

شكرا سيدي و لكن الكود ثقيل جداااا أرجو طريقة لتسريعه سيدي بن علية

روعة بارك الله فيكم اساتذتنا الكرام

هل من رد من الأخ بن علية حاحي