الفارس محمد رجب

قمت بتجربة برنامج kutools for excel --فيما يخص القائمة المنسدلة فكانت تظهر قائمة قابلة للبحث بجانب الخلية التى يتم تطبيق القائمة المنسدلة بها فهل من الممكن عمل هذه الفكرة من خلال الاكواد يعنى ان تظهر القائمة المنسدلة فى تكست بوكس قابل للبحث بجانب الخلية

لا اجد رد يكفى لشكر حضرتك ا/ Mohamed Hicham جزاك الله كل خير وجعله فى ميزان حسناتك

السلام عليكم -- اخوانى الأعزاء --مطلوب حود لنسخ sheet من ملف اكسيل الى ملف اكسيل اخر مغلق وعليه باسورد مرفق عدد 2 ملف اكسيل الملف الأول عبارة عن برنامج تسوية عهدة والثانى ملف تسويات العهد والباسورد الخاص به123 والمطلوب هو كود يقوم ب :عند عمل تسوية عهدة في ملف برنامج تسوية العهدة يقوم بنسخ صفحة تسوية العهدة الى ملف تسويات العهد تسويات العهد.xlsm بنامج تسوية العهدة.xlsm

شكرا لك ا / Ali Mohamed Ali وجعله الله فى ميزان حسناتك

السلام عليكم .. لابد من التحية عند بدء أى مشاركة ,,,مرفق شيت اكسيل به تموين سولار سيارات متعددة والمطلوب هو معادلة تقوم بايجاد اخر تموين سولار للسيارة المطلوب ..فمثلا لو طلبنا اخر تموين سولار للسيارة 7269 تقوم المعادلة بايجاد اخر تموين سولار لهذه السيارة تموين سولار.xlsb

اخى الكريم مهند محسن --اخى الكريم Mohamed Hicham جزاكم الله كل خير وشكرا لكم

السلام عليكم -- وصباح الخير على الجميع عندى مشكلة انى كنت باعرف ازاى اظهر الاشرطة فى اوفس 2007 ولكن مش عارف ازاى اقوم باظهار الاشرطة فى اوفس 2016 يعنى شريط البافت تابل وشريط ادوات الرسم ,.... الخ والتى كانت يتم اظهارها فى اوفس 2007 ؤمن خلال قائمة view --ارجو الرد من ذو الخبرة

السلام عليكم جميعا --وصباح الخير على الجميع شكرا ا/ Mohamed Hicham شكرا / AbuuAhmed الاكواد تعمل بسرعة عن الملف الاصلى ولكن ينقص شئ واحد وهو ان عمود الجانب الدائن وهو عبارة عن المستحق للمورد =( قيمة المشتريات+ ضريبة القيمة المضافة- ضريبة الخصم) كان من المفترض ان تتم هذه العملية من خلال الكود والان الكود يقوم بحساب قيمة المشتريات وقيمة ضريبة القيمة المضافة وقيمة ضريبة الخصم ولا يحسب المستحق للمورد فى عمود الجانب الدائن السابق ذكره

الاستاذ :عبدالفتاح في بي اكسيل شكرا لرد حضرتك 1- انا مبتدئ فى الفيجول بيسك وهذا الكود هو ما استطعت كتابته فان كان فى تعديل يساعد فى تسريعه ارجو كتابته 2-ان مش فاهم معنى هذه العبارة (عتقد من خلال نظرة سريعة على الكود تحتاج الى تخصيص اخر صف به بيانات بينما انت تقوم بحلقة تكرارية لصفوف فارغة لذلك سيكون بطيء لصفوف لا فائدة منها)

انتبه من فضلك .. السلام عليكم ,, لابد من التحية عند بدء أى مشاركة ,,مرفق شيت اكسيل وقد قمت بعمل كود بدلا من المعادلات -- بمعنى ان معادلة قيمة المشتريات = الكمية * السعر ومعادلة ضريبة القيمة المضافة = قيمة المشتريات * نسبة الضريبة (14%) ومعادلة ضريبة الخصم =قيمة المشتريات * نسبة ضريبة الخصم فقمت بعمل كود بدلا م المعادلات وهذا هو الكود Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.ScreenUpdating = False Dim d As Variant Dim f As Variant Dim e As Integer e = d + f For d = 4 To 99 For f = 100 To 1000 Step 100 Cells(d, 1).Value = Val(Cells(d, 3).Value - Cells(d, 2).Value + Cells(d - 1, 1).Value) Cells(d, 12).Value = Val(Cells(d, 11).Value * Cells(d, 10).Value) Cells(d, 14).Value = Val(Cells(d, 13).Value * Cells(d, 10).Value) Cells(d, 10).Value = Val(Cells(d, 9).Value * Cells(d, 8).Value) Cells(d + f - 3, 1).Value = Val(Cells(d + f - 3, 3).Value - Cells(d + f - 3, 2).Value + Cells(d + f - 4, 1).Value) Cells(d + f - 3, 12).Value = Val(Cells(d + f - 3, 11).Value * Cells(d + f - 3, 10).Value) Cells(d + f - 3, 14).Value = Val(Cells(d + f - 3, 13).Value * Cells(d + f - 3, 10).Value) Cells(d + f - 3, 10).Value = Val(Cells(d + f - 3, 9).Value * Cells(d + f - 3, 8).Value) Next Next Application.ScreenUpdating = True End Sub ولكنه ثقيل جدا وبطيئى فهل من حل لجعل هذا الكود يعمل بشكل اسرع نموذج.xlsb

السلام عليكم - صباح الخير --شكرا لكم جميعا وجعله الله فى ميزان حسناتكم

السلام عليكم .. لابد من التحية عند بدء أى مشاركة ,,هل من الممكن اجبار المستخدم على تمكين الماكرو

لقد نجت والحمد لله واستطعت ان اكتب الكود ولكن فيى مشكلة وهى كيف اجعل الكومبو بوكس يعمل قائمة باسماء رؤؤس الاعمدة مرفق شيت الاكسيل وهل من الممكن ان يتم الاضافة والتعديل على الرغم من ان صفحة الاكسيل المراد الاضافة فيها تم اخفائها الحسابات .xlsb

حاولت فى كتابة الاكواد ولكن بدون نفع فما هو الخطا Private Sub CommandButton1_Click() Dim ddd As Range Set ddd = Rows(1).Find(ComboBox1, MatchCase:=True).Select ddd.Offset(Rows.Count, 0).End (xlDown) End Sub

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

مرفق ملف اكسيل به فورم والمطلوب كود للبحث داخل كل شيتتات ملف الاكسيل بحيث يتم تحديد الشيت المطلوب البحث فيها ثم يتم تحديد الكلمة المطلوب البحث عنها فى حانة ادخل البحث هنا مع اضافة اسماء رؤوس الاعمدة ايضاً هل من الممكن عند ظهور نتيجة البحث فى الفورم عند الضغط عليها يتم نقلى إلى الخلية الموجود بها الكلمة انتبه من فضلك ممنوع تكرار نفس المشاركات والا ستحذف جميع المشاركات بحث.xlsm19.86 kB · 6 downloads

اخى omar elhosseini هل ممكن ان تكون رؤس الاعمدة فى نتيجة البحث بحيث تكون نتيجة البحث عبارة عن رؤوس الاعمدة وتحتها نتيجة البحث وشكرا لك

مرفق ملف اكسيل به فورم والمطلوب كود للبحث داخل كل شيتتات ملف الاكسيل بحيث يتم تحديد الشيت المطلوب البحث فيها ثم يتم تحديد الكلمة المطلوب البحث عنها فى حانة ادخل البحث هنا بحث.xlsm

الف الف شكر وتقدير لك ا /tornado 3100

مرفق ملف اكسيل والمطلوب ان يتم كتابة تورايخ و وقت دخول المستخدم هذا الملف ---فى sheet2 بحيث تكون مرتبة من الاقدم الى الاحدث انتبه من فضلك فتم اعادة رفع الملف بإمتداد Xlsm ,,,طالما ان طلبك لا يمكن عمله الا بالأكواد تقرير البيع.xlsm

لا اجد رد يعبر عن مدى احترامى وشكرى لكل من اعضاء هذا المنتدى المحترم الذى تعلمت منه الكتير والكثير شكرا لك ا/ على محمد على

مرفق ملف اكسيل به زرار -- هل يوجد كود لفتح ملف بى دى اف من خلال الزرار الموجود فى ملف الاكسيل المرفق تــم بتعديل رفع الملف بإمتداد Xlsm وذلك تجنباً لإهدار وقت الأساتذة .. طالما تريد حل طلبك بالأكواد اوراق الشركة.xlsm

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

انا عاوز كود تكسيل يحمى ورقة فى ملف اكسيل بباسورد اسمها بيانات العمال واعمل زرار للكود وعاوز كود تانى يفك الحماية بنفس الباسورد واربطه بزرار

السلام عليكم أساتذتى الكرام رجاءاً مساعدتى فى الأتى : انا تمت ترقيتى الى رئيس حسابات فى احدى الشركات وعندى شيت اكسيل به كل البيانات والداتا الخاصة بحسابات الشركة واريد ان احول هذا الشيت الى وضعية الشير فقمت بتحويل الشيت الى وضعية الشير من خلال قائمة review واريد ان اجعل لكل محاسب صفحات خاصة به فى هذا الشيت بحيث لا يرى اى من محاسب الا الصفحات الخاصة به فهل ممكن ان يحدث هذا فى وضعية الشير ؟ وما هى الطريقة؟ عنوان مخالف تــم تعديل عنوان المشاركة ليعبر عن طلبك