اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

خطأ في الكود


ahmedabuzena

الردود الموصى بها

السلام عليكم ورحمة الله وبركاته ارجو مساعدتى في معرفة المشكلة فى الكود 

مع حسابات العملاء الحمد لله بفضل الله ثم بمجهود الاخوة الخبراء البرنامج يعمل بدون مشاكل

حبيت انفذ نفس الاكواد على حسابات الموردين مع مراعاة تغيير الاسماء حتى اتجنب التعارض بسبب الاسماء المتشابه

ولكن في خطاء كما هو موضح في الصور وجزاكم الله خيرا

1.png

2.png

3.png

4.png

shady master garage test1 24052023.rar

رابط هذا التعليق
شارك

لو في حاجه غير واضحه يا ريت حد يبلغني

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

حاولت اطبق نفس الاكواد والجداول والاستعلامات مع مراعاة تغيير الاسماء فى الموردين تقريبا خلصت كل شئ بس وقفت معايا هذة المشكلة في الكود حاولت اشوف فين المشكلة بس بسبب عدم الخبرة في الاكواد وطريقة كتابتها فشلت يا ريت لو تساعدوني في حل هذة المشكلة وجزاكم الله خيرا 

رابط هذا التعليق
شارك

وعليكم السلام 

الخطاء هنا

Exit_cmd_Select_Click:

    Call cmd_close_Click
    Exit Sub
    
err_cmd_Select_Click:

    If Err.Number = 1 Then
            
    Else

        MsgBox Err.Number & vbCrLf & Err.Description
        Resume Exit_cmd_Select_Click


وهذا الصحيح

Exit_cmd_Select2_Click:

    Call cmd_close_Click
    Exit Sub
    
err_cmd_Select2_Click:

    If Err.Number = 1 Then
            
    Else

        MsgBox Err.Number & vbCrLf & Err.Description
        Resume Exit_cmd_Select2_Click

وهذا ملفك بعد التعديل

shady master garage test1 24052023.rar

  • Thanks 1
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information