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

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

قام بنشر (معدل)

(لم افهم ماذا تعني بالصيغ اليست هي ذاتها المعادلات)

(قبل تنفيذ الكود اعمل نسخة احتياطية للصفحة لان الكود يحول كل المعادلات الى قيم ثابتة)

اذهب الى هذا العنوان

 

تم تعديل بواسطه سليم حاصبيا
قام بنشر

شكرا لك على الرد السريع وتفاعلك

ولكني اريد حذف الاسماء فقط ، وليس المعادلات ، يعني لو وضعت لخلية معية اسم ، اريد ان احذف الاسم ، من غير حذف معادلاتها

قام بنشر

جرب هذا الكود

Sub Delete_All_Named_ranges()

Dim nName As Name
 answer = MsgBox("سوف يتم مسح كل اسماء القطاعات هل انت موافق؟؟", vbYesNo, "تحذير")
  If answer <> 6 Then Exit Sub
  
   For Each nName In Names
      nName.Delete
   Next nName
End Sub

 

قام بنشر

لم يحدث الاسماء من النطاقات والخلايا ، اريد ان يحذف الاسماء من الخلايا والنطاقات ، ويترك المعادلات

على سبيل المثال ، لدي خلية a1 اسميها : السعر ، وخلية a2 اخرى الكمية ، وخلية a3 اخرى الايراد ، والمعادلة المكتوبة بالاسماء : الايراد  = السعر * الكمية

فاريد ان يحذف هذه الاسماء ويترك المعادلة التي هي : a3=a1*a2

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information