توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : فروشگاه آموزش ویدئویی تعیین سطح دسترسی در اکسل با امکان ثبت تغییرات و بازگردانی آنها
همانطور که احتمالا شما هم تجربه کردید گاها برای ساخت یک فایل اکسل ساعت ها وقت گذاشتید یا برای وارد کردن اطلاعات آن ،مدت ها زمان صرف کردید و مجبورید که فایل را در اختیار کاربران دیگر ، قرار دهید.در این شرایط حفظ داده های فایل، برایتان دغدغه اساسی به شمار میرود.
خیلی از ماها راههای مختلفی را تجربه کردیم.از Hide کردن شیت ها گرفته تا Protect کردن آنها و ... که این کارها سختی ها و معایب خاص خودش را دارد.به عبارت دیگر ما با این اقدامات عملا قدمی برای ایجاد سطح دسترسی برنداشتیم و صرفا همه کاربران را به یک اندازه محدود کردیم. اما ...
در این روش که با آموزش صفر تا صد آن در خدمت شما خواهیم بود به طور کامل به شما آموزش می دهیم که چطور برای افراد مختلف به راحتی و تنها با یک کلیک ، سطح دسترسی تعریف کنید.
تعریف سطح دسترسی :
به بیان ساده ، سطح دسترسی یعنی شما مشخص که هر کاربر چه حدی از اختیارات را داشته باشد.
در این آموزش ما سه سطح از دسترسی را اعمال می کنیم:
دسترسی کامل ( ورود ، ویرایش و حذف اطلاعات در شیت هایی که معین می کنید )
دسترسی در حد مشاهده اطلاعات ( در هر شیتی که معین کنید )
عدم مشاهده اطلاعات ( در هر شیتی که معین کنید )
مرحله دوم ، ثبت ورود و خروج کاربران است.شما می توانید لیستی از ساعت و تاریخ ورود و خروج کاربران را مشاهده کنید. قسمت بعدی پروژه را به یک کار جالباختصاص داده ایم. تمامی تغییراتی که هر کاربر در هر شیت اعمال می کند ( اعم از ورود دیتا ، ویرایش و یا حذف آنها ) در یک شیت مجزا که فقط ادمین ، به آن دسترسی دارد ، ثبت می گردد و جالبتر اینکه شما می توانید هر کدام از این تغییرات را که بخواهید تنها با زدن یک کلیک به حالت قبلی آن بازگردانید. ویژگی های این پروژه در یک نگاه :
امکان تعریف چندین یوزر و ادمین
امنیت بسیار بالای داده ها
بیانی ساده و گویا برای درک بهتر مفاهیم ارائه شده
پشتیبانی برای کاربرانی که در طول ساخت فایل شان به مشکل بر می خورند.
ثبت تغییرات هر کاربر در شیت مجزا
امکان بازگردانی تغییرات انجام شده
با ویژگی هایی که ذکر شده ، امنیت داده های فایل تان تا حد بسیار زیادی تضمین شده و شما می توانید با خیالی آسوده فایلتان را در اختیار دیگر کاربران قرار دهید.
Amir Ghasemiyan
2019/06/09, 21:03
لینک خرید محصول:
https://exceliran.com/shop/access-level-video/ (https://exceliran.com/shop/access-level-video/)
https://www.aparat.com/v/4VsYL
reza_gh_tak
2019/07/03, 20:55
با سلام من این محصول رو خریدم
خیلی جالب بود به سوال دارم من چطور می تونم این دستور رو در this workbook این محصول اضافه کنم که خطا نده
Private Sub Workbook_Open()
Application.WindowState = xlMaximized
Set myRange = ActiveSheet
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
Application.DisplayFormulaBar = False
Application.DisplayStatusBar = Not Application.DisplayStatusBar
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
Dim wbBook As Workbook
Dim wsSheet As Worksheet
Set wbBook = ThisWorkbook
For Each wsSheet In wbBook.Worksheets
If Not wsSheet.Name = "Blank" Then wsSheet.Activate
With ActiveWindow
.DisplayHeadings = False
.DisplayGridlines = False
Application.DisplayFormulaBar = False
End With
Next wsSheet
Sheet1.Select
End Sub
با سلام و تشکر از
خواستتون از افزودن این کدها چیه؟چه خطایی میده؟
reza_gh_tak
2019/07/04, 12:18
حل شد
یه سوال کجا آدرس داده که صفحه که پس از ورود باز میشه شیت استارت باشه
ممنون
چون میخوام شیتی که باز میشه رو عوض کنم
reza_gh_tak
2019/07/04, 12:52
حل شد
یه سوال کجا آدرس داده که صفحه که پس از ورود باز میشه شیت استارت باشه
ممنون
چون میخوام شیتی که باز میشه رو عوض کنم
کدی که نوشته شده برای ایونت close هست که همه شیت ها به غیر از start هیدن میشه.برای ورود ما کدی ننوشتیم که شیت خاصی اکتیو بشه اما شما می تونید تو ماژول check user در انتهای کدها بنویسید ( مثلا شیت 6 قراره هنگام باز شدن فایل فعال بشه. )
sheet6.activat
نکته: حتما اون شیتی که قرار تو باز کردن فایل ، اکتیو بشه ، باید برای همه یوزرها قابل مشاهده باشه.یعنی تو شیت مدیریت کاربران ، همه کاربرها دسترسی به اون شیت براشون تعریف شده باشه.
reza_gh_tak
2019/07/04, 14:51
کدی که نوشته شده برای ایونت close هست که همه شیت ها به غیر از start هیدن میشه.برای ورود ما کدی ننوشتیم که شیت خاصی اکتیو بشه اما شما می تونید تو ماژول check user در انتهای کدها بنویسید ( مثلا شیت 6 قراره هنگام باز شدن فایل فعال بشه. )
sheet6.activat
نکته: حتما اون شیتی که قرار تو باز کردن فایل ، اکتیو بشه ، باید برای همه یوزرها قابل مشاهده باشه.یعنی تو شیت مدیریت کاربران ، همه کاربرها دسترسی به اون شیت براشون تعریف شده باشه.
اینکارو میکنم خطا میده
فایلتون را برام پیام کنید .
reza_gh_tak
2019/07/06, 22:13
چطور میشه در این فایل که من خریداری کردم یک فرم ساخته شده رو مثلاً فرم یوزر 3 رو برای یک کاربرخاص غیر فعال کرد
دوست عزیز این موضوع دیگه ای هست که خودم به شخصه تا حالا رو این موضوع کار نکردم اما می تونید جهت راهنمایی به لینک های زیر مراجعه کنید
لینک 1 (https://stackoverflow.com/questions/14376251/deactivate-excel-vba-userform)
لینک 2 (https://www.mrexcel.com/forum/excel-questions/800815-there-userform-deactivate-command.html)
AbrahamQds
2020/05/22, 07:08
سلام بنده حدود 5 سال هستش که با اکسل کار میکنم و برنامه نویسی های زیادی انجام دادم برای اکسل. میخواستم از حضورتون بپرسم امکانش هست قبل اینکه من فایل رو خریداری کنم حد اقل تعدادی عکس از پروژه ببینم یا نسخه ویدئویی دموش رو آنلاین قرار بدید که ببینم این فایل نیاز های بنده رو برطرف میکنه یا خیر؟ با تشکر.
Amir Ghasemiyan
2020/05/22, 17:12
سلام بنده حدود 5 سال هستش که با اکسل کار میکنم و برنامه نویسی های زیادی انجام دادم برای اکسل. میخواستم از حضورتون بپرسم امکانش هست قبل اینکه من فایل رو خریداری کنم حد اقل تعدادی عکس از پروژه ببینم یا نسخه ویدئویی دموش رو آنلاین قرار بدید که ببینم این فایل نیاز های بنده رو برطرف میکنه یا خیر؟ با تشکر.
سلام دوست عزیز
در پست دوم ویدئوی معرفی محصول قرار داده شده
AbrahamQds
2020/06/13, 23:23
بله صحیح میفرمایید اما گویا بدون خرید قابل دسترسی نیست این فایل. یا حد اقل من نمیدونم کجا باید دنبالش بگردم.
گمان میکنم بهتر باشه که تصویری از محصول نهایی و فیچر هاش اگه در اختیار کاربر قرار بگیره خیلی بهتره.
Amir Ghasemiyan
2020/06/14, 09:14
بله صحیح میفرمایید اما گویا بدون خرید قابل دسترسی نیست این فایل. یا حد اقل من نمیدونم کجا باید دنبالش بگردم.
گمان میکنم بهتر باشه که تصویری از محصول نهایی و فیچر هاش اگه در اختیار کاربر قرار بگیره خیلی بهتره.
خير دوست عزيز ربطي به خريد كردن نداره.
عرض كردم تو همين تاپيك پست دوم. اين هم لينكش
https://forum.exceliran.com/showthread.php/15134-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D9%88%DB%8C%D8%AF%D8%A6%D9%88%DB%8C%DB%8C-%D8%AA%D8%B9%DB%8C%DB%8C%D9%86-%D8%B3%D8%B7%D8%AD-%D8%AF%D8%B3%D8%AA%D8%B1%D8%B3%DB%8C-%D8%AF%D8%B1-%D8%A7%DA%A9%D8%B3%D9%84-%D8%A8%D8%A7-%D8%A7%D9%85%DA%A9%D8%A7%D9%86-%D8%AB%D8%A8%D8%AA-%D8%AA%D8%BA%DB%8C%DB%8C%D8%B1%D8%A7%D8%AA-%D9%88-%D8%A8%D8%A7%D8%B2%DA%AF%D8%B1%D8%AF%D8%A7%D9%86%D B%8C-%D8%A2%D9%86%D9%87%D8%A7?p=70265&viewfull=1#post70265
alirazavi58
2020/12/07, 00:42
با سلام
چطور میشه در محصول خریداری شده کاری کنم که شخص نتونه روی شیت کلیک راست کنه و شیت رو کپی یا انتقال بده.کد vba منظورمه؟
ممنون میشم اگر پاسخ بدید
reza_gh_tak
2020/12/31, 16:51
با سلام
من این اکسل سطح دسترسی را قبلا از شما خریداری کردم من می خوام کد زیر رو در ورک بوک اجرا بشه ولی اجازه نمیده و خطا میده ممنون می شم کمکم کنید
Private Sub Workbook_Open()Application.WindowState = xlMaximized
Set myRange = ActiveSheet
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
Application.DisplayFormulaBar = False
Application.DisplayStatusBar = Not Application.DisplayStatusBar
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
Dim wbBook As Workbook
Dim wsSheet As Worksheet
Set wbBook = ThisWorkbook
For Each wsSheet In wbBook.Worksheets
If Not wsSheet.Name = "Blank" Then wsSheet.Activate
With ActiveWindow
.DisplayHeadings = False
.DisplayGridlines = False
Application.DisplayFormulaBar = False
End With
Next wsSheet
Sheet1.Select
End Sub
vBulletin® v4.2.5, Copyright ©2000-2024, Jelsoft Enterprises Ltd.