أبوحازم

أظن أن الامر صعب أو كيف

للرفع يا إخوان

للرفع

للرفع

السلام عليكم ورحمة الله وبركاتة هذا المصنف أريد به أستدعاء التاريخ من الورقة5 على موجب أسم والبحث في عدة أعمدة عند كتابة اسم في الخلية B2 في الورقة2 يجلب التاريخ الذي يساويه على صفه من الورقة5 والمصنف يوضح أكثر . اعمدة الاسماء هي C;K;M;O في الورقة5 إستدعاء التاريخ.rar

شكرا جزيلا جدا

للرفع

لو تكرمتم أريد بهذا المصنف الفتح على الواجهه ولو تم الحفظ في ورقة أخرى والمرفق أدنا الفتح على الواجهه ولو تم الحفظ في ورقة أخرى.rar

ياسلام

حلو

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

حلوا جدا يا مدير هل يمكنني أجعله يرحل الى ورقة3 وورقة4 وأكثر أيضا وكيف وجزالك الله ألف خير يامدير

نعم عند الضغط على الزر مرتين يتكرر ترحيل البيانات مرتين كيف العمل هذا أولا

للرفع

كل الاراء مفهومة على الصفحة ولكن نريد العمل يا إخوان أرجو عمل نسخ للورقة رقم1 وجعلها للإدخال والترحيل وإضافة عمود آخر للأسم وشكر

‏ للرفع

أرجو عمل ترحيل الخلايا الملونه الى حساب العميل الذي في الورقة 2 في نفس اللون مع إبقاء البيانات في الجداول hhhh.rar

شكرا جزيلا جد يا مشرف

ان كنت متأكد أنه به فيروس (ملغّم ) سوف ارفعه من جديد وعفوا أن اخطأت او قلت شئ خطأ مني وشكرا جزيلا جدا البحث عن الرقم او الرصيد1.rar

للرفع

كيف ملغّم يا الفاضل بين لي والمثل يقول ( كل الدعاوى ما لم تقم عليها البينات أبناؤها أدعياءُ )

السلام عليكم أولاً كل الشكر لإصحاب المنتدى الافاضل : هذا ملف اريد به البحث عن الارصدة والارقام بالتكست بكست كما هو مرسوم وأن أمكن البحث بالنصوص المرفق يوضح اكثر وشكرا البحث عن الرقم او الرصيد.rar

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

نعم هذا هو المطلوب بس أن أرت الكتابة في عمود آخر كيف أغير في الكود Private Sub Worksheet_selectionChange(ByVal Target As Range) ''''''''''''''''''''''''''''''''''''''''''''''''' On Error GoTo 1 If Selection.Count > 1 Or Selection.Column <> 3 Or _ Selection.Offset(-1, 0).Value = "" Then Exit Sub Set myrange = Selection.Offset(-1, -2).Resize(1, 8) With myrange.Borders .LineStyle = xlDouble .Color = 682978 End With 1: End Sub ''''''''''''''''''''

لم يعمل عندما كتبت في العمود c المفروض يطلع الجدول تلقائي بمجرد الكتابة في العمود c ياريت تعملوا المطلوب وشكرا والمرفق أدناه Book1.rar