فرم شروع

[mahvar01]

سلام...
چطور می تونم برای فایل اکسلم یک فرم شروع(خوش آمد گویی) داشته باشم؟ که در اون دکمه های "ادامه" و "خروج" تعبیه شده باشد.
آیا امکانش هست برای کار با فایل اکسل در فرم شروع یوزر و پسورد بگیره و در صورت صحت وارد فایل اکسل شود؟

[khakzad]

سلام در باز شدن فایل این کد رو باید بنویسید:

Private Sub Workbook_Open()
userform1.Show
End Sub



یک فرم هم درست می کنید و روش پیام خوش امد و دکمه های مورد نظر رو می نویسید.
وقتی کد بالا رو می نویسید، در هنگام باز شدن، فرم 1 که همون یوزرفرمی هست که درست کردید نمایش داده میشه.

در مورد پسورد هم روی فرموتون تکست باکس می ذارید و با یک if مقایسه میکنید که ایا محتویات تکست باکس برابر هست با پسوردمورد نظر شما یا خیر


شروع کنید، سوال هاتون رو بپرسید

[mokaram]

برای قسمت دوم سوالتون پیشنهاد میکنم به لینک زیر سری بزنید تا این کار را به صورت علمی و عملی و اصولی فرا بگیرید امتحان کنید

آموزش سطح دسترسی برای فایل اکسل (http://www.exceliran.com/downloads/%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%A7%DB%8C%D8%AC%D8%A7%D8%AF-%D9%81%D8%A7%DB%8C%D9%84-%DA%86%D9%86%D8%AF%DA%A9%D8%A7%D8%B1%D8%A8%D8%B1%D 9%87-%D8%A8%D8%A7-%D8%B3%D8%B7%D8%AD-%D8%AF%D8%B3%D8%AA%D8%B1/)

[Ali Parsaei]

جهت اطلاع:
اجراي درخواست شما با توابع اکسل امکان پذير نيست و بايد از کد نويسي در ويژوال بيسيک استفاده کرد، لذا سوالتان از قسمت توابع اکسل به تالار ويژوال بيسيک منتقل شد

[mahvar01]

از همگی ممنونم..

1- من یه فرم ساختم حالا می خوام موقعی که یوزر یا پسورد اشتباه باشه فایل رو ببنده..
2- چطور می تونم شیت ها رو مخفی کنم یا از حالت مخفی خارج کنم.(کدش چیه؟)

فایل نمونه: Form01 (http://s5.picofile.com/file/8152004800/Form01.xlsm.html)

[~M*E*H*D*I~]

این مواردی که مطرح کردید در پکیج آموزشی زیر کامل توضیح داده شده

آموزش ایجاد سطح دسترسی در اکسل (http://forum.exceliran.com/showthread.php/4446-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%A7%DB%8C%D8%AC%D8%A7%D8%AF-%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)

پکیج آموزشی ایجاد فایل چندکاربره با سطح دسترسی مشخص (http://forum.exceliran.com/showthread.php/4732-%D9%BE%DA%A9%DB%8C%D8%AC-%D8%A2%D9%85%D9%88%D8%B2%D8%B4%DB%8C-%D8%A7%DB%8C%D8%AC%D8%A7%D8%AF-%D9%81%D8%A7%DB%8C%D9%84-%DA%86%D9%86%D8%AF%DA%A9%D8%A7%D8%B1%D8%A8%D8%B1%D 9%87-%D8%A8%D8%A7-%D8%B3%D8%B7%D8%AD-%D8%AF%D8%B3%D8%AA%D8%B1%D8%B3%DB%8C-%D9%85%D8%B4%D8%AE%D8%B5)

[mahvar01]

فرم رو ساختم حالا می خوام دکمه close رو از روی فرم بردارم نمی تونم

[Ali Parsaei]

فرم رو ساختم حالا می خوام دکمه close رو از روی فرم بردارم نمی تونم
دگمه قرمز ضربدر بالاي فرم منظورتان است؟ يعني با اون دگمه نتوان فرم را بست؟

[mahvar01]

دگمه قرمز ضربدر بالاي فرم منظورتان است؟ يعني با اون دگمه نتوان فرم را بست؟

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

[Ali Parsaei]

از اين کد استفاده کنيد:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then Cancel = 1
End Sub

[mahvar01]

ممنونم..