لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
هانى على لا تميز خلال هذه الفترة-- لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة طلب استخراج بيانات متخصصة لصفحة مستقلة اكسل وpdfمن جدول فعاليات اكسيل اسئله واجابات



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






موضوع مغلق


  • تمت الإجابة
11-11-2021 02:22 مساءً
السلام عليكم
دا ملف كنت نزلتة من المنتدى للاستفادة به
وهو رائع جدا جدا ولصاحبة جزيل الشكر والتقدير

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


وتم توضيح ذلك اكثر داخل الصور

وجعله الله فى ميزان حسناتكم جميعا
 
  1.jpg   تحميل jpg 1.jpg مرات التحميل :(0)
الحجم :(152.059) KB
  2.jpg   تحميل jpg 2.jpg مرات التحميل :(0)
الحجم :(74.257) KB
 
  ترصيد من خلال البحث.xlsm   تحميل xlsm مرات التحميل :(2)
الحجم :(24.195) KB





look/images/icons/i1.gif مشكلة فى ملف بحث بالليست بوكس
  11-11-2021 05:57 مساءً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 23-08-2017
رقم العضوية : 69
المشاركات : 164
الجنس :
تاريخ الميلاد : 1-1-1982
الدعوات : 1
قوة السمعة : 867
الاعجاب : 0
جرب المرفق
 
 
  فورم بحث عن الاصناف بالحروف الاولى واظهار النتائج فى الليست بوك.xlsm   تحميل xlsm مرات التحميل :(6)
الحجم :(81.578) KB


أثارت هذه المشاركة إعجاب: hassona229، حبيبتى دائما، علي بطيخ سالم،



look/images/icons/i1.gif مشكلة فى ملف بحث بالليست بوكس
  12-11-2021 01:19 صباحاً   [2]
معلومات الكاتب ▼
تاريخ الإنضمام : 19-07-2019
رقم العضوية : 13887
المشاركات : 93
الجنس :
تاريخ الميلاد : 5-3-1984
قوة السمعة : 76
الاعجاب : 0
المشاركة الأصلية كتبت بواسطة: حسين مامون جرب المرفق
استاذى حسين مأمون
لك جزيل الشكر والتقدير لاهتمامك

ولكن المطلوب هو عن البحث باسم العميل فى التيكست بوكس
تظهر بياناته فى الليست بوكس ويتم ترصيد حساب العميل
يعنى يافندم معادلة حسابية
اول سطر نطرح المبلغ -السداد
ثانى سطر = ( ناتج السطر الاول + المبلغ - السداد )
ثالث سطر = (ناتج السطر الثانى + المبلغ - السداد )

هكذا يتم الترصيد مع كل عميل
 
 
  ترصيد من خلال البحث.xlsm   تحميل xlsm مرات التحميل :(3)
الحجم :(24.195) KB





look/images/icons/i1.gif مشكلة فى ملف بحث بالليست بوكس
  12-11-2021 10:43 صباحاً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 23-08-2017
رقم العضوية : 69
المشاركات : 164
الجنس :
تاريخ الميلاد : 1-1-1982
الدعوات : 1
قوة السمعة : 867
الاعجاب : 0
اخي الكريم
لم افهم شيء مما ذكرته

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


أثارت هذه المشاركة إعجاب: hassona229، علي بطيخ سالم،



look/images/icons/i1.gif مشكلة فى ملف بحث بالليست بوكس
  12-11-2021 07:12 مساءً   [4]
معلومات الكاتب ▼
تاريخ الإنضمام : 19-07-2019
رقم العضوية : 13887
المشاركات : 93
الجنس :
تاريخ الميلاد : 5-3-1984
قوة السمعة : 76
الاعجاب : 0
المشاركة الأصلية كتبت بواسطة: حسين مامون اخي الكريم
لم افهم شيء مما ذكرته

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

قد تم تعديل الموضوع وتم اضافة صور توضيحية اكثر
كما اريد ان اشكرك على تبنيك للموضوع , وانفعنا الله بعلمك ويزيدك من فضله




look/images/icons/i1.gif مشكلة فى ملف بحث بالليست بوكس
  12-11-2021 07:54 مساءً   [5]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 12
المشاركات : 135
الدولة : مصر
الجنس :
قوة السمعة : 220
الاعجاب : 0
السلام عليكم
استخدم التعديل التالى
CODE
Option Explicit
Private Sub TextBox1_Change()
Dim sh As Worksheet
Set sh = Sheets("data2")
Dim i As Long
Dim x As Long
Dim p As Long
Me.ListBox1.Clear
'For Listbox Header
Me.ListBox1.AddItem "التاريخ"
Me.ListBox1.List(ListBox1.ListCount - 1, 1) = "العميل"
Me.ListBox1.List(ListBox1.ListCount - 1, 2) = "الصنف"
Me.ListBox1.List(ListBox1.ListCount - 1, 3) = "مبلغ"
Me.ListBox1.List(ListBox1.ListCount - 1, 4) = "سداد"
Me.ListBox1.List(ListBox1.ListCount - 1, 5) = "ملاحظات"
Me.ListBox1.List(ListBox1.ListCount - 1, 6) = "ترصيد"

Me.ListBox1.Selected(0) = True
For i = 2 To sh.Range("B" & Rows.Count).End(xlUp).Row
For x = 1 To Len(sh.Cells(i, 2))
p = Me.TextBox1.TextLength
If LCase(Mid(sh.Cells(i, 2), x, p)) = Me.TextBox1 And Me.TextBox1 <> "" Then
With Me.ListBox1
.AddItem sh.Cells(i, 2)
.List(ListBox1.ListCount - 1, 0) = sh.Cells(i, 1)
.List(ListBox1.ListCount - 1, 1) = sh.Cells(i, 2)
.List(ListBox1.ListCount - 1, 2) = sh.Cells(i, 3)
.List(ListBox1.ListCount - 1, 3) = sh.Cells(i, 4)
.List(ListBox1.ListCount - 1, 4) = sh.Cells(i, 5)
.List(ListBox1.ListCount - 1, 5) = sh.Cells(i, 6)
If .ListCount - 1 = 1 Then
.List(ListBox1.ListCount - 1, 6) = .List(ListBox1.ListCount - 1, 3) - .List(ListBox1.ListCount - 1, 4)
Else
.List(ListBox1.ListCount - 1, 6) = .List(ListBox1.ListCount - 1, 3) - .List(ListBox1.ListCount - 1, 4) + .List(ListBox1.ListCount - 2, 6)
End If
End With
End If
Next x
Next i
End Sub


 
 
  ترصيد من خلال البحث.xlsm   تحميل xlsm مرات التحميل :(6)
الحجم :(24.534) KB


أثارت هذه المشاركة إعجاب: YasserKhalil، hassona229، حبيبتى دائما، حسين مامون، ashraf_hertlion،



look/images/icons/i1.gif مشكلة فى ملف بحث بالليست بوكس
  13-11-2021 01:40 صباحاً   [6]
معلومات الكاتب ▼
تاريخ الإنضمام : 19-07-2019
رقم العضوية : 13887
المشاركات : 93
الجنس :
تاريخ الميلاد : 5-3-1984
قوة السمعة : 76
الاعجاب : 0
اكثر من اكثر من رااااااااااااااااااااااائع
والف الف شكر لك اخى الكريم
ولاستاذى حسين مامون جزاااكم الله عنا كل خير

أثارت هذه المشاركة إعجاب: YasserKhalil، حسين مامون،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
تعديل في كود البحث واظهار عدد7 اعمده بالليست بوكس بدل 3 ابونورا
1 956 ابونورا
البحث عن البيانات بالكومبوبوكس والتاريخ واظهار النتائج بالليست المبتدأ
0 580 المبتدأ
تعديل على كود بحث بالليست بوكس Dreamier
2 1161 Dreamier
فورم اظهار البيانات المسجلة بالليست بوكس والبحث عنها فيديو 8 مجدى يونس
4 1676 مجدى يونس
فورم بحث وعد الكلمات الموجودة بالليست لتجميع اعمالى مجدى يونس
5 1411 مجدى يونس

الكلمات الدلالية
بوكس ، مشكلة ، بالليست ،








اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 03:50 PM.