اكسل vbaالبحث بين تاريخين من خلال اليوزرفورم userform واظهار النتائج فى listbox

Поделиться
HTML-код
  • Опубликовано: 15 дек 2024
  • لتحميل ملف العمل www.file-uploa...
    درس جديد وكود جديد من اكواد اكسل vbaا وهو كيفية البحث عن الييانات بين تاريخين من خلال اليوزرفورم واطهار نتائج البحث فى الليست بوكس list box
    وكيفية عمل التقارير فى الاكسل على userform اكسل vbaا
    اكسل vbaالبحث بين تاريخين من خلال اليوزرفورم userform واظهار النتائج فى listbox
    ج1 استعلام بين تاريخين استعلام عن بيانات شخص بين تاريخين اكسل vba
    طلب كود البحث بين تاريخين vba
    طريقة البحث عن بيانات بين تاريخين
    ج90 المصفوفات array بحث بين تاريخين
    اكسل vba برامج تطبيقات
    استدعاء بيانات بين تاريخين لصنف معين ؟
    البحث عن كلمة او رقم في ملف الاكسل بالكامل وليس صفحة معينة
    البحث في الاكسل 1 من 3
    البحث والإستبدال في اكسل 2007
    توضح هذه المقالة كيفية البحث عن بيانات في جدول أو نطاق من الخلايا باستخدام العديد من الدوال المضمنة في Microsoft Excel.
    ماهي افضل طريق للبحث في قوائم تم عملها علي الاكسل
    كيفية استخدام دالة VLOOKUP و HLOOKUP
    ادعمنا بـ
    أعجبني like
    تعليق comment
    مشاركة share
    للمزيد من الدروس زورو موقعنا / اتعلم مجانا دوت نت
    تعليم الاكسل للمبتدئين مع عماد غازى , تعليم vba للمبتدئين, تعليم مايكروسوفت اوفيس واكسيل 2010
    تعلم الاكسل خطوة خطوة فيس بوك goo.gl/14yS3z
    عماد غازى الفورم
    vba
    excel vba
    vba excel programming
    vba excel advanced
    vba excel beginner
    برامج مخازن
    برامج مخازن جاهزة مجانية

Комментарии • 65

  • @LoayAlghazali
    @LoayAlghazali 2 года назад

    فعلا استاذ بارك الله فيك ونفع فيك اسناذ بمعنى الكلمه

  • @mohammedelqassoumy230
    @mohammedelqassoumy230 Год назад +2

    السلام عليكم مشاء الله على كل مجهودك

    • @Emad_ghazi
      @Emad_ghazi  Год назад +1

      جزاك الله خيراً وبارك الله فيك اخي الكريم

  • @MohAboAbdo
    @MohAboAbdo 6 лет назад

    بارك الله فيك أستاذي الفاضل وجزاك الله كل خير

  • @mohammedelsayed3852
    @mohammedelsayed3852 6 лет назад

    زادك الله علما و نفع بك

  • @jaafaralabdaly3207
    @jaafaralabdaly3207 6 лет назад

    بارك الله بك استادي المبدع

  • @husseinali4446
    @husseinali4446 6 лет назад

    بارك الله فيك استاذ عماد

  • @اللهمصلِّعلىمحمد-ر9ك

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

  • @dr-hamodyahia8768
    @dr-hamodyahia8768 6 лет назад

    مشكور استاذ عماد
    ربنا يزيدك صحه انت واولادك.
    ياريت تجيب لنا فيديو توضح لنا فيه طريقه عمل سجل الديون .

  • @hhhh1120
    @hhhh1120 2 года назад

    جميل جدا

  • @MIDO.1980
    @MIDO.1980 8 месяцев назад +1

    مرحبا بدي اعرف شغلي انو لم عم يكون عندي اكتر من تاريخ متعدد لم يظهر لي اية عملية وكمان اذا كان رقم الواحد بشتغل معي على 11 او 12 يعني كل شي في رقم واحد ياريت تحلنا المشكلة

  • @MahmoudHassan-pu7el
    @MahmoudHassan-pu7el 4 месяца назад

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

  • @heshamallam5597
    @heshamallam5597 6 лет назад

    شكرا صديقى الجديد

  • @mohammedelqassoumy230
    @mohammedelqassoumy230 Год назад +1

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

  • @medkari
    @medkari 6 лет назад

    شكرا جزيلا

  • @a.l.s.a.k.r9051
    @a.l.s.a.k.r9051 5 лет назад

    ممتاز

  • @adilmajid06
    @adilmajid06 5 лет назад

    مبدع

  • @khalednegm4827
    @khalednegm4827 4 года назад

    م. عماد شكرا الشرح الرائع بس كنت عايز اعرف بعد البحث عايز اطبع الناتج كتقرير ويحسب إجمالي الناتج فقط وشكرا

  • @ismaildz3062
    @ismaildz3062 4 года назад

    شكرا استاذ عماد ارجوك استاذ كيف نبحث بين قيمتين واضهارها على listbox ارجوا منك الرد

  • @awadhbinamro948
    @awadhbinamro948 6 лет назад

    شكرا استاذ عماد...انا اريد اضيف عمود رابع في جدول البيانات بحيث ان البيانات تظهر في الليست فورم..كيف اغير في الكود

  • @omedzaxo3548
    @omedzaxo3548 4 года назад

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

    • @Emad_ghazi
      @Emad_ghazi  4 года назад

      تم عمل درس جديد اليوم خاص بطلب حضرتك
      ياريت تتفرجي عليه

    • @waleednemer6010
      @waleednemer6010 3 года назад

      في امكانيه تعم على أكثر من شيت
      في عندي عدت شيتات نفس الشي

  • @firas3023
    @firas3023 5 лет назад

    اذا حولنا البحث من تواريخ الى بحث بأسم شخص او رقم او اي شئ ............. شيكون تغير في الكود كيف يكو ذلك

  • @SherifElfaky7
    @SherifElfaky7 6 лет назад

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

  • @mohamedragab1960
    @mohamedragab1960 6 лет назад

    الاستاذ / عماد
    تحياتى على هذا الشرح الجميل ولكن لى سؤال بسيط
    ماذا تعنى ان listcount-1
    لسيادتكم جزيل الشكر

  • @awadhbinamro948
    @awadhbinamro948 6 лет назад

    شكرا اخ عماد جزاك الله خير..
    انا حملت ملف العمل لاكن اليوزر فورم مفقود يعني ماتنزل مع الشيت ....

  • @benhennisidahmed1318
    @benhennisidahmed1318 5 лет назад +1

    ممكن إضافة زر لترحيل ما تم فرزه الى ملف مستقل بذاته

  • @arifalqatanany
    @arifalqatanany Год назад

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

  • @AhmedSeif0
    @AhmedSeif0 6 лет назад

    هل الليست بوكس تقبل أكثر من 9 أعمدة ؟ وما هو الحد الاقصى لعدد الأعمدة لليست بوكس ؟

  • @عالمالأوفيس
    @عالمالأوفيس 6 лет назад

    ممكن بعد اذنك نعمل هذا النموذج في الاكسيس أرجو الافادة ... وشكراً لجهودك

  • @khaledsaleh8604
    @khaledsaleh8604 6 лет назад +2

    استاذ عماد لو بدي اطبق هاي الفكرة بكشف حساب كيف ممكن ادخل الحساب المدين والدائن ويستخرجلي الفرق بينهم

    • @canaanbrixton6712
      @canaanbrixton6712 3 года назад

      sorry to be off topic but does any of you know a method to get back into an Instagram account??
      I somehow forgot my login password. I would appreciate any help you can offer me

    • @leightonmarcellus9897
      @leightonmarcellus9897 3 года назад

      @Canaan Brixton instablaster =)

    • @canaanbrixton6712
      @canaanbrixton6712 3 года назад

      @Leighton Marcellus i really appreciate your reply. I found the site thru google and I'm trying it out now.
      Takes quite some time so I will reply here later when my account password hopefully is recovered.

    • @canaanbrixton6712
      @canaanbrixton6712 3 года назад

      @Leighton Marcellus It did the trick and I now got access to my account again. I am so happy!
      Thanks so much you saved my ass!

    • @leightonmarcellus9897
      @leightonmarcellus9897 3 года назад

      @Canaan Brixton glad I could help :)

  • @mohamedaladaash1967
    @mohamedaladaash1967 5 лет назад

    طيب لو عايز اضيف زر طباعه لمحتويات اللست بوكس اعملها ازاى

  • @doctoreid3969
    @doctoreid3969 5 лет назад +1

    السلام عليكم استاذ عماد جزاك الله خير وكل سنة وحصرتك طيب بحلول عام 2020ممكن اضافة كمبوبوكس اختار اسم المورد واختار التاريخ المحدد واعمل بحث يظهر ليا البيانات زي ماحضرتك عامل وإضافة تكست بوكس يظهر فيه الاجمالي المورد حسب الفترة المحدده وشكرا

  • @mohamedahmedta7
    @mohamedahmedta7 4 года назад

    هل ممكن نعمل نفس الفكره بس يكون البحث بيت تاريخين في صفحات اكثر

  • @alkiyumi8949
    @alkiyumi8949 11 месяцев назад

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

  • @ابوخباب-ف2د
    @ابوخباب-ف2د 5 лет назад

    هل يمكن طباعة نتائج البحث

  • @abdallahelbably4121
    @abdallahelbably4121 5 лет назад +1

    ممكن تليفون حضرتك يا بشمهندس

  • @Group.C2024
    @Group.C2024 4 года назад

    بارك الله بيك استاذ، لكن استاذ نفذت الكود ماينفذ ميشتغل ماهو السبب؟

  • @iqraapprenezlarabeautremen1459
    @iqraapprenezlarabeautremen1459 4 года назад +2

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

    • @Emad_ghazi
      @Emad_ghazi  4 года назад

      راجع اخر ٣ دروس فى القناة لسة منشورين هذة الايام هتلاقى الكلام دة

  • @احمدالمكي-ف7ث
    @احمدالمكي-ف7ث 3 года назад +1

    للاسف الملف عليه كلمة سر

  • @mohamedfraag3104
    @mohamedfraag3104 6 лет назад

    انا عملت نفس الملف ولكن يوجد عدد 12 عمود ولا يظهر غير 10 فقط

    • @localagent9501
      @localagent9501 3 года назад

      عندي نفس المشكله . انت لقيت حل ???

    • @mohammedelqassoumy230
      @mohammedelqassoumy230 Год назад

      السلام عليكم روح الى prospérités liste box تم columncount ورجعه 14 اولا 12

    • @mohammedelqassoumy230
      @mohammedelqassoumy230 Год назад

      حسب الأعمدة لي نت عوزها تظهر معاك في ليست بوكس بتاعك

  • @jeka-8912
    @jeka-8912 4 года назад

    الكود ده مش شغال يا استاذي ع فكره

  • @e3lamstan
    @e3lamstan 4 месяца назад

    الرابط محذوف

  • @haleemdcc600
    @haleemdcc600 5 лет назад +1

    معلش مش بيجيب اكثر من 9 اعمدة

  • @samerdhiaa8495
    @samerdhiaa8495 6 лет назад

    اين الطباعة ؟؟؟؟

  • @user-Salahalhag
    @user-Salahalhag 6 лет назад

    أرجو أن تقرأ أستاذ عماد أنا عملت كود تسجيل أسم المستخدم وكلمة المرور بس أريد منك أن تزيد على الكود أكثر من مستخدم وتعمل صلاحيات لكل مستخدم ولك جزيل الشكروهاهو الكود
    Private sub commandButton1_Click()
    If TextBox1.Value = "صلاح" And TextBox2.Value = "123" Then
    Unload Me
    Userform2.Show
    ElseIf TextBox1. Value = "صلاح" And TextBox2.Value = "123" Then
    X = Msgbox("أسم المستخدم وكلمة المرور خطأ",16,"تسجيل دخول")
    TextBox1.Value = ""
    TextBox2.Value = "" Label3.caption=label3.caption-1
    ElseIf TextBox1. Value = "صلاح" Then
    X = Msgbox( "أسم المستخدم خطأ",16,"تسجيل دخول")
    TextBox1.Value = "" Label3.caption=label3.caption-1
    'حيث هذا ال label3 في ال Userform1 مكتوب فيه 3 و label2 مكتوب فيه عدد المحاولات يعني لو الشرط متحقق يعطيلي رسالة الخطأ وينقص رقم من التايبل وإذا أستمرت المحاولات الخاطئة حتى صفر يقوم الكود بالخروج من البرنامج
    Else
    X = Msgbox(" كلمة المرور خطأ",16,"تسجيل دخول")
    TextBox2.Value = "" Label3.caption=label3.caption-1
    End If
    If Label3.caption = 0 Then
    application.Quit
    End If
    End sub

  • @gouadjliaboulefaa2829
    @gouadjliaboulefaa2829 4 года назад +1

    شكرا جزيلا

    • @Emad_ghazi
      @Emad_ghazi  4 года назад

      جزاك الله خيراً

  • @user-Salahalhag
    @user-Salahalhag 6 лет назад

    أرجو أن تقرأ أستاذ عماد أنا عملت كود تسجيل أسم المستخدم وكلمة المرور بس أريد منك أن تزيد على الكود أكثر من مستخدم وتعمل صلاحيات لكل مستخدم ولك جزيل الشكروهاهو الكود
    Private sub commandButton1_Click()
    If TextBox1.Value = "صلاح" And TextBox2.Value = "123" Then
    Unload Me
    Userform2.Show
    ElseIf TextBox1. Value = "صلاح" And TextBox2.Value = "123" Then
    X = Msgbox("أسم المستخدم وكلمة المرور خطأ",16,"تسجيل دخول")
    TextBox1.Value = ""
    TextBox2.Value = "" Label3.caption=label3.caption-1
    ElseIf TextBox1. Value = "صلاح" Then
    X = Msgbox( "أسم المستخدم خطأ",16,"تسجيل دخول")
    TextBox1.Value = "" Label3.caption=label3.caption-1
    'حيث هذا ال label3 في ال Userform1 مكتوب فيه 3 و label2 مكتوب فيه عدد المحاولات يعني لو الشرط متحقق يعطيلي رسالة الخطأ وينقص رقم من التايبل وإذا أستمرت المحاولات الخاطئة حتى صفر يقوم الكود بالخروج من البرنامج
    Else
    X = Msgbox(" كلمة المرور خطأ",16,"تسجيل دخول")
    TextBox2.Value = "" Label3.caption=label3.caption-1
    End If
    If Label3.caption = 0 Then
    application.Quit
    End If
    End sub

  • @user-Salahalhag
    @user-Salahalhag 6 лет назад

    أرجو أن تقرأ أستاذ عماد أنا عملت كود تسجيل أسم المستخدم وكلمة المرور بس أريد منك أن تزيد على الكود أكثر من مستخدم وتعمل صلاحيات لكل مستخدم ولك جزيل الشكروهاهو الكود
    Private sub commandButton1_Click()
    If TextBox1.Value = "صلاح" And TextBox2.Value = "123" Then
    Unload Me
    Userform2.Show
    ElseIf TextBox1. Value = "صلاح" And TextBox2.Value = "123" Then
    X = Msgbox("أسم المستخدم وكلمة المرور خطأ",16,"تسجيل دخول")
    TextBox1.Value = ""
    TextBox2.Value = "" Label3.caption=label3.caption-1
    ElseIf TextBox1. Value = "صلاح" Then
    X = Msgbox( "أسم المستخدم خطأ",16,"تسجيل دخول")
    TextBox1.Value = "" Label3.caption=label3.caption-1
    'حيث هذا ال label3 في ال Userform1 مكتوب فيه 3 و label2 مكتوب فيه عدد المحاولات يعني لو الشرط متحقق يعطيلي رسالة الخطأ وينقص رقم من التايبل وإذا أستمرت المحاولات الخاطئة حتى صفر يقوم الكود بالخروج من البرنامج
    Else
    X = Msgbox(" كلمة المرور خطأ",16,"تسجيل دخول")
    TextBox2.Value = "" Label3.caption=label3.caption-1
    End If
    If Label3.caption = 0 Then
    application.Quit
    End If
    End sub

  • @user-Salahalhag
    @user-Salahalhag 6 лет назад +2

    أرجو أن تقرأ أستاذ عماد أنا عملت كود تسجيل أسم المستخدم وكلمة المرور بس أريد منك أن تزيد على الكود أكثر من مستخدم وتعمل صلاحيات لكل مستخدم ولك جزيل الشكروهاهو الكود
    Private sub commandButton1_Click()
    If TextBox1.Value = "صلاح" And TextBox2.Value = "123" Then
    Unload Me
    Userform2.Show
    ElseIf TextBox1. Value = "صلاح" And TextBox2.Value = "123" Then
    X = Msgbox("أسم المستخدم وكلمة المرور خطأ",16,"تسجيل دخول")
    TextBox1.Value = ""
    TextBox2.Value = "" Label3.caption=label3.caption-1
    ElseIf TextBox1. Value = "صلاح" Then
    X = Msgbox( "أسم المستخدم خطأ",16,"تسجيل دخول")
    TextBox1.Value = "" Label3.caption=label3.caption-1
    'حيث هذا ال label3 في ال Userform1 مكتوب فيه 3 و label2 مكتوب فيه عدد المحاولات يعني لو الشرط متحقق يعطيلي رسالة الخطأ وينقص رقم من التايبل وإذا أستمرت المحاولات الخاطئة حتى صفر يقوم الكود بالخروج من البرنامج
    Else
    X = Msgbox(" كلمة المرور خطأ",16,"تسجيل دخول")
    TextBox2.Value = "" Label3.caption=label3.caption-1
    End If
    If Label3.caption = 0 Then
    application.Quit
    End If
    End sub

    • @user-Salahalhag
      @user-Salahalhag 6 лет назад

      @@روائعالاسلام-ن6ر يا أستاذي أنا مقدر ظروفك أتمنى أن يعينك الله في عملك يا قائد علماء الأمه