مساعدة فى مراجعة ملف ترحيل بيانات

[Aromaadv]

السلام عليكم

بعد بحث وتجارب عديدة أقتربت من الحل ولكن فى شىء غير مظبوط

أرجو مراجعة الملف المرفق وأحد يدلنى على تصحيح الخطأ
 

حسابات دعاية واعلان.rar

[Aromaadv]

للرفع

ما الخطأ فى الملف ؟

[ياسر العربى]

الخطأ انك لم تحفظ الملف في صيغة تدعم وحدات الماكرو فاذا كنت قد وضعت اي اكواد

وحفظت بامتداد Xlsx  فانك قد خسرت كل الاكواد التى تم حفظها

عدل الملف مره اخرى واحفظ بامتداد يدعم الماكرو مثل Xlsm

 

 

[Aromaadv]

شكرا أ/ ياسر العربى على الملحوظة

واتمنى حد يشوف الملف ويعرف فين الخطأ

الملف بعد التعديل فى المرفقات

حسابات دعاية واعلان.rar

[ياسر العربى]

اختصرت الكود لك شوية تفضل

انت لم تحدد حذف البيانات بعد الترحيل غير حذف خلية واحدة وهي A9

هل هذا ما تريده؟؟؟

 

 

حسابات دعاية واعلان.rar

[Aromaadv]

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

بس بصراحة انا خبرتى ضعيفة فى الاكسيل وكنت واخد الكود من موضوع تانى

مساعده أخيرة : ايه الطريقة الى تحذف البيانات من A9 الى S20 بعد ترحيل البيانات

وكمان لاحظت حاجة تانية البيانات بتترحل لخانة A6 ازاى اخليها تبدأ تنزل من خانة A9

وفي مشكلة تانية انا عايز البيانات تترحل وتتحذف بس الخلايا تفضل فيها الدوال ثابتة فى صفحة أمر شغل جديد

فهل ممكن تثبيت الدوال حتى مع حذف البيانات ؟

واعتذر على كثرة الاسئلة والطلبات ...

 

تم تعديل مايو 30, 2016 بواسطه Aromaadv

[Aromaadv]

للرفع

[محي الدين ابو البشر]

Sheets(xx).Cells(azsh, 1).PasteSpecial
         Sheets("أمر شغل جديد").Range("A9:S20").SpecialCells(xlCellTypeConstants, 23).ClearContents
 Application.CutCopyMode = False

السلام عليكم

أخي الغزيز فقط أضق الطر المبين بين السطرين المبينين

واتمنى أن يكون المطلوب