-
Posts
1,846 -
تاريخ الانضمام
-
Days Won
30
Community Answers
-
محمود_الشريف's post in حل مشكله RUN TIME ERORR1004 عند الترحيل was marked as the answer
بعد اذن الأستاذ // علي محمد علي
والأستاذ // أبو عيد
الأخ الكريم الخطأ رقم 1004 إليك توضيح بسيط عنه بإيجاز (أسبابه)
------------------------------------------------------------------------------------------------------------------------
تعريفه : خطأ في التطبيق أو تعريف الكائن
الوصف : هذه رسالة خطأ catch-all شائعة جدًا.
لماذا يحدث ؟ : يحدث هذا الخطأ عندما لا يتطابق أحد الأخطاء مع الخطأ المحدد بواسطة VBA .
بمعنى آخر ، يتم تعريف الخطأ بواسطة Excel (أو بعض الكائنات الأخرى) ويتم نشر مرة أخرى إلى VBA.
----------------------------------------------------------------------------------------------------------------------
وبما أنك لم تحدد ما هو الخطأ بالكود ال حضرتك كاتبه بطريقة النسخ واللصق ( لذا الكود غير واضح )
فالأفضل رفع الملف لتسهيل العمل عليه
-----------------------------------------------------------------------------------------------------------------
أو اذا اردت التعامل مع الخطأ بنفسك
قم بتشغيل الكود وعندما تظهر لك رسالة الخطأ اضغط على كلمة Debug
سيقوم بفتح المحرر وسيقوم قاريء المحرر تلقائيا بتحديد سطر ووضع خلفية باللون الأصفر عليه
قم بإلغاء التحديد بالضغط على أيقونة Reset ( شكلها مربع بلون ازرق) بجوار زر الـ Run الأخضر من شريط المهام بالأعلي بأيقونة
ثم حاول تصحيح الخطأ
-
محمود_الشريف's post in المساعدة في تفعيل خاصية دقة البيانات المدخلة في فورم الاختبار was marked as the answer
أخى فى الله
اليكم الملف المطلوب بالمرفقات
وتقبل منى وافر الاحترام والتقدير
اختبار_4.rar
-
محمود_الشريف's post in المساعدة في تفعيل برنامج اختبار سرعة ادخال البيانات was marked as the answer
أخى فى الله
اليكم بالمرفقات المطلوب
ساعة توقيت كامله بالفورم
أسأل الله عز وجل أن يكون ما تريده
وتقبل منى وافر الاحترام والتقدير
اختبار_1.rar
-
محمود_الشريف's post in عمل كشف حساب لعدد كبير من العملاء ( عنوان معدل ) was marked as the answer
أخى الكريم
بداية الشكر موصول للاستاذ الكريم / حسام عيسى
فيما يختص بأمر الفورم الخاص بكشف الحساب راجع هذا الرابط به دروس هامه جدا بالتفصيل
وهى للأستاذ القدير / حماده عمر
http://www.officena.net/ib/index.php?showtopic=46129
وهذا رابط مباشر خاص بأمر العدد 2 فورم فورم خاص بالكشف
وفورم خاص بالنتيجه مع امكانيه الطباعه
http://www.officena.net/ib/index.php?showtopic=46129&page=4#entry275137
وتقبلوا منى وافر الاحترام والتقدير
-
محمود_الشريف's post in معادله حساب الفرق بين رقمين was marked as the answer
أخى الكريم
اليكم الملف بطريقة أخرى
فى حاله عدم وجود منصرف يعطيك النتيجة لا يوجد منصرف
فى حال عدم وجود بيان أو رقم فى خانة آخر المدة يعطيك النتيجة ( نفس بيان أول المدة )
وتقبل منى وافر الاحترام والتقدير
معادلة المتبقى_11.rar
-
محمود_الشريف's post in كيفية ترحيل البيانات من شيت إلى اخر was marked as the answer
أخى فى الله
الاستاذ / ياسين
نسأل الله عز وجل أن يحفظه لكم من شرور خلقه
وأن يرزقكم بره وأن يجعله من عباده الصالحين
واليكم الملف بعد تنفيذ المطلوب
بكود سهل حتى يسهل فهم الترحيل
ملاحظة الترحيل بالاكواد لا ينفع مع الخلايا المدموجة لذا تم الغاء الدمج حتى يتم الترحيل
تقبل منى وافر الاحترام والتقدير
نموذج تعبئة1.rar
-
محمود_الشريف's post in اريد تكملة البرنامج was marked as the answer
أخى الكريم
اليكم الملف بعد تنفيذ المطلوب
أسأل الله عز وجل أن أكون وفقت فى تنفيذ ما تريد
ملحوظة
الملف كان محمى بكلمه سر .. لكن لا عليك أخى الكريم
وتقبل منى وافر الاحترام والتقدير
تكملة البرنامج 1.rar
-
محمود_الشريف's post in مرفق برنامج اظهار واخفاء اعمدة معينة was marked as the answer
أخى فى الله
الأستاذ الكبير // ابراهيم ابو ليلة
طريقة رائعة لتنفيذ المطلوب بارك الله فيكم
وبعد إذنكم أخى الكريم
لإثراء الموضوع
إليكم طريقة أخري
لتنفيذ المطلوب عن طريق قائمة منسدله عمليه دون تغيير أى شىء بالملف
وتقبلوا منى وافر الاحترام والتقدير
مشتركى الدوحة نت 1.rar
-
محمود_الشريف's post in تحديث الاسعار من النت was marked as the answer
اليكم اخى الكريم
رابط
http://www.officena.net/ib/index.php?showtopic=53535
شرح ربط الاكسيل بالويب
لكم خالص تحياتى وتقديري
-
محمود_الشريف's post in الغاء باسوورد was marked as the answer
أخى الكريم
لم أجد بالملف أى شىء له علاقة بالأكواد
كل ما هنالك أن هناك شيت مخفى وقمت بإظهاره
الملف بالمرفقات
وتقبلوا منى وافر الإحترام والتقدير
-
محمود_الشريف's post in اريد كود يقوم بطلب تحديد عدد النسخ التى يتم طباعتها للفورم was marked as the answer
إخوانى فى الله
أساتذتى الكرام
بعد إذنكم .. سوف أضيف كود بستخدمه لتحديد عدد النسخ المراد طباعتها للفورم نفسه
وهو كود للأستاذ العلامه / عبد الله باقشير
وتقبلوا منى وافر الإحترام والتقدير
Private Sub CommandButton3_Click() On Error Resume Next Dim Kh_Count As Integer Dim Kh_Comm As Integer If MsgBox("هل تريد طباعة السند رقم " & Combo_NO.Value, vbYesNo + vbQuestion + vbMsgBoxRight, "تأكيد طباعة ") = vbYes Then Kh_Count = InputBox("فضلاً أدخل عدد نسخ الاوراق الذي تريدها " & Chr(13) & Chr(13) & "الافتراضي نسخة واحدة", "عدد النسخ", "1") '================================== 'اخفاء الزرارات من السند اثناء الطباعة For Kh_Comm = 1 To 3 Me.Controls("CommandButton" & Kh_Comm).Visible = False Next Kh_Comm '================================== Me.Hide '================================== 'عدد النسخ المطلوبة Do Until Kh_Count = 0 Me.PrintForm Kh_Count = Kh_Count - 1 Loop '================================== End If End On Error GoTo 0 End Sub -
محمود_الشريف's post in طلب طريقة ربط الكود بالاسم ؟ was marked as the answer
أخى فى الله
الأستاذ / م _ مغترب
مرفق لكم نموذج لمحاولة ظهور الاسم مع ربطه بكود الاسم
بطريقة أخرى
نسأل الله عز وجل أن تفى بالغرض
وتقبلوا منى وافر الإحترام والتقدير
M_elshrief_محاولة ظهور الاسم.rar
-
محمود_الشريف's post in كيفية ايجاد الفرق بين تاريخين هجريين was marked as the answer
أخى الكريم
سلام الله عليكم ورحمته وبركاته
راجع هذا الرابط
به ما تريد إن شاء الرحمن
وهو للأستاذ العلامه / عبد الله باقشير
http://www.officena.net/ib/index.php?showtopic=29597