إبراهيم ابوليله

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

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

اخى عيسى فقط استبدل السطر الاتى ListBox1.List(v, 7) = Q.Offset(0, 8).Value بالسطر التالى ListBox1.List(v, 7) = Format(Q.Offset(i, 8).Value, "#,##0.00") وذلك فى حدث Private Sub ComboBox4_Change() تقبل تحياتى

السلام عليكم ورحمة الله وبركاته ارجو المساعده فى كود الترحيل المطلوب بداخل المرفق المساعده فى كود ترحيل.rar

اخى الكريم قم برفع مشاركتك فى منتدى الاكسيس

اخى طاهر جائتنى فكره احاول تنفيذها وفى القريب ان شاء الله سوف يتم تنفيذها ولن نحتاج الى ادخال 22 سطر بالكامل اخى طاهر السلام عليكم ورحمه الله وبركاته جرب المرفق وابلغنى نموذج فاتوره بدون فورم_2.rar

اخى عيسى اتمنى لك التوفيق

اخى عيسى اولا يجب عليك رفع ملفك من اجل التبسيط والتيسير على من يريد مساعدتك وشكرا

اخى واستاذنا عبدالله بارك الله فيك موضوع جيد جدا وصبر جميل منك نسأل الله ان يزيدك من فضله وعلمه ويديم عليك الصحه والعافيه وكل عام وانت بخير -------------------------------------- واذا امكن شرح .Tag = .Value .Value = Evaluate(CStr(.Value)) تحياتى لك

اخى واستاذنا عبدالله السلام عليكم ورحمه الله وبركاته ----------------------------------- نفترض اننى قمت بكتابة المعادله الاتيه فى التيكست =5*2 اريد الاتى 1-بعد الخروج من التيكست تصبح قيمه التيكست 10 وهذا المطلوب قد تفضلت انت بعمله 2-اريد بعد الخروج من التيكست وعند الرجوع اليها مره اخرى والضغط دبل كليك داخل التيكست ارى المعادله التى تم ادخالها من قبل =2*5 اى كما يحدث مع الخلايا فى الاكسيل هل يمكن عمل المطلوب الثانى

اخى عيسى جرب الكود الاتى TextBox5 = Me.ListBox1.ListCount

اخى واستاذنا عبدلله اشكرك على صعة صدرك بارك الله فيك ولكن باقى تحقق المطلوب الثانى وهو بحيث عند الضغط على الخليه مرتين تظهر القيمه بداخلها (اى تظهر المعادله) مثلا لو ان قيمة الخليه 10 عند الضغط مرتين تظهر =2*5 اى كما تم ادخالها فى التيكست وقبل ان تتحول الى رقم

اخي ابراهيم ابو ليله الكود يضهر لي السطر الاخير ولا يجمع العمود اشكرك على تجاوبك اخى عيسى بالفعل كان هناك خطأ فى الكود تم التعديل اعد النظر فى المشاركه

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

اخى عيسى جرب الكود الاتى For h = 0 To ListBox1.ListCount - 1 TextBox4 = VAL(TextBox4)+Val(ListBox1.Column(4,h)) Next

اخى الريفى ممكن توضيح اكتر القائمه المنسدله التى تريدها اين بكون موقعها فى اى خليه ستكون وما هى فائدتها

اخى الريفى السلام عليكم ورحمة الله وبركاته مبدأيا هل تقصد هكذا Copy of مقاولات.rar

اخى واستاذنا عبدالله اشكرك على سعة صدرك وهذا ماتعودناه من اساتذتنا فى هذا المنتدى ولكن هل يمكن تفعيل الزر لادخال قيمة التيكست الى الشيت مثلا فى الخليه a1 بحيث عند الضغط على الخليه مرتين تظهر القيمه بداخلها (اى تظهر المعادله) مثلا لو ان قيمة الخليه 10 عند الضغط مرتين تظهر =2*5 اى كما تم ادخالها فى التيكست وقبل ان تتحول الى رقم

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

اخى احمد بالتوفيق ان شاء الله وكل عام وانت بخير

اخى يسرى فى امان الله

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

اخى يسرى السلام عليكم ورحمه الله وبركاته تفضل اخى تم عمل المطلوب جرب المرفق فاتورة بالاكسل-.rar

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

السلام عليكم ورحمة الله وبركاته الاخوه الافاضل كل عام وانتم بخير اريد عند الكتابه فى التيكست تكود الكتابه بهذا الشكل =5*2 ثم عند الخروج من التيكست يصبح الناتج 10 هل يمكن عمل ذلك