so00os

السلام عليكم ورحمه الله وبركاته لو سمحتوا يا أخوة ممكن التعديل على هذا الكود بدون TEXT BOX تكون بفلتر الأكسيل العادي عند الخلية (H2) الفقرة التى باللون الأخضر PASS : 1122 ولكم جزيل الشكر Private Sub TextBox2_Change() If TextBox2 = "" Then AutoFilterMode = False Else Range("H1").AutoFilter , field:=8, Criteria1:=TextBox2.Text 'Right(TextBox2.Text, Len(TextBox2.Text)) & "*" Dim X X = Application.Match(Val(TextBox2), ورقة3.Columns(4), 0) If Not IsError(X) Then With ورقة3.Cells(X, "B") .Value = ورقة1.Cells(1, "I").Value .Interior.ColorIndex = 30 'From 1 to 56 لون الخلفيه .Font.ColorIndex = 20 'From 1 to 56 لون الخط End With End If End If End Sub MD.xlsm

بارك الله فيك أخي حسونة حسين وجزاك الله خيراً على هذا المجهود الطيب

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

الرجاء التعديل على هذا الكود

.....

شكرا لاهتمامك اخي الكريم كل ما أطلبه هو عند كتابة مثلا ( 123) بملف (2024) يتم ترحيل المبلغ إلي ملف ( الأرصدة ) عند رقم ( 123) دون تدخل مني باسوورد 1122 ولو احتجت توضيح اكثر من ذلك انا مع حضرتك ... https://www.mediafire.com/file/4x1sikl2syq99hv/Desktop.rar/file

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

السلام عليكم الموضوع هذا صار له أكثر من سنه وللأسف لا يوجد رد هل من حل يا أخوة

شكرا جزيلا ، الله يعطيك العافيه $ جزاك الله خيرا $

السلام عليكم إخواني أريد طريقة لنسخ الخلايا أو عند سحبها بدون ما تتغير المعادلة بداخلها وجزاكم الله خيرا مثال.xlsx

أرفقت ملف لتقريب الفكرة أكثر وبه شرح أوضح لمن أراد المشاركة 9.xlsx

السلام عليكم لو سمحتوا إخواني محتاج إن المعادلة أسحبها تكون متسلسلة بدون تدخل مني ='[مبالغ وارده شهر8-2023م.xlsx]ورقة1'!$H$38 ='[مبالغ وارده شهر9-2023م.xlsx]ورقة1'!$H$38 ='[مبالغ وارده شهر10-2023م.xlsx]ورقة1'!$H$38 9.xlsx

جزاء الله خيرا .. لكن الحل حضرتك عملته للصف وليس للعمود محتاج المعادلة تمشي ع العمود

السلام عليكم الرجاء تعديل المعادلة الملف بالمرفقات MD.xlsx

لو كتبت أرقام ثلاثية راح يظهر ثلاث خلايا ,, مثال ( 216 ) راح يظهر ( 2 ، 21 ، 216 ) متأكد من المعلومة

السلام عليكم لو سمحت عند البحث بخلية ( الرصيد ) وكتابة مثلاَ ( 123 ) يظهر معي أيضاَ بصفحة ( الأرصدة ) رقم ( 1 ، 12 ، 123 ) مع اني بحثت على رقم (123) فقط هل المعادلة تحتاج إلى تعديل ؟ أرسلت مرفق لتوضيح الأمر ، كلمة المرور 1122 شاكر لكم حسن تعاونكم MD.xlsm

العفو أخي .. الكود شغال ممتاز ما شاء الله جزاك الله خيراً ،،

السلام عليكم لو سمحتوا إخواني الكرام ,,, إذا في إمكانية عند الضغط على خلية " الرصيد H1 " وكتابة رقم "4" مثلاَ ، يتم ترحيل الرصيد الجديد "I1" إلي ملف " الأرصدة " عند رقم "4 خلية B7" مع العلم إن كل يوم يتم إدراج عمود جديد برصيد مختلف في ملف " الأرصدة" ارسلت مرفق لتوضيح الأمر ، كلمة المرور 1122 شاكر لكم حسن تعاونكم وأخص بالذكر أخي الأستاذ / حسونة حسين لمتابعته الموضوع السابق new.xlsm الأرصدة.xlsx

أخي الأستاذ / حسونة حسين أولا : جزاك الله خيراً على حُسن تعاونك واهتمامك ثانياّ : حضرتك ممكن تعدل فيها بحيث إن الخلية تكون بلون آخر بورقة "الأرصدة" . ** ولو في شيت آخر حابب الأرصدة تنتقل إليه إزاي حضرتك اعملها ** . وشاكر لك جهدك الطيب ..

أرسلت مرفق لتوضيح الأمر

السلام عليكم لو سمحتوا إخواني الكرام ,,, إذا في إمكانية عند الضغط على خلية " الرصيد H1 " وكتابة رقم "4" مثلاَ ، يتم ترحيل الرصيد الجديد "I1" إلي صفحة " الأرصدة " عند رقم "4 خلية B7" ارسلت مرفق لتوضيح الأمر ، كلمة المرور 1122 شاكر لكم حسن تعاونكم new.xlsm

أستاذ / محمد ،، بعد إذنك توضيح بخصوص المعادلتين في المعادلة الأولى إذا سند رقم (5) عند ( محمد ) مفقود راح يظهر ،، وإذا نفس رقم السند (5) عند ( مصطفي ) مفقود أيضاً راح يظهر . في المعادلة الثانية للأسف إذا نفس رقم السند عند ( محمد ) و ( مصطفي ) مفقود راح يظهر فقط مرة واحدة والمشكلة إن لكل شخص تسلسل لحاله وضحت ذلك بالمرفقات ... المصنف1 (1).xlsx

الله يعطيك العافية أخي الكريم أحسنت وشاكر لك حسن تعاونك

جزاك الله خيراً أستاذ / محمد لكن اذا فى سندين مفقودين أو ثلاث أو أربع خلف بعض ، ما يظهر إلا الأول منهم فقط ولا يظهر الثاني ولا الثالث ولا الرابع وهكذا وشكراً لإهتمامك المصنف1.xlsx

السلام عليكم ورحمه الله وبركاته إخواني لو سمحتوا هل في طريقة مبسّطه تبين لي السندات المفقودة ،، وشكراً جزيلاً أرسلت نموذج بالمرفقات كمثال المصنف1.xlsx