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

محمد الورفلي1

05 عضو ذهبي
  • Posts

    1,100
  • تاريخ الانضمام

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

كل منشورات العضو محمد الورفلي1

  1. ياريت توضحلنا اكثر ياستاذ عبد الله بارفاق الملف لنها معمول فيها الانتر مانفعتش معاي الانتر عند كتابة اسم اورقم والنقر علي الانتر بهذا الكود واكيد الخطاء عندى
  2. شكراً علي الرد السريع بارك الله فيك هل ممكن الاستجلاب عن طريق الاسم او رقم الحساب فرضن يا استاذ وليد فتحي
  3. الاستاذ الفاضل عبدالله باقشير بقالنسبة لزيادة الصفحات تم الحمد لله اولاً والشكر لك لتعليمي بطريقة غير مباشرة اما عن البحث ممتاز هي كذالك ولكن نريد من حضرتك عند النقر على انتر يكون الاسم الذي بحثنا عنه نشط ونبداء في عمل التغيرات علي الموظف وطلب اخر عند الحذف ياريت فورم تحذير مكتوب فية تأكيد الحذف (( حذف : عدم الحذف )) وشكراً بارك الله فيك وسامحنا اذ اثقلنا عليك فا انا منخجل منك جداً
  4. الاستاذ الفاضل عبدالله باقشير لي مشاركة بسيطة ياريت تعطيها اهتمامك اذا كانت في استطاعتك واعانك الله عليها وهي 1/ أضافة اكثر من صفحة طباعة لاني سوف استخدم الفورم بعد اذنك لو سمحت لي في مدرستي وسا اخصصه لاشئون المعلمين فا عند استدعاء اسم معلم والبحث علية تكون المعلومات حاضرة في الفورم ياريت اضافة مفاتيح او قائمة اختيار تكون فيها عناوين لصفحات موجودة ومعد علي اساس اختيار العنوان من القائمة مثلاً ( مباشرة او مغادرة معلم - إجازة معلم -- استبيان معلم وطبعن تكون الصيغة مطبوعة مسبقاً في ورقة الطباعة كلاً حسب طلب المعلم . 2/ ياريت تفعيل مفتاح انتر بعد اختيار البحث عن طريق الاسم او رقم القيد او... بحيث بعد كتابة اسم معلم فرضاً وضغط مفتاح انتر تبدا عملية البحث وليس باستخدام الفارة والذهاب الي مفتاح البحث يايت اكون وصلت الفكرة نسخ من فورم ادخال و تعديل مرن مع الطباعة 2.rar
  5. هديه جزء عم ارجو ان ينال اعجابكم هذا رابط لان الحجم كبير
  6. استاذ عبدالله باقشير ياريت علي اوفيس 2003 بارك الله فيك حتى نستفيد وتصبح لك صدق ان شاء الله
  7. شكراَ جزيلاً هذا هو الكود الذي تماشى معي فالخلية حتي يتم المسح لبد من ادخال صفر شكراً بارك الله فيكم تعلمت منكم انشاء الله في ميزان حسناتكم جميع وكل من يساعد الناس في هذا المنتدي ولقد سميت هذا المنتدي جامعة الاوفيس المفتوحة Private Sub CommandButton1_Click() ActiveWindow.SelectedSheets.PrintPreview A = MsgBox("åá ÊæÏ ÇáØÈÇÚÉ ÈÚÏ ÇáãÚÇíäÉ¿", vbYesNo + vbQuestion, "ØÈÇÚÉ") If A = vbYes Then With ActiveSheet .PrintOut End With End If Range("A1").Activate Range("h6").Value = 0 End Sub
  8. شكراً جزيلاً بارك اله فيكم هذا هو المطلوب احبائي (( وليد فتحي ، محمد أبو البراء )) ابداع وثم تميز
  9. مشكورين عندي سؤال اذكان الاسماء التي تريد ان تعرف التكرار فيها موجودة في اكثر من شيت وليست فقط في صفحة واحدة فما الحل وشكراً لكم ..... ولمن يعرف الاجابة افدنا افادك الله
  10. مفتاح التنفيذ شرح للعملية ارجو ان اكون واضح في طلب وسامحني لتعبك بالنسبة لهذة الخلية معمولة علشان ادخال ر قم معين تبدا بجلب بينات موظف فا المشكلة بعد ادخال الرقم وطباعة البيانات لست بحاجة الي ان تكون البيانات موجودة فا البيانات وحتي اخفي البيانات الطريقة الوحيدة هي ادراج رقم صفر ( 0 )في المربع H6 حتي يتم احضار بيانات موظف اخر فرضاً وهذا جدول توضيحي مسح خلية.rar
  11. أستاذ / ضاحي الغريب بارك الله فيك .....لقد استشعرت حرصك علي ان كل من يرى عملك يستفيد منه حفظك الله نريد منك اكمال هذه الدروس حتي ربط جدول مكون من عدة اعمد مع هذا الفورم
  12. الملف حجمة 6 ميجا والمنتدي ليسمح ببتحميل مثل هذا الحجم الربا.rar
  13. ابداع متميز جداً ياريت إضافة مستخدمين وشكراَ سوف اضع عملك للمتابعة لتتبع كل جديد فية وفقك الله
×
×
  • اضف...

Important Information