طارق محمود

السلام عليكم رائع أخي الحبيب / أحمد جزاك الله خيرا أنتظر التطوير كما وعدت

السلام عليكم اخي الحبيب محمود رائعة أخري في تطويع المعادلات تضاف لرصيدك الممتليء عندي جزاك الله خيرا

أرجو أن يكون المرفق هو ماتريد المرفقين نفس المحتوي غير أني غيرت حجم الصورة في الشيت الأول لتقليل حجم الملف في أحدهما ayman2.rar ayman2.rar

السلام عليكم أخي العزيز العنوان مخالف ، لذلك لايساعدك أحد إقرأ تعليمات المنتدي سأغير إسم الموضوع أولا

وهذا الحل بالأكواد تفضل ترصيد ذمم متشابهة3.rar

السلام عليكم تفضل الحل بالمعادلات ترصيد ذمم متشابهة2.rar

السلام عليكم الأخت الفاضلة بالمرفق لابد أن تراجعي أو تعدلي الكود ليتمكن من تعيين آخر صف بدقة في السطر من الكود mpRow = [A9999].End(xlUp).Row الجزئية [A9999] افترضت فيها أن العمود A لابد أن يكون به بيانات عند كل بيان مسلسل وفي نفس الوقت ليس بهذا العمود A بيانات بالسطر الأخير الأصفر حيث أنني فهمت أن السطر الأخير الأصفر سيكون به بعض بيانات (وليس كل أعمدته - مثل كلمة إجمالي أو..) إذا كان لديك أي بيان في العمود A من السطر الأخير الأصفر فلتختاري عمودا آخر ليس به بيانات بالسطر الأخير الأصفر ولكن به بيانات في باقي الأسطر التي تعلوه مثلا لو العمود A مشغول ولكن E خالي فلتعدلي ذاك السطر ليكون mpRow = [E9999].End(xlUp).Row وإن كان كل أعمدة السطر الأخير الأصفر مشغولة (بها بيانات) فلتعدلي هذا السطر من الكود ليكون mpRow = [A9999].End(xlUp).Row-1 تفضلي المرفق اضافة صف اوتوماتيك3.rar

أخي الحبيب / دغيدي لم أر مشاركتك إلا بعدما أرسلت أخي / الصديق أنا فهمت أن المشكلة تتعلق بعدد من الشيتات لذلك ، فالكود الذي أرسلته لك سابقا يغير جميع ورقات الملف بالطريقة التي تريدها فإذا كنت مثلا لاتريد تغيير الشيت الأول فلتبدأ الحلقة من 2 أي For i = 2 To Sheets.Count مرفق الملف به الكود تغيير2.zip

السلام عليكم أخي العزيز جرب الكود التالي Sub SH_names() On Error Resume Next For i = 1 To Sheets.Count With Sheets(i) .Name = .[B2] & "-" & .[D2] & "-" & .[B3] End With Next End Sub

السلام عليكم الصيغة هي INDIRECT("ahmed!$e$"&Q2+1&":$e$81") أو INDIRECT("ahmed!e"&Q2+1&":e81") أو INDIRECT("ahmed!E"&Q2+1&":E81")

أخي الحبيب / محمود لاأستطيع ان أرد علي كلماتك الرقيقة ومرورك العطر سوي بجزاك الله كل الخير وليجعلني الله عند حسن ظنكم

السلام عليكم أخواي العزيزان تستخدم الدالة INDIRECT عندما تحتاج (مثل هذه الحالة) تحتاج إلي أن يكون المجال في المعادلات المنسوخة متغير قبل أن أشرح هذه الدالة = INDIRECT("$e$"&M3+1&":$e$81") فلنأخذ هذا المثال إذا كانت الخلية M3 بها الرقم 8 مثلا فإن : INDIRECT("A"&M3) تعني A8 وطبعا لابد ان يكون موضعها في المعادلة موضع مجال فإذا كانت الخلية A8 مثلا تحتوي علي 10 فإن المعادلة = INDIRECT("A"&M3)/2 ستأتي بالرقم 5 كنتيجة لحاصل قسمة 10 أو (A8) علي 2 وطبعا في هذه الحالة "A" مع "$A$" مع "$A" ، أي أن علامة الدولار لن تثبت العناوين لأنها ثابتة بالفعل نرجع للدالة = INDIRECT("$e$"&M3+1&":$e$81") وبعد تلك الملاحظة الأخيرة "علامة الدولار لن تثبت العناوين لأنها ثابتة بالفعل" فيمكننا استبدالها بالتالي = INDIRECT("E"&M3+1&":E81") فإذا كانت الخلية M3 بها الرقم 2 كما بالمثال أي = INDIRECT("E"&2+1&":E81") أي = INDIRECT("E"&3&":E81") = INDIRECT("E3:E81") = E3:E81 وعلي ذلك تكون المعادلة الرئيسية =MATCH($H$2,INDIRECT("E"&M3+1&":E81"),0)+M3 هي =MATCH($H$2, E3:E81,0)+M3 ويتغير الرقم 3 في المعامل E3 كلما نسخت للأسفل

السلام عليكم أخي العزيز أضفت لك عمودين العمود الأول (التكرار) ، يحسب بالمعادلات عدد مرات تكرار هذا الكود في العمود A العمود الثاني (السطر التالي) ، وفيه خاصيتين >>>>> الخاصية الأولي : يحسب بالمعادلات السطر التالي الذي به هذا الكود >>>>> الخاصية الثانية : يذهب (بالاكواد) إلي السطر التالي الذي به هذا الكود تفضل المرفق Data2_2003_2007.rar

السلام عليكم أخي العزيز تفضل المرفق إن شاء الله ، هو ماتريد اليومية2.rar

السلام عليكم "انا عملت خانة اخرى فى نفس الفورم باللون الابيض انا عملت خانة اخرى فى نفس الفورم باللون اللبني" أي لون مايهمكش إذهب للموضوع وستجد الرد إن شاء الله

السلام عليكم أخي الحبيب / عبد الله المجرب أخي الحبيب / مهندس / جمال دغيدي أخي الحبيب / أحمد فضيله ألف ألف ألف مبروك وإلي الأمام دائما طبعا تستحقون ذلك بجدارة وننتظر منكم المزيد أخي الحبيب / محمد طاهر جزاك الله خيرا نعم ثلاثتهم ، ماشاء الله يبذلون جهدا زائدا ، جعله الله في موازين حسناتكم أجمعين

السلام عليكم أخي العزيز في المثال الذي نستخدمه ، إجمالي عدد الطلاب 390 لابد ان توزعهم أولا كم في الدفعة الأولي وكم في الدفعة الثانية وكم في الدفعة الثالثة

وردا علي سؤالك الثاني نعم يمكن جعل كل مستخدم يرى صفحات معينة فقط وذلك بطريقتين قبل عملية المشاركة (share) يمكنك عمل حماية للصفحات بأرقام سرية وتعطي كل مستخدم الرقم الخاص به بالأكواد فيمايلي مايمكنك عمله ومالايمكنك عمله (كمستخدم) علي الملف الذي تمت عمل المشاركة (share) له هذه التعليمات بالإنجليزية من صفحات المساعدة help في 2010 ولكنك ستفهمها إن شاء الله

السلام عليكم أهلا ومرحبا بك أخي العزيز بين إخوانك ردا علي سؤالك ، نعم يمكن في الإكسل مشاركة الملف بين اكثر من مستخدم علي الشبكة في أوفيس 2010 من قائمة Review ثم Changes group ثم Share Workbook في أوفيس 2003 من قائمة Tools ثم Share Workbook أنظر الصورة المرفقة و هل يمكن جعل كل مستخدم يرى صفحات معينة فقط ؟؟

السلام عليكم أخي العزيز مرفق ملف : أرجو أن يكون هو ماتريد كل ماعليك تغيير رقم الحساب في الخلية C2 عن طريق السهم وستقوم المعادلات بالباقي تفضل المرفق مفردات المرتب2.rar

السلام عليكم هذه الرسالة من تضبيط الإكسل في جهازك من القائمة الرئيسية Excel Options إختر Trust Center ثم Trust Center Settings ثم Macro Settings ثم Enable all macros (not recommended ..

السلام عليكم أخي العزيز مرفق ملف به حل لمشكلتك الأخيرة "خانة فى نفس الفورم باللون اللبنى" تفضل المرفق حسابات بحث فقط2.rar

"والعمود F تحويل الارقام الغير موجود في العمود A غير كامل الي نهايتة او على الاقل 4000 من المعادلات" يمكنك نسخ المعادلات للأسفل إلي الحد الذي تريده

" العمود D غير كلمل الي نهايتة او على الاقل 9000 من المعادلات لانة يحتوي على ارقام كثيرة" حسب فهمي فهذا العمود يتم ملؤه يدويا إذا لم يكن كذلك ، أعطيني المعادلة أو العلاقة التي تنتج هذا العمود

السلام عليكم أخي العزيز عدلت لك قليلا في طريقة الإدخال ولكن النتيجة أن الكود سيقسم لك الفصل والأرقام وضع أي عدد من الفصول ثم عليك فقط تقسيمها من حيث عدد المقاعد بالصف وعدد الصفوف (في العمودين الأصفرين ) أما بالنسبة لموضوع (مقعد مليء و مقعدين خاليين) تغيير الكود فقط في رقم خطوة العمود من 2 إلي 3 تفضل المرفقات التوزيع العشوائي لارقام في جدول اكسل_مقعد مليء و مقعدين خاليين.rar التوزيع العشوائي لارقام في جدول اكسل.rar