رمز

[plc_pcb]

RE: رمز

من فایل شما رو هم چندین بار باز کردم در حالی که دستم روی شیفت بود. اما یوزر پسورد اومد.

هر چند نمی دونم چه اتفاقی می افته. فکر می کنم مال تنظیمات اکسل شما باشه.

به هر صورت من گمان می کنم که وقتی شیفت رو نگه میدارید. ماکرو ها غیر فعال میشه.

کاری که شما باید بکنید اینه که تمام شیت ها رو very hidden کنید. و روی محیط ویژوال بیسیک هم پسورد بگذارید.
دو حالت اتفاق می افتد:

1- اگر فرم باز نشود. چون کاربر نمی تواند شیت هارو از حالت very hidden خارج کند. به اطلاعات داخل فایل دسترسی ندارد.
2- اگر فرم باز شود. مجبور از یوزر و پسورد استفاده کند.

این لینک رو امتحان کنید:
http://md6712.com/files/userpass.xlsm

با سلام

فایلی که شما ارسال کردین رو من مشاهده کردم
من فایل شما رو با اکسل 64 بیتی باز کردم و ارور کامپایل ماژول یک رو داد
به نظر میرسه که از dll توی برنامتون استفاده کردین.

ولی من شیت هایی که شما هیدن کرده بودین رو باز کردم

کاری که من کردم این بود

1- من یک فایل اکسل جدید باز کردم
2- فایل شما رو هم باز کردم
3- توی محیط ویژوال بیسیک فایل جدید رفتم و یک ماژول جدید درست کردم و توی اون کد زیر رو زدم

Sub UnhideAll()
Dim wb As Workbook
Dim ws As Worksheet
Application.DisplayAlerts = False
For Each wb In Workbooks
For Each ws In ActiveWorkbook.Worksheets
ws.Visible = True
Next ws
Next wb
Application.DisplayAlerts = True
End Sub 

4- برنامه رو اجرا کردم و شیت های مخفی باز شدند

در مورد دکمه شیفت هم این رو بگم که این از قابلیت های اکسل 2010 برای امنیت بیشتر است که اگر کاربر فایل اکسل مشکوکی رو باز میکنه که میخواد به درد سر نیفته با نگه داشتن دکمه شیفت ماکروها اجرا نمیشه
توی تنظیمات اکسل هم من جایی رو ندیدم که بشه این قابلییت رو غیرفعال کرد

[plc_pcb]

RE: رمز

من فایل شما رو هم چندین بار باز کردم در حالی که دستم روی شیفت بود. اما یوزر پسورد اومد.

هر چند نمی دونم چه اتفاقی می افته. فکر می کنم مال تنظیمات اکسل شما باشه.

به هر صورت من گمان می کنم که وقتی شیفت رو نگه میدارید. ماکرو ها غیر فعال میشه.

کاری که شما باید بکنید اینه که تمام شیت ها رو very hidden کنید. و روی محیط ویژوال بیسیک هم پسورد بگذارید.
دو حالت اتفاق می افتد:

1- اگر فرم باز نشود. چون کاربر نمی تواند شیت هارو از حالت very hidden خارج کند. به اطلاعات داخل فایل دسترسی ندارد.
2- اگر فرم باز شود. مجبور از یوزر و پسورد استفاده کند.

این لینک رو امتحان کنید:
http://md6712.com/files/userpass.xlsm

علت اینکه برای شما و دوستان دیگر این اتفاق نمیفته و باید پسورد بزنید اینکه قبلا شما یک فایل اکسل باز کردین و نبستینش برای رفع این مشکل یا سیستم خودتون رو لاگ آف کنید و دوباره لاگین کنید وفایل رو اجرا کنید و یا اینکه در Task Manager برنامه EXCEL.EXE رو End Process کنید.

[m_d6712]

RE: رمز

با سلام

فایلی که شما ارسال کردین رو من مشاهده کردم
من فایل شما رو با اکسل 64 بیتی باز کردم و ارور کامپایل ماژول یک رو داد
به نظر میرسه که از dll توی برنامتون استفاده کردین.

ولی من شیت هایی که شما هیدن کرده بودین رو باز کردم

کاری که من کردم این بود

1- من یک فایل اکسل جدید باز کردم
2- فایل شما رو هم باز کردم
3- توی محیط ویژوال بیسیک فایل جدید رفتم و یک ماژول جدید درست کردم و توی اون کد زیر رو زدم
4- برنامه رو اجرا کردم و شیت های مخفی باز شدند

سلام و تشکر

از اینکه این همه دقت کردید. واقعا حواسم نبود به فایل. درسته الان فایل به طور کامل secure نیست. اما این مشکل به راحتی بر طرف می شود.

http://www.mediafire.com/?i3ap12liuild89k (من نمی دونم چه سرور هایی فیلتر نیست اگر لطف کنید بگید تا از این به بعد روی اونا آپلود کنم. ممنون)



این اقدامات رو به فایل اضافه کردم:
1- workbook رو protect کردم با پسورد exceliran
2- تغییراتی در محلی که sheet هارو تغییر میدهم دادم.

یک نکته که باید توجه داشته باشیم. هر چقدر فایل هایمان از امنیت بیشتری برخوردار باشه احتمال اینکه باز بشه کمتر هست ولی یک نفر باز هم بخواد میتونه بازش کنه. البته زمان بیشتری نیاز داره.

موفق باشید.

[khakzad]

RE: رمز

با سلام و تشکر از همه دوستان
بحث به شدت تخصصی شده:huh:
سرور www.bfileupload.com
فیلتر نیس
ممنوون

[plc_pcb]

RE: رمز

با سلام و تبریک سال نو به همه دوستان

به نظر من مخفی کردن شیت ها روش مناسبی نیست

من فایل اکسلی که شیت های آن مخفی بود رو با برنامه Access باز کردم

فایلی که دوست خوبم آقای m_d6712 ارسال نمودند نیز به همین روش باز شد.