اذهب الي المحتوي
أوفيسنا

مطلوب كود او صيغة المدةالمتبقية على المستأجر لسداد الإيجار


الردود الموصى بها

اخي ابو ريان

تفضل الملف الذي حاولت ولاكن النتيجة ليست المطلوبة (حسب طلبك)

ابواحمد

779646062.gif

رابط هذا التعليق
شارك

استاذ عبدالله انا عدلت RAW بدل 3 خليتها 12

Private Sub TextBox1_Change()

On Error Resume Next

Dim W As Workbook

Dim MyRange_Search As Range, Mycel As Range

Dim R As Integer

ListBox1.Clear

Set sh = Sheets("ÞÇÆãÉ ÇáÓÊÃÌÑíä")

Set MyRange_Search = Range("MY_DATA")

For Each Mycel In MyRange_Search

If LCase(Mycel) Like "*" & LCase(TextBox1) & "*" Then

With ListBox1

.AddItem

.List(R, 0) = MyRange_Search.Cells(Mycel.Row - 12, 1)

.List(R, 1) = MyRange_Search.Cells(Mycel.Row - 12, 2)

.List(R, 2) = MyRange_Search.Cells(Mycel.Row - 12, 3)

.List(R, 3) = MyRange_Search.Cells(Mycel.Row - 12, 4)

.List(R, 4) = MyRange_Search.Cells(Mycel.Row - 12, 5)

.List(R, 5) = MyRange_Search.Cells(Mycel.Row - 12, 6)

End With

R = R + 1

End If

Next

On Error GoTo 0

1 End Sub

وكاني احسن في أمل ما ادري ( تراني دخت )

رابط هذا التعليق
شارك

اخي عبدالله نجحت والله باعجوبة وبعد مليون محاولة لحركة العقود العامة ( العقد مستمر - العقد منتهي )

الآن المتبقي كيف نضيف ( لم يسدد - تبقى على الإيجار )

الحركة العامة 1للمستأجرين للتعديل.rar

رابط هذا التعليق
شارك

لقيتها لقيتها غير بدل 12 خليها 13 طلعت مزبوطة بس تحتاج دخولك وتزبط الباقي

اخي حسن " ابو ريان " احسنت لم انتبه لرقم الصف

بفضل الله ثم فضلك ثم الحل مثل ما انت تريد

ارجو منك اخي حسن اذا كان هناك اي طلب ان تفتح له موضوع جديد وعنوان معبر وان شاء الله ستجدنا في الخدمة ولكن حتى تعم الفائدة فموضوعك هذا فيه اشياء كثيرة وعنوان الموضوع لا يدل عليها فحين البحث لا تظهر للاعضاء.

اخي ابو ريان سأمحني على هذا الطلب ولكن للفائدة العامة طلبت هذا.

رابط هذا التعليق
شارك

كلامك سليم 100 في المائة اعدك بفتح موضوع جديد لأي طلب آخر ولكن تعدني ان تكون موجود لسبب أنك معي منذ البداية من بداية التصميم المبدأي حتى التقرير الحالي

لا تذهب بعيداً فلدي المزيد لأن الفكرة تجر أختها

رابط هذا التعليق
شارك

اخي حسن

لا استطيع ان اعدك ولكن ما استطيع ان أقول لك اني مادمت استطيع المحاولة فتأكد بأني لن اتردد لثانية في المساعدة وهذا الكلام لا ينطبق علي وحدي بل على جميع إخواني في المنتدى

*** ملاحظة هامة****

كود الوقت يؤثر في عملك على الملف فيجب ان تلتفت الى هذه الناحية

جرب ان تقوم بالتعديل على اي شي في الملف ثم انتظر ثواني وقم بالتراجع عن ما قمت به ((لن تستطيع والبركة في هذا الكود))

ان كان ولا بد من الساعة حاول ادراج ساعة فلاشية (هذا مقترح )والافضل الغاء هذا الكود (وهذا راي)

والله الموفق

ابواحمد

رابط هذا التعليق
شارك

طيب لية في المنتهية الاسم مكررمرتين في تعديلك اما في المرسل من قبلي مرة واحدة هل هناك سبب محدد وطبعا ابغى التقرير هذا يطلع بعد فورم التحميل وهل ممكن اضافة زر للصباعة في فورم التقرير :wink2:

رابط هذا التعليق
شارك

اخي عبدالله ماهي الطرقة لنشخ الأكواد بطريقةسريعةمرة واحدة ام انت تقوم بتعديلها واحد تلوالآخر ( تبقى على الإيجار ... )

السلام عليكم

اخي ابو ريان

هل يمكن ان تستبدل اسماء الصفحات وتجعلها ارقام متسلسلة مثلاً

ان كان الجواب نعم فيمكن الاستغناء عن تعريف AA BB CC ....الخ

واستعمال الدالة INDIRECT لتعريف نطاق معين وسيسهل التعديل ويصبح بإمكانك السحب ليتطبق على الخلايا الاخرى

في الوقت الحالي انا اقوم بالتعديل خلية خلية

ابواحمد

رابط هذا التعليق
شارك

لا مانع لدي ولكن ليست لدي الخبرة الكافية في عمل ذلك can helpe me to do that مرفق لك اخي الكريم الملف النهائي بعد اجرائي التعديلات علية في فورم التقرير

حركة المستأجرين.rar

رابط هذا التعليق
شارك

اخي ابو ريان

تفضل المرفق بعد التعديل

يمكنك الآن حذف هذه التعريفات (AA BB AAA BBB .... الخ )

جرب واعلمني بالنتيجة

ابواحمد

رابط هذا التعليق
شارك

لا لا لا لم استوعب :blink: خلينا ياعمي على قدي والله ضعت حتى اول مافتحت النموذج جتني رسالة خطا تقولان opject معطل وكلام كثير حتى السحب والإفلات ماقدرت اسحب اي خلية

واذا قلنا فرضاً اني اقتنعت وجازفت لما تطرقت الية هل التنسيق الشرطي راح يكون نفس الحكاية سحب وافلات فقط ( عن جد انا قلق جداً من هذة الدالة ) :imsorry:

رابط هذا التعليق
شارك

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

اسم مستأجر العقار

الإسم التجاري للعقار

موقع العقار

رقم الجوال

حالة العقد

توضيح حالة الإيجار ( والذي يمثل تبقى - موعد الايجار اليوم ... الخ )

الخانة الجديدة ( رصيد المستأجر )

حسب الملف المرفق بعد التعديل مع العلم بأنني لم اضف الخانة المطلوب لعدم معرفتي كيفية اضافتها

بالإضافة لزر امر الطباعة فهو يقوم بطباعة الفورم كما هو علية والمفترض ان تتم طباعة جميع البيانات داخل الفورم حسب كمية البيانات

ولا يخفى عليكم انني قسمت نموذج التقرير لقسمين :-

الأول : تقرير حركة الإيجارات

الثاني : تقرير حركة العقود

فتم الإنتهاء من تقريرحركة الإيجارات ولكن تقريرحركة العقود لم تنجح معي المحاولات ومازلت مستمر في المحاولات عسى أن أجد ضالتي في التكرار وأسأل الله أن أستفيد ويستفيد كل مشارك في المنتدى من النتيجة النهائية للملف سواءً بالفكرة أو المضمون

الحركة للتعديل.rar

تم تعديل بواسطه حسن قديمي
رابط هذا التعليق
شارك

اخي عبدالله المقصور عند الضغط على زر( بحث خاص ) وليس في صفحة ( قائمة المستأجرين ) يعني احتاج ان يكون الرصيد ضمن نموذج التقرير عند الضغط على زر البحث الخاص فاذا اخترت الايجارات المنتهية يظهر التقرير وهنا اريد وجود الرصيد وعند الضغط على ( تبقى على الايجار كذا .. ) ايضا اريد الرصيد يظهر في التقرير مع امكانية طباعة كامل التقرير لا الفورم

رابط هذا التعليق
شارك

تحية وتعظيم سلام لك اخي عبدالله اللحين ابتسمت وانا من الصباح بين محاولة واخرى

اخي بالنسبة للدالة اللي قلت عنخا انا فتحت الملف ولكن طلعت رسال تقول ان البروجيكت غير موجود على الجهاز حقي او شي من ذا القبيل ولكن لماذا مطلوب تغيير اسماء الورق من اسماء المستاجرين لأرقام هل لتسهيل العملية فقط ام لعمل الدالة وهل لو عملت نسخة من ورقة مثلا رقم 10 وسميتها 11 ورحت لقائمة المستاجرين وعملت سحب وافلات للخانات التي فيها الدالة النتيجة اجدها مباشرة مع التنسيق الشرطي ام احتاج لأشياء اخرى معها ارجو افادتي ولك الشكر لأني عن جد دخت لما شفت صيغة المعادلة حقها ( تجننت ) اتمنى ان لم اثقل عليك وعارف اني بلشة واشكر تواضعك

نسيت اخي امر مهم طباعة التقرير من داخل الفورم وليس طباعة الفورم نفسة على سبيل المثال لو اخترت من التقرير العقود التي بعد على تجديدها كذا ... فناتج التقرير عقود كثيرة فلما اضغط على طباعة فيطبع صورة من الفورم فقط مع البياناتالموجود على الفورم ولكن هناك بيانات في الفورم مازالت موجودة بالاسفل لو حركت الشريط الجانبي ( سكرول بار )

رابط هذا التعليق
شارك

اخي حسن

الم نتفق على ان يكون الرد في الموضوع الجديد الذي فتحته

لنعتبر هذا الموضوع انتهى والدور الان على الموضوع الجديد

الى هناك

ابواحمد

رابط هذا التعليق
شارك

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information