تصحيح الخطأ فى كود التحديث

[الفرس]

اخوانى الكرام

 

مرفق ملف به جدول محورى مرتبط بكود تحديث الجدول عند تنشيط الشيت الذى به ( لاحد الاخوة بالمنتدى )

 

عند التنشيط يعطى رسالة ( ولانى لاأفهم الاكواد ) عجزت فى الوصول للحل

 

الملف بين ايديكم وانتم معلمينا .. فبرجاء وضع حل

 

كشف حساب العملاء2014.rar

[الفرس]

اسف نسيت فك حماية محرر الاكواد

 

اليكم الملف بعد فك الحماية

[الفرس]

مرفق الملف

 

كشف حساب العملاء2014.rar

[أبو حنــــين]

اخي غير هذا الكود

Private Sub Worksheet_Activate()

Sheets("كشف حساب عميل").PivotTables("PivotTable1").RefreshTable

End Sub

بهذا الكود

Private Sub Worksheet_Activate()
     
Sheets("كشف حساب عميل").PivotTables(1).RefreshTable

End Sub

الكود موجود في صفحة كشف حساب عميل

[الفرس]

السلام عليكم ورحمة الله

 

اخى الحبيب / ابوحنين

 

جزاكم الله خيرا .. الكود يعمل بشكل ممتاز

 

فهل لو تكرمت - من باب الاستفادة والمعرفة - ان تشرح لى اين كان الخطأ . لان الكود الاول يعمل فى ملف اخر . فما هو الفرق؟