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

زر ماكروا مع كلمة سر


zizo747

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

اخي عادل السلام عليكم

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

وهذا لتأكد من ان عملية الجمع لم تتم

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

وفي المرة الثانية لاي سبب اخطأت بادخال الرقم السري فلو بقي الرقم لاختلط عليك الامر ولكن عند مسحه ستعلم ان الرقم خاطئ

Password.rar

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

شكر ا لكل من ساهم في حل طلبي بوضع كلمة سر لزر الماكروا

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

Dim mypassword As String

mypassword = 123

mypasss = Application.InputBox

فمن الواضح أنها 123

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

فهل لي بالطريقة

مع الشكر

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

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