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

السلام عليكم ورحمة الله وبركاته عيدكم مبارك وكل عام وانتم بخير شرح امكانيات الفورم وكيفية الاستخدام: 1 - استخدام الفورم لاكثر من قاعدة بيانات في المصنف على ان يكون لكل قاعدة كود لاظهار الفورم يتغير فيه معطياتك في متغيرات kh_SetAddrss .kh_SetAddrss "مثال1", "C10:AO10" اولاً : اسم ورقة البيانات ( افتراضي ) ثانياً : نطاق صف رؤوس اعمدة البيانات ( افتراضي ) ثالثاً : عمود التسلسل ( اختياري ) اذا اردت ادخال رقم تسلسل البيانات الخاص بالفورم تلقائيا في عمود معين سجل عنوان راس العمود . مع ملاحظة انه لا يكون من ضمن نطاق رؤوس اعمدة البيانات كما هو معمول في المثال 2. . kh_SetAddrss "مثال2", "C4:H4", "B4" 2 - تستطيع اضافة قائمة لعمود معين في الفورم باضافة تعليق على عنوان العمود وتكتب القائمة وتفصل بين الكلمات بالعلامة + 3 - ينسخ التنسيقات والمعادلات في السجل الجديد . 4 - يبحث في جميع الاعمدة حسب الاختيار من القائمة في الفورم . 5 - يعطي نتائج صحيحة عند البحث عن تاريخ اذا شيكت الزر البحث عن تاريخ . 6 - امكانيات زر البحث عن تاريخ يتم تحويل اي قيمة تضعها في مربع النص للبحث الى تاريخ بالتنسيق الافتراضي للفورم ,, مع امكانية ادخال رقم صحيح بين 1 الى 31 ليفهم على انه تاريخ اليوم للشهر الحالي والسنة الحالية 7 - ثوابت بامكانك تغييرها حسب طلبك بداية اكواد الفورم 1- تغيير تنسيقات إظهار التاريخ في الفورم في الثابت DtF 2- تغيير عٌرض مربعات الادخال في الثابت iWgt1 ----------------------------------------------------------------------------------------------------- هذه الامكانية غفلنا عن ذكرها : 8 - بامكانك انتقاء الاعمدة التي تريدها عند تسمية النطاق وترتيبها حسب ما تريد مع ملاحظة ان العمود الذي يعتمد عليه في احتساب آخر صف هو العمود الاول من التسمية مثلا: "E15,C15,H15:AX15" اول عمود هو E ----------------------------------------------------------------------------------------------------- المرفق 2003-2007 فورم ادخال و تعديل مرن.rar الاصدار الثاني http://www.officena.net/ib/index.php?showtopic=48811 الاصدار الثالث: http://www.officena....showtopic=51955

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

لدى على الجهاز وورد أوفيس 2003 SP3 ومرتاح معه تماما ولكن اليوم نسخت ملف كبير من المفكرة لألصقه فى الوورد وأقوم بتنسيقه واستخدامه فأعطانى البرنامج رساله خطأ وقام بإغلاق البرنامج وفقدت العمل كله .!!! الرجاء من الخبراء تفسير الذى حدث ، وهل يمكن علاج ذلك مستقبلا ؟ اشكركم مقدما

السلام عليكم احسنت اخي ضاحي الغريب تقبل تحياتي وشكري

السلام عليكم الاخ الكريم / seao بارك الله فيك جرب استخدام الاكواد التاليه لعمل المطلوب علي ملفك هذا الكود لاخفاء الصفوف بناءا علي الشرط المطلوب Sub SAMA_6565() On Error Resume Next Application.ScreenUpdating = False Dim LR As Long LR = Range("I" & Rows.Count).End(xlUp).Row For i = 3 To LR With Range("I" & i) If .Value = 0 Then .EntireRow.Hidden = True End If End With Next i Application.ScreenUpdating = True End Sub وهذا الكود لاظهار جميع الصفوف Sub SAMA() On Error Resume Next Application.ScreenUpdating = False Rows("3:1000").Select Selection.EntireRow.Hidden = False Range("B3").Select Application.ScreenUpdating = True End Sub واليك ملف 2003 به الكود والازرار جزاك الله خيرا رصيد المخزن رقم 5 ب.rar