اذهب الي المحتوي
أوفيسنا

kh_yh

02 الأعضاء
  • Posts

    55
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو kh_yh

  1. صديقي اشكرك على حلك المقترح ولكن انا اريد ان احتفظ بالتصميم الخاص بي
  2. مساء الخير جميعا وعام سعيد ان شاء الله في المرفق كود ترحيل بيانات احتاج الى تعديل الكود بحيث لو قام نفس العميل بتركيف اكثر من جهاز في نفس التاريخ يقوم بترحيل مجموع الاجهزة في صفحة الحركة بحيث لو قام العميل بتركيب 3 اجهزة في 01/01/2019 يتم ادخال الاجهزة بشكل مفرد في صفحة الادخال ولكن يقوم بترحيل الى صفحة الحركة بتاريخ 01/01/2019 3 اجهزة ترحيل.xlsm
  3. مساء الخير جميعا وجمعة مباركة محتاج كود يقوم بترحيل كل عملية الى ورقة الشهر الخاص بها في حالة كانت العملية اضافة اما اذا كانت العملية فك فيقوم بنقل اسم العميل والتاريخ والعدد ورقم الجهاز الى صفحة الفك فقط ترحيل حسب الشهر.xlsx
  4. تحياتي جميعا الملف المرفق كود ارشفة ملفات للاستاذ طلعت محمد احتاج الى كود يقوم بوضع كلمة طباعة بجانب كل ملف بحيث يقوم بطباعة الملف دون فتحه بمعنى لو قمة بارشفة عقد باسم خالد اقوم بطباعة هذا العقد من خلال كلمة طباعة مباشرة دون فتحه وقبل الطباعة يقوم باظهار رسالة لتاكيد عملية الطباعة او الغاؤها لتجنب الطباعة العشوائية مع كتابة اسم العقد المراد طباعتة مثل (هل تريد طباعة عقد خالد) واسم الملف يكون بالعمود A كود نسخ مسار ملف.xlsm
  5. صديقي شكرا كثير على الحلول ولكن بدي الدمج يصير على نفس العمود ولكن انا حطيت عمودين للتوضيح فقط يعني الحل يكون في العمود b
  6. تحية طيبة في الملف المرفق مجموعة من اسماء الشكات داخل خلايا قمت بعمل دمج لها وفي العامود الثاني اسماء اعضاء مجلس الادارة احتاج الى كود يقوم بدمج الخلايا التي تحتوي على اسماء مجلس الادارة بما يتناسب مع خلية اسم الشركة وفي الملف موضح النتيجة المرجوة ولا يشترط ان يكون اعضاء مجلس الادارة ثلاث فقط فممكن اكثر او اقل دمج الخلايا.xlsx
  7. شكرا الك ما قصرت معاي هاليومين الله يجزيك الخييير
  8. طيب انا جربت بالكود بس ما اشتغل معي ممكن كودها
  9. انا بفرض اني رحلت وعملت حسباتي وثاني يوم عدلت فاتورة كيف رح يتعدل الرصيد انا اتوقع لو بالاضافة لكودك الرئيسي نعمل كود خاص بشيت 2 يعمل اعادت ترصيد يستعمل فقط في حالة التعديل
  10. حاولة اعمل الكود التالي لاعادة الترصيد بعد التعديل بس ما زبط معي شو السبب Sub KH() Dim LR3 As Integer LR3 = Sheet2.Cells(Rows.Count, 1).End(xlUp).Row Sheet2.Range("G2:G" & LR3).FormulaR1C1 = "=SUMIF(R2C2:RC[-5],RC[-5],R2C5:RC[-2])+SUMIF(R2C2:RC[-5],RC[-5],R2C6:RC[-1])" Sheet2.Calculate Sheet2.Range("G2:G" & LR3) = Sheet2.Range("G2:G" & LR3) End Sub
  11. صديقي بس انتا ليش شلت كود الاستعلام عن كشف الحساب صديقي اولا انا بدي اشكرك انتا ما قصرت عندي نقطة انا كنت ضايف الكود الي بالصفحة عشان اذا حدث تعديل بعد ترحيل البيانات يتعدل الرصيد اما بكودك هاد يظهر الرصيد ولكن بهذا الشكل لا يتم التعديل
  12. صديقي انا اكتشفت سبب المشكلة وهو انه يقوم بنقل الخلية الفارغة من شيت واحد حيث انه بعد وضع قيمة الرصيد يقوم بنقل الخلية الفارغة فيختفي هذا الرصيد هل لها حل ؟؟؟
×
×
  • اضف...

Important Information