السلام عليكم اريد نزع auto close

[زاكي بوشلاغم]

السلام  عليكم  اخواني  قمت  بوضع    كود  عند  فتح  ملف ايسكل كما اريد  تعديل  في  ماكرو   لكن  قمت  بإخفاء  vba basic اريد  ارجاعها  قد  نسيت  كيف  اخفيتها  لانني  لا  اجيد  تقنايت   وفيزيال بازيك من فضلكم انزعو عليه تقنية مارو  اوتو كلوز  وشكرا 

حيث لا يضهر  لي vba  project  اريد  اضهاره  وشكرا  

 عند فتح ملف   كلمة سر  هي 3452043760

CNR.rar

[زاكي بوشلاغم]

السلام  عليكم  اخواني  قمت  بوضع    كود  عند  فتح  ملف ايسكل كما اريد  تعديل  في  ماكرو   لكن  قمت  بإخفاء  vba basic اريد  ارجاعها  قد  نسيت  كيف  اخفيتها  لانني  لا  اجيد  تقنايت   وفيزيال بازيك من فضلكم انزعو عليه تقنية مارو  اوتو كلوز  وشكرا 

حيث لا يضهر  لي vba  project  اريد  اضهاره  وشكرا  

 عند فتح ملف   كلمة سر  هي 3452043760

[زاكي بوشلاغم]

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

 

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

وعليكم السلام أخي الكريم زاكي

أين الملف المرفق لمحاولة تقديم المساعدة المطلوبة؟

فك حماية محرر الأكواد أمر بسيط وميسور وإن شاء الله أي عضو ممكن يفيدك فيه ، فقط ارفق ملفك

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

تفضل أخي الكريم

 

CNR.rar

[زاكي بوشلاغم]

اخي  لم  يفتح الملف  عندي  ممكن  تحاول  فتحه  وتبعثه لي 

الملف المراد تعديل فيه 

CNR.rar

[Guest محمد ابو صهيب]

TAFADEL.....

 

CNR.AB.rar

[زاكي بوشلاغم]

شكرا  اخي  لكن  اريد  عند  فتح الملف  لا  ادخل  كلمة  السر  ادخل  مباشرة  كما  اريد  تغيير  في  vba project  التي  هي  مخفية  لا  استطيع  الدخول  اليها 

vba project  CNR  لا تظهر  اريدها  ان  تظهر  واغير  معطيات  فيها  

ارجو  منكم  ان  تشرحو  لي  كيفية  اظهاره  واخفاء  VBA  PROJECT

[Guest محمد ابو صهيب]

Modifier...CNR

CNR.AB.MODIFIER.rar

[زاكي بوشلاغم]

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

كما اريد  تغيير في  VBA PROJECT CNR كيفية تغيير فيها  وشرح  طريقة  

اخي  اثناء  طباعة  الورقة  لا  تخرن  بلون الورقة   تخرج  بلون  اسود  فقط  ما الحل  اريد  عند  الطباعة  ان تخرج  بنفس لون  الورقة 

[Guest محمد ابو صهيب]

ببساطة... نزعنا الكود المتعلق بحدث فتح الملف من workbook  كما هو موضح في قي التعليق ...هنالك نوعان أو طريقتان في حماية الملف ....

1 كما هو مشار في الكود ....الأول خاص بحماية الورقة     ActiveSheet.Protect "90404051", DrawingObjects:=True, Contents:=True, Scenarios:=True

2  كما هو مشار في الكود  هنالك خاصية صندوق الادخال  (UserName = InputBox("Merabet Abdelghani ELannaser"     ' 

فاألغينا الكود عند بداية فتح الملف .....

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

Private Sub Workbook_Open()
On Error Resume Next
kh_wVisible True
ActiveSheet.Protect "90404051", DrawingObjects:=True, Contents:=True, Scenarios:=True ' هذا خاص بمحرر الأوراق
'Application.ScreenUpdating = False
'Range("IV65536").Select
    Application.ScreenUpdating = False
  ActiveWindow.DisplayHeadings = False
 Sheets("MERABET").Select
Range("IV65536").Select
    Application.CutCopyMode = False
    Selection.Copy
Sheets("MERABET").Select
  Range("BF43").Select
    ActiveSheet.Paste
    Sheets("MERABET").Select
    Range("IS65536").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("MERABET").Select
    Range("N15").Select
    ActiveSheet.Paste
  Application.ScreenUpdating = True
  UserName = InputBox("Merabet Abdelghani ELannaser")     ' وهذه خاصية صندوق الإدخال
If UserName <> "3452043760" Then GoTo WrongName
' ...[More code here] ...
Exit Sub
WrongName:
For Each w In Application.Workbooks
    w.Save
Next w
    'Application.ScreenUpdating = True
    ' Range("IV65536").Select
   ' Application.CutCopyMode = False
   ' Selection.Copy
   ' Range("AA43:BG44").Select
   ' ActiveSheet.Paste
   ' NextTick = Range("IS65536").Select
   ' Range("N15:AY16").Select
   ' ActiveSheet.Paste
    'Sheets("table").Select
End Sub

 

[Guest محمد ابو صهيب]

لنزع الحماية من محرر الأكواد vba project ...يجب عليك التوجه الى توبيب TOOLS  اذا كان لك نسخة بالانجليزية كما هو موضح في الصورة والضغط على نافذة VBA PROJECT PROPERTIES

تنيثق لك النافذة كما هو موضح في الشكل 2

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

[Guest محمد ابو صهيب]

غذرا لقد تفقدت خصائص الطباعة المتعلق بالنسبة الملف المرسل فوجدت كما هو مشار في الصورة...أنّ خانة Black and white,.........

أنزع العلامة من الخانة...... حتى تضبط لديك خاصية اللون الملون.....

[زاكي بوشلاغم]

اخي  كيف  تستخرج  كلمة  سر vba project

وبارك الله فيك

اريد استخرج كلمة سر vbaproject

ماهي الطريقة التة تستخرج بها كلمة السر 

[Guest محمد ابو صهيب]

اذا استشكل عليك الأمر ....فقد وضعت لك برنامج لفك حماية محرر الأكواد ...اسمه kit entreprise...........

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

http://www.mrkzgulf.com/do.php?id=241669

 

تم تعديل أكتوبر 21, 2016 بواسطه محمد ابو صهيب

[زاكي بوشلاغم]

الرابط لا يعمل 

[Guest محمد ابو صهيب]

اضغط على الرابط ثم اتبع خطوة كما هو متبع في الصورة.......بالضغط passer L'annoce    ....سيظهر لك رابط الموقع

تم تعديل أكتوبر 21, 2016 بواسطه محمد ابو صهيب

[زاكي بوشلاغم]

لم يظهر الرابط