checles

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

السلام عليكم برجاء المساعده عن استخدام كود البحث في Textbox بالارقام مثلا (800) اما اذا كان (800B) لا يقبل فبرجاء المساعده في تعديل الكود ()Private Sub TextBox4_Change X = WorksheetFunction.CountIf(Sheet8.Range("a:a"), Val(Me.TextBox4.Value)) Set ws = Application.WorksheetFunction With Me If .TextBox4.Value <> "" And X <> 0 Then .TextBox5 = Application.WorksheetFunction.VLookup(CLng(Me.TextBox4.Value), Sheet8.Range("a1:d10000"), 3, 0) .TextBox6 = Application.WorksheetFunction.VLookup(CLng(Me.TextBox4.Value), Sheet8.Range("a1:d10000"), 4, 0) Else .TextBox5 = "" .TextBox6 = "" End If End With End Sub Test 1.xlsm

اعرض الملف حماية الورقة السلام عليكم برجاء المساعدة في كود لو الخانات هذه بها بيانات يتم منع تغير فيها او مسحها لو الخانه ليس بيها بيانات يتم السماح بالدخال فيها صاحب الملف checles تمت الاضافه 15 ينا, 2024 الاقسام قسم الإكسيل  

اعرض الملف تظليل بشرط السلام عليكم برجاء المساعده محتاج لم العمود A يتكرار بنفس بيانات العمود B تمام لكن لم يتكرار بيانات تانيه يلوني لون احمر صاحب الملف checles تمت الاضافه 10 ماي, 2023 الاقسام قسم الإكسيل  

السلام عليكم برجاء المساعده محتاج لم العمود A يتكرار بنفس بيانات العمود B تمام لكن لم يتكرار بيانات تانيه يلوني لون احم test.xlsx

شكرا جزيلا استاذ حسونه😃

اعرض الملف جمع بشرط المتشابهات عايز مجموع العمود رقم 3 بس كل رقم خامه لوحده من العمود رقم 2 عايز مجموع العمود رقم 4 بس كل رخم خامه لوحده من العمود 2 و عايز عدد الصفف الي في عمود 1 بس من غير المتكرر وشكرا صاحب الملف checles تمت الاضافه 24 أبر, 2023 الاقسام قسم الإكسيل  

اعرض الملف ترحيل بيانات بشرط معين السلام عليكم برجاء المساعده في ترحيل البيانات من شيت في العمود E بايانات بعد النقل يمسح البايانات عند الترحيل مره اخر يرحل تحت السابق وشكرا صاحب الملف checles تمت الاضافه 19 مار, 2023 الاقسام قسم الإكسيل

شكرا جزيلا وجزاك الله خير الكود يعم بشكل ممتاز شكرا

ممكن يكون TEXT فارغ لا يوجد بيه ارقام عايز لم يكون TEXT فاضي ما يضربش TEXT الفارغ وايضا لما اضر مثلا 0.25*0.23*0.26 يضرب وشكرا

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

شكرا لحضرتك بس انا كنت عايزة من غير زر butten عايزة اتوماتيك اول ما اكتب الرقم يظهر النتيجه علي طول وشكرا

السلام عليكم برجاء المساعده في ضرب textbox1 * textbox2* textbox3 اظهار النتيجه في texbox 4

السلام عليكم برجاء المساعده لم التاريخ يساوي التاريخ والوقت = الوقت عايز اكبر قيمه تظهر في العمود E وشكرا saw.xlsx

اعرض الملف ترحيل من شيت الاكسيل الي يوزفورم برجاء المساعده في ترحيل من خانه معينه في شيت الاكسيل الي texbox معين وشكرا صاحب الملف checles تمت الاضافه 22 فبر, 2023 الاقسام قسم الإكسيل  

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

شكرا جداااا

شكراااا جدا جدا هذا هو المطلوب

المطلوب نقل انتهاء في الي شيت 2 مع العلم ان كود متكرر عايز ينقله بالتكرار معادله Vlookup بتجيب اول نتيجه بس وشكرا 2.xlsx

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

السلام عليكم كنت محتاج من الاستاذه الافاضل كود طباعه user form بالعرض وشكرا

السلام عليكم محتاج تعديل حيث يقبل ارقام وحرف وليس ارقام فقط Private Sub id_Change() x = WorksheetFunction.CountIf(Sheet1.Range("a:a"), Val(Me.id.Value)) Set ws = Application.WorksheetFunction With Me If .id.Value <> "" And x <> 0 Then .nam = Application.WorksheetFunction.VLookup(CLng(Me.id.Value), Sheet1.Range("lookup"), 2, 0) .adrss = ws.VLookup(CLng(Me.id.Value), Sheet1.Range("lookup"), 3, 0) .phone = ws.VLookup(CLng(Me.id.Value), Sheet1.Range("lookup"), 4, 0) .acc = ws.VLookup(CLng(Me.id.Value), Sheet1.Range("lookup"), 5, 0) Else .nam = "" .adrss = "" .phone = "" .acc = "" End If End With End Sub

السلام عليكم عندي عمود يحتوي علي اكثر من تاريخ عايز استخرج اخر تاريخ فيهم بالمعادلات او الاكواد وشكرا

السلام عليكم عندي عمود يحتوي علي اكثر من تاريخ عايز استخرج اخر تاريخ فيهم بالمعادلات او الاكواد وشكرا

السلام عليكم كانت عايز انتقل من اليوزفورم الي شيت معين ممكن الكود لو سمحتم