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

طارق محمود

أوفيسنا
  • Posts

    4,533
  • تاريخ الانضمام

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

  • Days Won

    42

كل منشورات العضو طارق محمود

  1. السلام عليكم أخي الحبيب أنت تستخدم أكواد الأستاذ الجليل / عبدالله باقشير كوبي بيست لم أفهم المتغير ah في الكود عموما طلبك اسهل من ذلك كثير أترك زر تفريغ الاسماء (كلير) واضغط الزر الأسود في المرفق 3333-2.rar
  2. السلام عليكم تفضل المرفق به كود صغير للإظهار في الصفحة Main Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address <> "$D$2" Then Exit Sub Sheets("Meedo").Visible = True Sheets("Meedo").Select End Sub Meedo.rar
  3. لاأدري ماذا تقصد بالفعل أنا جعلت لك البيانات العامة تكتب مرة واحدة في الصفوف العلوية وكل شهادة تأخذ نسخة (بالمعادلات) من هذه البيانات جرب تغير في بيانات الصفوف العلوية (لون فونطها أزرق) ستجد جميع الشهادات تتغير إن لم يكن ذلك شرح لما تريد فأرجو توضيح سؤالك
  4. السلام عليكم إخواني الأفاضل الأعزاء إبراهيم ابوليله جمال عبد السميع قنديل الصياد جزاكم الله خير الجزاء علي مروركم الطيب وكلماتكم العطرة جعلني الله عند حسن ظنكم
  5. السلام عليكم أخي العزيز أهلا ومرحبا بك بين إخوانك يعتمد الكود التالي علي عمل نسخة من ورقة النتائج وتغيير الخلية m2 في تلك النسخة لتساوي رقم التلميذ وبهذا يكون ورقة منفصلة لكل تلميذ ويمكنك تعديله للطباعة Sub Sh_Copy() With Sheets("الدورة 2") LR = .[A9999].End(xlUp).Row For i = 2 To LR SN = .Cells(i, 1) Sheets("النتائج").Copy After:=Sheets(Sheets.Count) ActiveSheet.Name = SN [M2] = SN Next End With End Sub تفضل المرفق وبه الكود النتائج1.rar
  6. السلام عليكم أخي العزيز / مستر عزازي تم تعريف المجال المسمي (النتيجة) كما شرحت لك من قبل حسب البيانات التي كانت متاحة الآن وقد زادت البيانات فلابد من أن يتسع مجال (النتيجة) ليشمل الصفوف الجديدة بالورقة الأولي ولعمل ذلك بسرعة فمجال النتيجة يشمل الصفوف من 11 إلي 39 وتريد توسيعه إلي الصف الأخير 94 إضغط Ctrl-F3 ستظهر لك قائمة بها الأسماء التي تم تعريفها بالملف ، ستجد "Print_Area" و "النتيجة" إضغط علي "النتيجة" فستجد أنها معرفة بالمجال التالي =الخامس!$B$11:$FN$39 غيرها يدويا إلي =الخامس!$B$11:$FN$94 ثم إضغط علامة الصح لحفظ التغيير في المجال
  7. لا ياأخي بل علي أوفيس 2003 يمكنك التجربة علي جهاز آخر
  8. السلام عليكم أخي العزيز ضع المعادلتين التاليتين في الخلايا C4 ، D4 علي الترتيب =SUMPRODUCT(--(E10:E51=C3)*(D10:D51=C5)) =SUMPRODUCT(--(E10:E51=D3)*(D10:D51=C5))
  9. السلام عليكم أخي العزيز / حمادة عمر جزاك الله خيرا وأشكرك علي المتابعة والمرور الكريم والكلمات العطرة أخي العزيز / مستر عزازي ظلل الصفين اللي انت ظبطهم (12,13) ، انسخهما ثم لصق للصفوف المماثلة 23،24 .. 23,35 ..... 45,46
  10. السلام عليكم أخي العزيز / عباس السماوي أخي العزيز / محمود رواس جزاكما الله خيرا علي المرور الكريم والكلمات العطرة أخي العزيز / مستر عزازي بغرض أن تتعلمها جيدا وتشارك معنا ، لابد أن تفهم الدالة VLOOKUP وتعدل فيها كما يناسبك ، ولعمل ذلك قف علي الخلية D13 في ورقة (شهادات) وإضغط F2 ستجد الدالة التالية =VLOOKUP(E9,النتيجة,15,0) وتتعرف علي مكوناتها فهي تجعل الإكسل يبحث عن E9 أي إسم الطالب في المجال المسمي (النتيجة) ثم يأتي بما يقابله في ذلك المجال ولكن بالعمود رقم 15 لمعرفة المجال المسمي (النتيجة) إضغط Ctrl-G ستظهر لك قائمة صغيرة بها الأسماء التي تم تعريفها بالملف ، وفي حالتنا هذه لن تجد غير "النتيجة" إضغط عليها فسيذهب بك الإكسل إلي ذلك المجال (بالورقة الأولي) ستجدني قد لونت الأعمدة التي إستخدمتها بالأصفر لتيسر عليك الوصول وستجد أرقام الأعمدة أعلي الجدول بالصف الخامس إستبدل الرقم 15 بما تريد وليكن لك تمرين وأخبرني النتيجة
  11. السلام عليكم أخي العزيز تم عمل التالي إقتراح لشكل الشهادة بالشيت الجديد (شهادات) نقل بيانات الفصل الأول باستخدام دالة Vlookup تنسيق عدد 4 شهادات للطباعة سويا إضافة زر لطباعة الصفحة فقط (4 شهادات) إضافة زر آخر لطباعة صفحة النتيجة كلها (كل 4 شهادات في ورقة) إضافة زر تحكم (سهمين) ليسمح لك بالتنقل بين الأسماء (أرقام الطلاب) تفضل المرفق شيتات الخامس 1محمد عيد.rar
  12. السلام عليكم بالإضافة للكود الرائع لأخي الغالي / أحمد عبد الناصر يوجد إختصار في الإكسل لهذه الحالة وهو Ctrl-d جرب تقف أسفل الخلية التي بها المعادلة وتضغط Ctrl-d أو طبعا Ctrl-D وحتي لو لوحة المفاتيح في مود اللغة العربية
  13. السلام عليكم أخي العزيز 1. دمجت الموضوعين 2. تفضل المرفق ترحيل اسماء الطلبة على ثمان مراحل2.rar
  14. السلام عليكم الأخت الفاضلة دمجت الموضوعين الأفضل إرسال ملف للعمل عليه
  15. السلام عليكم أخي العزيز يوجد موضوع مشابه بالرابط http://www.officena.net/ib/index.php?showtopic=32359&hl=%2B%D9%87%D8%A7%D9%84%D9%83+%2B%D8%A7%D9%84%D8%AD%D8%AF%D9%8A%D8%AF
  16. السلام عليكم أخي العزيز ، طبعا تعلم أنني أهتم ولكن طلباتك الأخيرة كانت كثيرة وفيما يلي بعض ماتم بالملف أولا: تم إضافة ورقة منفصلة للعملاء ثانيا: ورقة "المخزن" تم تعديل معادلة عمود صافى الكمية المتبقية وتعديل معادلة عمود اجمالى مبالغ الكمية المتبقية وتعديل معادلة الجمع بالخلية I6 ووضع تنسيق شرطي يلون أخضر أوتوماتيكيا عند آخر حركة علي الصنف ثالثا: ورقة "الفاتورة " تم إضافة جزء خاص برقم الفاتورة بالخلية I4 وتم منع الترحيل --------- (1) اذا لم يكن التاريخ موجود -------أو (2) اذا لم يكن إسم العميل موجود -------أو (3) اذا لم يكن رقم الفاتورة موجود وتم إضافة زر إستدعاء الفاتورة من بيانات المحل بناءا علي رقمها بإضافة فورم للأكواد رابعا: ورقة "المحل" تم إضافة جزء في الكود يرحل رقم الفاتورة تفضل المرفق صافى الكمية آخر تعديل3.zip
  17. وبهذا الرابط تجد البرنامج لو تريد تنزيله http://support.sas.com/rnd/app/download.html أما الكتاب فقد أنا نزلته ورفعته لك هنا تفضل المرفق www.kutub.info_9472.rar
  18. السلام عليكم أخي العزيز أنا لاأعلم عنه ولكن إبحث في جوجل علي "البرنامج الاحصائي SAS" ستجد كثيرا منها كتاب: تحليل البيانات بأستعمال البرنامج الاحصائي ساس تأليف: د.فراس رشاد السامرائي علي الرابط http://www.kutub.info/library/book/9472
  19. لعمل Test للكود الذي تقصده لاأعلم ولكن يمكنك فتح محرر الأكواد علي الكود المطلوب وتصغر نافذة محرر الأكواد ويكون أمامك علي الشاشة الملف الإكسل مفتوح في نافذة أخري ومن محرر الأكواد إضغط F8 سينفذ خطواة واحدة من الكود واستمر بضغط F8 مرة واحدة لكل أمر ستجد أن مؤشر ملف الإكسل ينفذ أوامر الكود واحد تلو الآخر وفي نفس الوقت يكون الأمر قيد التنفيذ باللون الأصفر في محرر الأكواد وبهذا يمكنك في كثير من الأحيان اكتشاف الخطأ
  20. وعليكم السلام أخي العزيز المصطلحات كلها معرفة لايوجد قاموس ولكن يوجد مواضيع بالمنتدي كثيرة للتعلم ولسرد هذه المصطلحات وتنسيقها فيما يشبه القاموس مثل هذا الموضوع http://www.officena.net/ib/index.php?showtopic=33308&hl= أو إبحث أخي في المنتدي عن تعليم فيجوال بيزيك ستجد كثير من المواضيع مثل http://www.officena....p?showtopic=206 أو http://www.officena....showtopic=32470 أو http://www.officena....showtopic=33308 أو http://www.officena....entry217747 أو http://www.officena....323&hl=دورة تحياتي وأتمني أراك معنا كثيرا إن شاء لله
  21. السلام عليكم لابأس أخي العزيز إرسل علي الخاص (الهوتميل الموجود بصفحتي)
  22. السلام عليكم بعد إذن أخي حمادة أعتقد أنه يقصد هذا بالمرفق ex-002.rar
×
×
  • اضف...

Important Information