m.hindawi

شكرا لكم جميعا وكل عام انتم بخير و

شكرا مرة اخرى لقد نسيت بالنسبة للاسماء المركبة واللتي بنها فواصل يمكن ان تحدد كل اسم يبدا بكلمة( عبد) لياخذ الكلمة التي بعدهاو يضيفها معها لتصبح الاسم

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

السلام عليكم ورحمة الله وبركاته كل عام وانتم بخير لدي مشكلة واريد الحل عندي قاعدة بيانات فيها جدولين الاول يحتوي على دليل هاتف فيه خانة الاسم وهو اسم ثلاثي كما في الجدول والخانة الثانية فيها رقم الهاتف المطلوب هل يمكن فصل الاسم الثلاثي الى الا سم واسم الاب و اسم العائلة ورقم الهاتف في الجول الثاني وذلك عن طريق استعلام او عن طريق كود لايهم ولكم الشكر db2.rar

بسم الله الرحمن الرحيم يمكن ذلك عن طريق اكواد بيسك كما في المرفق Book166.zip

النتيجة امامك اخي الكريم ولكنك لم تراها المدة= مبلغ القرض÷(القسط الشهري-(مبلغ القرض×الفائدة))

بسم الله الرحمن الرحيم لقد قمت باداج الدالة في الملف ولكن لفائدتك حاول كيفية ادراج الدوال والاكواد في الاكسل ابحث عن كلمة تفقيط في المنتدى وستجد ان هناك الكثير ممن تحدثوا عن الموضوع وهو بسيط L_1_.P.zip

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

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

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

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

بسم الله الرحمن الرحيم نعم يمكنك ذلك باستخدام الدالة countif اليك الملف معدل New_Microsoft_Excel_Worksheet.zip

بسم الله الرحمن الرحيم بعد ان تفتح شاشة محرر فيجوال بيسك من القائمة insert اختار module هذا هو الاجراء الان انسخ الكود الاول والصقة في الشاشة التي تظهر امامك الان انظر الى يسار الشاشة ستجد اسماء الاوراق في ملفك اذا لم تكن ظاهرة فهي موجودة تحت مجلد microsoft excel objects الان لوضع الكود الثاني في اوراق العمل على كل ورقة تريد تطبيق الكود عليها انقر نقرا مزدوجا بالماوس ستفتح شاشة فاغة الصق الكود الثاني فيها وكرر العملية لكل الاوراق التي تريد تطبيق الكود عليها

بسم الله الرحمن الرحيم الكود سهل ما عليك الا انشاء اجراء جديد ولصق الكود التالي بداخله Sub rowhid() Dim a As String a = ActiveSheet.Name Sheets(a).Cells.EntireRow.Hidden = False For b = 18 To 34 If Sheets(a).Cells(b, 9).Value < 1 Then Sheets(a).Rows(b).EntireRow.Hidden = True End If Next End Sub بعد ذلك تقوم بلصق الكود التاي في كل ورقة من اوراق العمل من الورقة المسماة 1 الى الورقة ذات الاسم 10 Private Sub Worksheet_Change(ByVal Target As Range) rowhid End Sub

بسم الله الرحمن الرحيم جرب التعديل التالي ولست بحاجة الى زر الامر فقط قمت بتغير الحدث من activate الى change ANT_001T.rar