Ali Mohamed Ali

تفضل اخى الكريم تفقيط1.xlsm

تفضل اخى الكريم Nouveau Feuille de calcul Microsoft Excel.xlsx

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

وهنا ايضا يوجد نسخة تجريبية من برنامج Vehicle Manager 1.5.2 لإدارة ورش ومراكز خدمة صيانة ولكن سعره 1000 جنيه-لأن كل نوعية هذه البرامج تكون بمقابل وليست مجانية http://arabteam2000-forum.com/index.php?/topic/258497-برنامج-vehicle-manager-152-لإدارة-ورش-ومراكز-خدمة-صيانة-السيارات/ وهنا ايضا برنامج بمقابل https://www.roayatech.com/Products/ProductDetail/6/برنامج-مراكز-خدمة-السيارات-الأصدار-المحاسبي

وهنا ايضا يوجد نسخة تجريبية من برنامج Vehicle Manager 1.5.2 لإدارة ورش ومراكز خدمة صيانة ولكن سعره 1000 جنيه-لأن كل نوعية هذه البرامج تكون بمقابل وليست مجانية http://arabteam2000-forum.com/index.php?/topic/258497-برنامج-vehicle-manager-152-لإدارة-ورش-ومراكز-خدمة-صيانة-السيارات/

ممتاز احسنت استاذى الكريم بارك الله فيك

اهلا بك اخى ابراهيم فى المنتدى الرقم السرى موجود فى المشاركة الأولى للأستاذ عوض , صاحب الموضوع وهو : 301155 بارك الله فيك

بعد اذن استاذنا عبد الرحيم تفضل الفرز و الترتيب.xlsx

اهلا بك اخ كريم فى المنتدى ادخل على excell option من شعار اوفيس وبعدين ادخل على formulas ثم من اليمين خلى workbook calculation automatic وان شاء المشكلة هتتحل

اهلا بك اخ كريم فى المنتدى تفضل الاصناف والالوان.xlsx

أهلا بك اخ كريم فى المنتدى تجنبا لعدم اضاعة الوقت عليك برفع ملف وشرح ما تريده بالتفصيل فلا يمكن العمل بدون ملف او على التخمين بارك الله فيك

بارك الله فيك استاذى الكريم وف صاحب الموضوع جعله الله فى ميزان حسناتكما

جرب هذا ب SQL Server https://msdn.microsoft.com/en-us/library/aa454892.aspx

أحسنت استاذ شفات بارك الله فيك موضوع مميز ومطلوب جعله الله فى ميزان حسناتك

تفضل-يمكنك ملاحظة الصورتين لكيفية عمل التكست بوكس ثم دبل كليك على شكل التكست بوكس ثم وضع الكود هذا به Private Sub TextBox1_Change() Dim LastRow As Long LastRow = Range("B1000").End(xlUp).Row If ActiveSheet.TextBox1.Text <> "" Then Range("$A$2:$C$" & LastRow).AutoFilter field:=2, Criteria1:= _ "=" & ActiveSheet.TextBox1.Text & "*", Operator:=xlOr Else Range("A2:C2").AutoFilter Range("A2:C2").AutoFilter End If End Sub

تفضل اخى الكريم عليك بعمل فولدر جديد على سطح المكتب بإسم: المدارس وعليك بتغيير هذا المسار بما يتناسب مع جهازك C:\Users\Ali Mohamed حفظ pdf.xlsm

أهلا بك فى المنتدى عليك برفع ملف وشرح بالتفصيل لما تريده بارك الله فيك

احسنت استاذ سليم بارك الله فيك كود ممتاز

تفضل المولد.xlsm

اهلا بك اخ كريم فى المنتدى تفضل GOAL SEEK.xlsm

عليك بحفظ الملف بصيغة XLSM

وعليكم السلام تفضل لك ما طلبت سجل المدرسة.xlsm

اظن انك لا تحتاج اكثر من هذا مدارس.xlsm

تفضل كل ما تريد واعتقد ان لا تحتاج غير ذلك توضيح2.xls

تفضل البرنامج برنامج العطاء للعقارات.mdb