با تشکر از دوستان
لطف کردین
حل شد
همینا رو می نوشتم.اما جواب نمی داد.که دیگه الان درست شد
با تشکر از دوستان
لطف کردین
حل شد
همینا رو می نوشتم.اما جواب نمی داد.که دیگه الان درست شد
اگه میخوای یزر فرم هنگام باز کردن لود بشه چند تا شرط لازمه
ایک اولا باید یوزرر فرم دکمه کنترلی نداشته باشه
دو یوزر فرم هنگام لود شدن ماکیزمایز باشه
سه برای ورور می تونی چند تا کار انجام بدی یک botton و یک فثطف باکس قرار دی و شرط بذاری که اگه مقدار تکس باکس برابر با کدی بود که شما تعریف می کنید اون موقع بتونه وارد محیط اکسل بشه ای کار هارو من در سر رسیدی که طراحی کردم و در لینک
http://amar80.blogfa.com/9003.aspx
اون را دانلود کنید قفل اونا بشکنید و خیلی مطالب میشه ازش یاد گرفت
سلا فرم را که میذاریم هنوز کلید کنترلی داره و باید کلید های کنترلب را حذف کرد و با alt+f4 را بست
اگه فایل ساده ای به عنوان نمونه قرار بدید ممنون میشم این فایل های ساده نسبت به برنامه های پیچیده ارزش اموزشی بالاتری دارند به علت سهولت در درک نحوه عملکرد
با درود به همه
اگه بخوایم موقع باز شدن اکسل باز نشه و هر وقت خودمون خواستیم با زدن یک کلید باز بشه چه کدی باید نوشته بشه؟
من یک فرم درست کردم ولی کدهاش رو بلد نیستم بنویسم. آخه VBA کار نکردم. اگه امکانش هستبرام کدهاش رو بنویسید و توضیح هم بدید. سپاسگزارم.اینم لینک دانلودش
http://www.uplooder.net/cgi-bin/dl.cgi?key=be5b09d9f6864c9d79e46eefa5e47560
با درود
استاد شمس بسیار عالی توضیح دادن
در قسمت workbook همون جایی که نوشتیم userform1.show در event بازشدن workbook کد زیر را بنویسین
[undefined=undefined]
Private Sub Workbook_Open()
Application.Windows.Application.Visible = False
UserForm1.Show
End Sub
کد خط اول اکسلتون رو از visible خارج میکنه و همین خط رو در اون قسمت که کلید رو تو یوزر فرم میزارین و میگین اگه پسورد درست بود فلان کار رو انجام بده (اگه پس دارین) بنویسین و فقط به جای
false بنویسین true
این کار رو درست انجام بدین حله.
سلام
اگر هم با یک کلید میخواین اجرا بشه. اول یک shape بذارید.بعد یک module بنویسید با این کد:
sub namayesh()
userform1.show
end sub
بعد روی shape کلیک راست کنید و assign رو بزنید و ماکرو namayesh را انتخاب کنبد.
اینطوری با هربار زدن کلید مورد نظر، فرم نشان داده میشه
سپاسگزارم دوست عزیز
در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)
علاقه مندی ها (Bookmarks)