نجوم المشاركات

مميزات الفورم السحرى 1-الفورم يستكشف جميع الجداول المصممة فى اى ملف اكسل 2- التعامل مع تلك الجداول من حذف واضافة وبحث وترحيل 4- ضبط عرض أعمدة اليست بوكس من خلال ضبط أعمدة الجدول 3- الفورم يكتشف المعادلات ويحميها تلقائيا 5- الفورم السحرى يكتشف اعمدة التواريخ تلقائيا 6- الفورم يقبل تدعيم الجداول بالصور تلقائيا 7- الفورم يحدد اوتوماتيكيا المكان الجغرافى للجداول داخل ملف الاكسل وهناك كثير للميزات ستكتشفها بنفسك عند العمل على الفورم السحرى هذا شرح مصور الاخ الرائع عماد الغازي بالمناسبة أشكره من كل قلبي على هذا الشرح جزاه الله خيرا الفورم_السحرى.rar

برنامج بيع بالاكسيل vba مجاني اسم المستخدم :مدير الرقم السري:5555 برنامج الافق __.rar

و عليكم السلام تفضل اليك التعديل Random.accdb

بعد اذن اخي محمد ابو عبد الله في المربع في الصورة ضع المسار التالي .\iconName.ico على ان تكون الصورة موجودة جانب قاعدة البيانات بحيث ان iconName هو اسم الايقونة

ضع الكود التالي في وحدة نمطية Function AddAppProperty(strName As String, _ varType As Variant, varValue As Variant) As Integer Dim dbs As Object, prp As Variant Const conPropNotFoundError = 3270 Set dbs = CurrentDb On Error GoTo AddProp_Err dbs.Properties(strName) = varValue AddAppProperty = True AddProp_Bye: Exit Function AddProp_Err: If Err = conPropNotFoundError Then Set prp = dbs.CreateProperty(strName, varType, varValue) dbs.Properties.Append prp Resume Else AddAppProperty = False Resume AddProp_Bye End If End Function Function Xicon() Dim intX As Integer Const DB_Text As Long = 10 ' AppTitle intX = AddAppProperty("AppTitle", DB_Text, "عنوان البرنامج") ' AppIcon intX = AddAppProperty("AppIcon", DB_Text, CurrentProject.Path & "\N.ico") CurrentDb.Properties("UseAppIconForFrmRpt") = 1 End Function ثم استدعي الدالة في النموذج الرئيسي للبرنامج Private Sub Form_Load() Call Xicon End Sub او عن طريق ماكرو والافضل تسميته autoexec ليبدأ مع عمل البرنامج RunCode ثم اسم الدالة Xicon() تحياتي

يمكنك دمج الكود بإنشاء ماكرو جديد وتكتب فيه اسم الماكرو الأول ثم اضغط انتر واكتب اسم الماكرو الثاني هكذا: Sub a() kh_Start code End Sub وإليك الملف المرفق amine.xls

تفضل سجل قضايا.xlsm

القي نظرتا اليه تقرير فرعى.accdb

السلام عليكم ورحمة الله تفضل أخي الملف وفيه الحل مع بعض الشرح للتعديلات التي أُجريت... بن علية حاجي شيت كنترول.rar

مساهمه منى لاثراء الموضوع طبعا الملفات ليست لى فبارك الله فى اصحابها وجزاهم الله كل خير اول ملف ده شرح لاخفاء وحماية المعادلات والتانى كود لحماية الخلايا التى بها معادلات فقط دون اخفائها ولكن لا يستطيع العبث بها بالتوفيق اخوانى Hemayaحماية معادلات الاكسيل من الضياع بدون قصد مع جعل بعض الخلايا قابلة للتعديل والكتابة في نفس الشيت.rar كود يقوم بالحماية التلقائية للخلايا التى بها معادلات دون تدخل من المستخدم.rar