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

مسح محتويات ورقة العمل دون المساس بالمعادلات والاكواد


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

السلام عليكم اخواني الاعزاء واساتذتنا الكرام

لدي استفسار هل يوجد داله او كود

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

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

كشوفات خاصه لتعبئة الشهائد.rar

تم تعديل بواسطه عبدالعزيزالمدني
رابط هذا التعليق
شارك

جرب الكود بهذا الشكل

Sub ClearSheet()
    On Error Resume Next
    Range("A8:BT" & Cells(Rows.Count, 1).End(xlUp).Row).SpecialCells(xlCellTypeConstants).ClearContents
End Sub

تقبل تحياتي

  • Like 4
رابط هذا التعليق
شارك

1 دقيقه مضت, ياسر خليل أبو البراء said:

جرب الكود بهذا الشكل


Sub ClearSheet()
    On Error Resume Next
    Range("A8:BT" & Cells(Rows.Count, 1).End(xlUp).Row).SpecialCells(xlCellTypeConstants).ClearContents
End Sub

تقبل تحياتي

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

رابط هذا التعليق
شارك

أخي الكريم عبد العزيز

أعتقد أنني أرشدتك إلى موضوع البداية لكيفية التعامل مع الأكواد ..

عموماً للاستزادة ... وإنت واقف في ورقة العمل اضغط Alt + F11 للدخول لمحرر الأكواد

من قايمة Insert اختر كلمة Module ليتم إدراج موديول جديد

انسخ الكود والصقه في الموديول

روح لورقة العمل واضغط Alt + F8  هيطلع لك نافذة فيها أسماء الإجراءات الفرعية (الأكواد) اختر الكود المسمى ClearSheet وانقر الأمر Run ليقوم بالتنفيذ

 

بالنسبة للأكواد حاول تجربها على نسخة من الملف الأصلي ولا تقم بالحفظ إلا بعد التأكد من عمل الكود لأنه لا تراجع مع الأكواد

تقبل تحياتي

رابط هذا التعليق
شارك

26 دقائق مضت, ياسر خليل أبو البراء said:

أخي الكريم عبد العزيز

أعتقد أنني أرشدتك إلى موضوع البداية لكيفية التعامل مع الأكواد ..

عموماً للاستزادة ... وإنت واقف في ورقة العمل اضغط Alt + F11 للدخول لمحرر الأكواد

من قايمة Insert اختر كلمة Module ليتم إدراج موديول جديد

انسخ الكود والصقه في الموديول

روح لورقة العمل واضغط Alt + F8  هيطلع لك نافذة فيها أسماء الإجراءات الفرعية (الأكواد) اختر الكود المسمى ClearSheet وانقر الأمر Run ليقوم بالتنفيذ

 

بالنسبة للأكواد حاول تجربها على نسخة من الملف الأصلي ولا تقم بالحفظ إلا بعد التأكد من عمل الكود لأنه لا تراجع مع الأكواد

تقبل تحياتي

تسلم استاذي ياسر خليل أبوالبراء

لكن حصلت مشكله  احتذفت الروابط بين الاوراق التي فيها الروابط  فما هو الحل

رابط هذا التعليق
شارك

اخي الفاضل  عبد العزيز المدني

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

على كل حال

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

اسعدكم المولي في الدارين وحفظكم من كل سوء وجعل ما تقدمونه في موازين اعمالكم

 

كشوفات خاصه لتعبئة الشهائد.rar

تم تعديل بواسطه عبدالله الصاري
حذف عبارة زائدة
  • Like 2
رابط هذا التعليق
شارك

بارك الله فيك أخي الغالي عبد الله الصاري .. وإن شاء الله في تميز ورقي دائماً

نصيحة لأخونا عبد العزيز حاول أن يكون لديك أكثر من نسخة احتياطية لملفاتك المهمة ..أقصد إذا كان الملف مهم ويتم التعديل فيه بصفة دائمة فيجب أن تخصص مجلد تضع فيه نسخة احتياطية من ملفك بعد كل تعديل ولا تحذف أياً من النسخ الاحتياطية ..لربما احتجت إليها إذا حدث ما لا يحمد عقباه

تقبلوا تحياتي

  • Like 1
رابط هذا التعليق
شارك

18 دقائق مضت, عبدالله الصاري said:

اخي الفاضل  عبد العزيز المدني

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

على كل حال

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

اسعدكم المولي في الدارين وحفظكم من كل سوء وجعل ما تقدمونه في موازين اعمالكم

 

كشوفات خاصه لتعبئة الشهائد.rar

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

1.PNG

شكرا لكم لقد اكتشفت انه من اجل التحديث للورقتين لازم ايضا كتابة العمود المسمى م   مسلسل ارقام   بعد كتابة الارقام ظهرت البيانات لا اعرف ما العلاقه لكن اسف على ازعاجكم واكرمكم الله برضوانه

رابط هذا التعليق
شارك

تفضلافضل اخي جرب واخبرني 

وسارفق لك ملف لاحقا به اضافات اخرى

ولا ننسى شكر الاستاذ ياسر ابو البراء لانه صاحب جميع الاكواد التي بالملف  فحفظه الله ورعاه

 

كشوفات خاصه لتعبئة الشهائد.rar

  • Like 1
رابط هذا التعليق
شارك

اساتذتي الكرام

وفقكم الله لما يحب ويرضى

بحثت فلم اجد ما اريد

فرجعت  اليكم وانا والله مستحي منكم من كثرة اسئلتي

(كيف احمي فقط الخلايا التي بها معادلات من التحرير  وليس الورقه كاملا )

رابط هذا التعليق
شارك

33 دقائق مضت, عبدالعزيزالمدني said:

اساتذتي الكرام

وفقكم الله لما يحب ويرضى

بحثت فلم اجد ما اريد

فرجعت  اليكم وانا والله مستحي منكم من كثرة اسئلتي

(كيف احمي فقط الخلايا التي بها معادلات من التحرير  وليس الورقه كاملا )

اطلع على هذا الملف ربما يفيدك ..

Protect Formulas Only.rar

  • Like 1
رابط هذا التعليق
شارك

تفضل اخي واي شيئ يلزم فانا واخوانك في الخدمة

جميع الاكواد بالملف للاستاذ ياسر خليل ابو البراء

جرب واخبرني

 

كشوفات خاصه لتعبئة الشهائد.rar

  • Like 1
رابط هذا التعليق
شارك

تسلموا اساتذتي الكرام

عبدالله الصاري

ياسر خليل أبو البراء

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

شكرا لكم

رابط هذا التعليق
شارك

شكرا للمهندس العبقري وسيد المتعاونين المهندس العزيز ياسر دائما ف الخدمة

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

واشكر  المبدع الصاري على المساهمات المتواصله ف الموضوع نرجو ان لا تحرمنا من علومك

 

  • Like 1
رابط هذا التعليق
شارك

أخي الحبيب عبد العزيز قلم الإكسيل

بارك الله فيك وجزاك الله كل خير على كلماتك الرقيقة في حقي

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

 

أما اقتراحك فأنا خايف الناس تقراه بمسافة بعد الألف ..فبدل ياسل هيقروها يا سل (وكدا أنا هزعل أكيد يا عربي)

تقبل تحياتي

  • Like 2
رابط هذا التعليق
شارك

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