با عرض سلام و خسته نباشید خدمت تمامی اساتید و دوستداران اکسل
اساتید زحمت کشیدند کد پنهان سازی اپلیکیشن اکسل رو که در سطر زیر قابل مشاهده است به بنده آموختن حال اگر بخواهیم همان فایل رو آشکار سازیم به چه شکل عمل کنیم.
Private Sub Workbook_Open()
Application.ActiveWorkbook.Application.Visible = False
UserForm1.Show
End Sub
اساتید زحمت کشیدند کد پنهان سازی اپلیکیشن اکسل رو که در سطر زیر قابل مشاهده است به بنده آموختن حال اگر بخواهیم همان فایل رو آشکار سازیم به چه شکل عمل کنیم.
Private Sub Workbook_Open()
Application.ActiveWorkbook.Application.Visible = False
UserForm1.Show
End Sub
کامنت