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

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

قام بنشر

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

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

فهنا اضطر الى الذهاب الى اسم الورقة والتضليل ثم اكتب اسم الورقة المطلوبه ثم اذهب الى السطر اللي بعده واعمل نفس الوضه وهكذا حتى انتهي من

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

حتى يتضلل ذلك الجزء .

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

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

تحياتي

قام بنشر

اعتقد انك لمجرد انك علمت بالمكان الذي يكمن ان تعدل فيه

هذا جيد

اما ماتطلبه اعتقد يصعب تحقيقه

وبعدين انت لو تعبت شويه في برنامج تعدل عليه ليريحك ماذا يحدث

فاذا كان التعديل مضبوط اعتقد ستكون هناك الفائده علي الاقل ليريحك بعد ذلك

قام بنشر

الاخ skyblue

استخدم هذا الاسلوب

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

Sub Test_Sh_Name()
Dim Sh_Data As Worksheet
'/==========================
Set Sh_Data = Sheets("Data")
'/==========================
Sh_Data.Range("A1") = 5
Sh_Data.Range("A2") = 7
Sh_Data.Range("A3") = 9
End Sub

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information