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

دغيدى

أوفيسنا
  • Posts

    2,460
  • تاريخ الانضمام

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

  • Days Won

    14

كل منشورات العضو دغيدى

  1. أخى الكريم / الصقر سلام الله عليكم لا ولن يوجد " وجود شئ غلط فى المنتدى " الغلط والخطأ يأتى من بعض الزملاء الجدد هذا الموضوع قتل بحثا .. ولأن الموضوع انتهى فرأيت قفل الموضوع لنثمر أفضل . شكرا
  2. أخى الكريم أهلا بكم وسط زملاء واخوة لكم ولكن هل هذا العنوان مناسب . هل بحثتم عن المطلوب . عود نفسك بوضع ملف للعمل عليه كما تريد .
  3. أخى الكريم سلام الله عليكم أشكركم ولكن عندما ابلغنى الزميل ابو ايمان بالموضوع قمت على الفور بحذف الموضوع شكرا لكم على غيرتكم على موقعنا جميعا أخوكم جمال دغيدى
  4. Application.ScreenUpdating = False xxx xxxx xxxx xxxx xxx Application.ScreenUpdating = True
  5. أخى الكريم الموضوع هين وبسيط ابحث بالمنتدى سوف تجد مايسرك من أعمال الزملاء إن لم تستطع ضع ملفا للعمل عليه .. وسوف تجد الكل يتسابق للعمل تحياتى
  6. أخى الكريم وضح طلبك وسوف تجد كل الزملاء فى خدمتك دون استعطاف منك
  7. الأخوة الأفاضل اتصلت تليفونيا عدة مرات على الأستاذة الفاضلة/ أم عبد الله كما تعودت معها ولكنها لم ترد لعل المانع خيرا
  8. تم استبدال الكود تم عمل زر واحد للحذف والاضافة للدوائر ayman.rar
  9. الأخ الفاضل / أيمن برجاء فك الحماية عن الكود أو كتابة الرقم السرى حتى نتمكن من عمل اللازم
  10. الأخ الكريم / مصطفى سلام الله عليكم خالفت قواعد المشاركات مخالفات صريحة 1 - اسم الظهور ليس بالعربية 2 - عنوان الموضوع لايعبر عن محتواه بشكل مستفذ
  11. Option Explicit Private Sub Workbook_Open() Dim Retvalue As String, GD As Integer Retvalue = GetSetting("A", "0", "Runcount") GD = Val(Retvalue) + 1 SaveSetting "A", "0", "RunCount", GD If GD >= [A3] Then ' الرقم (3) يحدد عدد مرات التشغيل MsgBox ("انتهت مدة تشغيل البرنامج ،،، قم بشراء النسخة الكاملة من المنتج") ThisWorkbook.Close 0 End If End Sub يمكنك تحديد عدد المرات من الخلية A3 3 Times Only1.rar
  12. أتمنى لليمن السعيد التقدم بأهله الكرام =============================== أخى الصقر ردكم اثلج صدرى واراح بالى ..نعم القول انتم
  13. أخى الكريم لا تختار العمود المراد حذفه بأكملهمن خلال شريط عنوان الأعمدة ولكن حدد الجزء الذى تريد حذفه فقط
×
×
  • اضف...

Important Information