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

[Taher DZ]

منذ ساعه, kkhalifa1960 said:

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

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

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

 

[kkhalifa1960]

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

                                                                

[kkhalifa1960]

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

Taher DZ-2.rar

[Taher DZ]

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

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

 

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

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

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

تم تعديل بالامس في 20:53 بواسطه 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

 

تم تعديل منذ 1 ساعه بواسطه kanory