Ali Mohamed Ali

وعليكم السلام من الأفضل أخى الكريم ارسال ملف للعمل عليه وشرح كل ماتريد عمله عليه

وعليكم السلام أخى الكريم يجب عليك تنزيل ويندوز جديد

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

تفضل جرب هذا Load Picture On UserForm Using Dialog & Insert Image To Worksheet YasserKhalil.rar وهذا ملف اخر إدراج الصورة.xlsm

السلام عليكم اهل المنتدى الكرام أقدم اليكم برنامج : لجميع الانشطة ( تجارى – صناعى – خدمى – مقاولات ) مطابق تمام لمعايير المحاسبة الدولية كافة المعاملات ( حسابات ختامية – مراقبة مخازن – عملاء – موردين – شئون عاملين – استيراد – تصدير – مستخلصات – مراكز تكلفة – خطوط انتاج – مقايسات - باركود) يشمل البرنامج :- - حسابات الاستاذ كاملة وموازين المراجعة والارباح والخسائر والمركز المالى - تكاليف العمليات وتحليل تكاليف المشروعات وبنود الاعمال بشكل تفصيلى واجمالى - مستخلصات المشروعات - الايرادات - ومستخلصات مقاولين الباطن - منظومة الاجور والمرتبات بشكل متكامل ويمكن تعديلها حسب قانون الدولة - حسابات ضريبة المبيعات والارباح التجارية والصناعية وضريبة كسب العمل وطباعة الاقرارات الضريبية - مراقبة المخازن ومتابعة كروت الصنف وتسعير المنصرف بثلاثة طرق ( الوارد اولا يصرف اولا – المتوسط المرجح – اخر سعر ) - امكانية قرائة وطباعة الباركود وبدون الحاجة لطابعة خاصة - حسابات النقدية بالصندوق والبنوك وتعدد العملات - تكاليف الاستيراد وحساب تكلفة المشتريات المستوردة - حسابات تكاليف خطوط الانتاج وحساب تكلفة الوحدة من المنتجات - تعدد المستخدمين للبرنامج وصلاحيات خاصة لكل مستخدم وسهولة اضافة وحذف مستخدم وسهولة تعديل الصلاحيات - امكانية اضافة مجموعة شركات داخل البرنامج وكلمة مرور لكل شركة - يصلح البرنامج للعمل فى مصر وفى دول الخليج العربي - البرنامج يشمل روابط شرح تفصيلى لكل اجزائه واسم المستخدم وكلمة السر admin 123 وهذا هو البرنامج: بارك الله فيكم The_fastest.rar

البرنامج محمى بكلمة سر ولكن يمكنك تتبع هذه الخطوات: 1. من ابدأ اختر كافة البرامج ومنها اختر برامج الأوفيس Microsoft Office ثم اختر ادوات الأوفيس Microsoft Office Tools ثم اختر معالج حفظ الإعدادات ثم اتبع الخطوات بالصور داخل الملف 1.docx

تفضل أستاذى الكريم

تفضل أستاذى الكريم لك ما طلبت 2.xls

كل من XLSM و XLSB هي في الواقع ملفات مضغوطة يمكنك فتحها في برامج مثل WinRAR. عادةً ، يستخدم تنسيق XLSM XLM لتخزين البيانات ، بينما يتضمن XLSB مصنفًا ثنائيًا يساعد بشكل كبير في تقليل حجم الملف فإذا كان لديك ملف Excel كبير ومعقد ، فمن الأفضل تخزينه بتنسيق XLSB. مزايا XLSB عبر XLSM: سيقوم Excel بتشغيل الملف بشكل أسرع حجم أصغر بكثير بالمقارنة مع تنسيق XLSM عيوب تنسيق XLSB: غير متوافق مع برامج Microsoft الأخرى مثل Openoffice ، إلخ

تفضل جرب هذا 01.xls

دائما مبدع ورائع استاذ سليم ولديك الحل الكافى والوافى جعله الله فى ميزان حسناتك وزادك من العلم جزاك الله كل خير

بارك الله فيك استاذ شريف ولإثراء الموضوع هذا كود اخر: Sub Delete_Rows() Dim cell As Range Dim delRange As Range Application.ScreenUpdating = False For Each cell In ThisWorkbook.Sheets(2).Range("A2:G" & Sheets(2).Cells(Rows.Count, 1).End(xlUp).Row) If cell.DisplayFormat.Interior.ColorIndex = 3 Then If delRange Is Nothing Then Set delRange = cell Else Set delRange = Union(delRange, cell) End If Next cell If Not delRange Is Nothing Then delRange.EntireRow.Delete Application.ScreenUpdating = True End Sub

تفضل اخى الكريم لك ما طلبت الفرق بين الجدولين.xlsm

تفضل أخى الكريم تحليل النتائج.xls

أهلا وسهلا بك أخ كريم فى منتدانا بين اخوانك تفضل هذا الملف به ما طلبت Book1.xlsx

وعليكم السلام -لو ممكن ارسال الملف للعمل عليه يكون هذا افضل وتوضيح المطلوب عليه

اخى الكريم لتقليل حجم الملف قم بحفظ الملف بصيغة Binary وحاول تقليل المعادلات المستخدمة بعض الشئ والاستعاضة عنها بالاكواد مثلا حيث ان هناك بعض المعادلات تجعل الملف ثقيلا مثلا مثل sumif ، sumproduct وايضا يجب عليك تقليل التنسيقات المبالغ فيها مثلا ان وجد صور او خلفيات .... وخلافه بارك الله فيك

ذلك امر طبيعى لكثرة المعادلات

بارك الله فيك استاذ سليم وجزاك الله كل خير وهذا حل اخر لإثراء الموضوع data.xlsx

تفضل اخى الكريم Document.xlsx

ادخل أولا على لوحة التحكم-Control Panel ثم اتبع الخطوات بالصور :

أخى الكريم لا يصلح بالمعادلات اليك الكود تكتب اسم الشيت الذى تريده فى الخلية A1 ولكن المعادلات فقط لإيجاد واستخلاص اسم الشيت وكتابته فى خلية ما وليس العكس بارك الله فيك Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$A$1" Then ActiveSheet.Name = Target.Text End Sub

مشكلتك انك مقيد المعادلة فى صف واحد وهذه معادلة مصفوفة فبمجرد سحب المعادلة الى الأسفل فتحل المشكلة مهما زادت عدد الصفوف ولكن فى حالتك سوف تزود هذا الجزء من المعادلة &"و "&IFERROR(INDEX($B$8:$B$1000,SMALL(IF($F$8:$F$1000=$N$1,ROW($B$8:$B$1000)-ROW($B$8)+1),ROWS($O$3:O6))),"")

تفضل اخى الكريم عرض الاسماء في كل نطاق2.xlsx

وعليكم السلام تفضل اخى الكريم عرض الاسماء في كل نطاق.xlsx