اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

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

أحبائى فى الله تقبلوا جميعا تحياتى

أقدم لكم اليوم كود لعله يفيد

Delete All Macros

Sub DeleteAllMacros() 'Excel vba to delete all macros in new workbook.

Dim otmp As Object

 

    With ActiveWorkbook.VBProject

        For Each otmp In .VBComponents

            If otmp.Type=100 Then

                otmp.CodeModule.DeleteLines 1, otmp.CodeModule.CountOfLines

                otmp.CodeModule.CodePane.Window.Close

            Else: .VBComponents.Remove otmp

            End If

        Next otmp

    End With

End Sub

 

  • Like 1
قام بنشر

وعليكم السلام اخى م/ياسر فتحى

كود ممتاز من الممكن استخدامه فى الحماية

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

  • Like 1
قام بنشر

اخى الحبيب أستاذى الفاضل / سعد عابد

شرفت بمرورك الكريم

تقبل خالص تحياتى وتقديرى

الأخ الحبيب الغالى والإسم الغالى / ياسر العربى

يسعدنى ويشرفنى دائما مرورك الكريم

شكرا لدعائك الطيب ولك بمثله

فأنت أيضا شعلة دائما تنير المنتدى من النشاط

تقبل خالص تحياتى وتقديرى

قام بنشر

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

كثرت هداياك أخي الغالي " ياسر فتحي البنّا " ..

بالوقت الذي إنكمشنا نحن .. بسبب برودة الجو .. و انكمشتْ أفكارنا .. تمدّدت خلاياكَ أنتَ ..

باسم الله ما شاء الله

ثقْ أخي العزيز أنّي من هواة متابعة أفكارك و أكوادك و إطلالاتك الفريدة ..

جزاك الله خيرًا و زادك من علمه و فضله

فائق إحتراماتي و إعجاباتي

566efec83de4b_2.gif.eb95d90cd401480f3e66

 

  • Like 2
قام بنشر

حبيبى الغالى الأخ العزيز / عبد العزيز

أجمل هديه هو مرورك الدائم على موضوعاتى وتشريفك لها

وبعدين أنا من أشد المعجبين بمواضيعك وتفاعلك الدائم مع الإخوة الأعضاء بمساعدتهم

جزاك الله خيرا وزادك الله من علمه وفضلة

وبعدين إن كان الجو شديد البرودة فالقلب والعقل دائم التفكير فى إعطاء منتدانا العظيم كل ما يقدرنا الله عليه من أعمال تفيد الجميع

وفقنا الله وإياكم لما فيه الخير

تقبل خالص تحياتى وتقديرى

  • Like 1
  • 2 weeks later...
قام بنشر

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

رغم أن الكود موجود في مكتبتي الخاصة إلا أنني معجب بالموضوع ..

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

بس مش مهم مجتش من حد غريب ..جات من ياسر بردو (وبردو ملهاش علاقة بالبرد ولا ليها علاقة بالكلمة الفرنسية Pardon ..إنما هي في اللغة العامية المصرية تعني أيضاً)

تقبل تحياتي

قام بنشر

حبيبى وأستاذى الغالى / ياسر خليل

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

برده أخوك ياسر إللى عرضه

مجتش من حد غريب

تقبل خالص تحياتى وتقديرى

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