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

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

قام بنشر

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

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

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

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

1.png

2.png

3.png

4.png

shady master garage test1 24052023.rar

قام بنشر

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

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

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

قام بنشر

جرب توقف الكود اللي في اللون الاخضر نفس اللي سويت وجرب  لتعطيله ضع فاصله قبل الكود '

وشوف يشتغل او لا

 

image.png.ff4fb23b07dabc72496f4c6f2d01b09c.png

 

  • أفضل إجابة
قام بنشر

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

الخطاء هنا

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