تعديل على كود نقل مبالغ من اكسس الى ورد كل في مكانه

[Taher DZ]

منذ ساعه, kkhalifa1960 said:

تفضل المرفق بعد التعديل بطلبك  4 اماكن مختلفة . طالع كود الاكسس ومستند الوورد

شكرا استاذ ظريقة سهلة جدا ونقلت القيم لأماكنها المخصصة في الورد كما صمم لها 

ملاحظة : احببت طريقة  ProgressBar  فوجدت بها مشكلة عند الصورة

 

[kkhalifa1960]

استاذ @Taher DZ انت اتقنت الفكرة والطريقة بالمرفق الاول . اتركها بما فيها  لان الصورة بالمرفق الاول  ............... استخدم المرفق الثاني ولاحظ الدالة المشار اليها تغيرت تماماُ . طالع الشرح .

                                                                

[kkhalifa1960]

انا لاحظت ان عداد النسبة تحت البروجرسبار متوقف على 0  فعدلت المرفق .

Taher DZ-2.rar

[Taher DZ]

51 دقائق مضت, kkhalifa1960 said:

انا لاحظت ان عداد النسبة تحت البروجرسبار متوقف على 0  فعدلت المرفق .

 

لم اعرف بالضبط  اين تم التعديل

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

بل يظهر كليا بنسبة 100 % بعد فتح وغلف الملف ورد

تم تعديل يناير 28 بواسطه Taher DZ

[kkhalifa1960]

تفضل .    

Taher DZ-3.rar

[Taher DZ]

بوركت استاذ على تعبك ولكن عندي مشكلة في تنفيد البروجرسبار  ماعرفت اين تكمن كما في الصورة الرجاء التعديل على المرفق 

2026.rar

[kanory]

12 ساعات مضت, Taher DZ said:

بوركت استاذ على تعبك ولكن عندي مشكلة في تنفيد البروجرسبار  ماعرفت اين تكمن كما في الصورة الرجاء التعديل على المرفق

في اعلا النموذج لديك ضع دالة Sleep لانها غير موجودة لديك

#If VBA7 Then
    Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr)
#Else
    Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
#End If

 

تم تعديل يناير 29 بواسطه kanory

[kkhalifa1960]

استاذ @Taher DZ المرفق الاخير الذي ارسلته لك به موديول عام به دالة تأخير الوقت . فلما تحب تشغل الكود على مشروع أخر انقل الموديول معها كي تعمل . 

2026-1.rar

تم تعديل يناير 30 بواسطه kkhalifa1960
اضافة الدالة العامة

[Taher DZ]

6 ساعات مضت, kkhalifa1960 said:

فلما تحب تشغل الكود على مشروع أخر انقل الموديول معها كي تعمل . 

نقلتها سابقا ولكن ما اشتغلت ولكن عندما وقفت   Sleep  اشتغل الكود بصفة عادية

[Foksh]

56 دقائق مضت, Taher DZ said:

نقلتها سابقا ولكن ما اشتغلت ولكن عندما وقفت   Sleep  اشتغل الكود بصفة عادية

بما ان الدالة Private ، فأعتقد انك وضعتها في المديول وليس في النموذج الذي تم استدعاء Sleep فيه .

لذا ضع تعريف الدالة في نفس النموذج وجرب 🙂

[kkhalifa1960]

ارسل المرفق كامل مع ملف الاكسل لضبطة .

[kkhalifa1960]

تفضل المرفق مضبوط ومجرب والبرجرسبار والعداد يعملان .........    ومعه  ملف اكسل للتجربة فقط استخد الذي لديك ...

                                                 

2026.rar

[Taher DZ]

6 ساعات مضت, Foksh said:

ما ان الدالة Private ، فأعتقد انك وضعتها في المديول وليس في النموذج الذي تم استدعاء Sleep فيه .

لذا ضع تعريف الدالة في نفس النموذج وجرب 🙂

20 ساعات مضت, kanory said:

في اعلا النموذج لديك ضع دالة Sleep لانها غير موجودة لديك

6 ساعات مضت, kkhalifa1960 said:

ارسل المرفق كامل مع ملف الاكسل لضبطة .

 

شكرا لكم جميعا اساتذتي الكرام

وبارك الله فيكم على السهر من اجل توصيل وتصحيح الاخطاء ومساعدة اخوانكم 

جعلها الله في ميزان حسناتكم