با درود خدمت اساتید محترم
این کد اندازه پنجره تمام شیت ها را به یک صورت اجرا می کند ایا راهی یا کد دیگر می توان نوشت که sheet1 را به اندازه دلخواه و sheet2 را به اندازه دیگر بصورت اتومات با کلیک روی شیت ها اجرا کند . ممنون میشم اگر راهنمایی بفرمایید
Private Sub Workbook_Open()
With Application
.WindowState = xlNormal
.Width = 500
.Height = 500
End With
End Sub
این کد اندازه پنجره تمام شیت ها را به یک صورت اجرا می کند ایا راهی یا کد دیگر می توان نوشت که sheet1 را به اندازه دلخواه و sheet2 را به اندازه دیگر بصورت اتومات با کلیک روی شیت ها اجرا کند . ممنون میشم اگر راهنمایی بفرمایید
Private Sub Workbook_Open()
With Application
.WindowState = xlNormal
.Width = 500
.Height = 500
End With
End Sub
کامنت