تغییر اندازه شیت ها در یک workbook
با درود خدمت اساتید محترم
این کد اندازه پنجره تمام شیت ها را به یک صورت اجرا می کند ایا راهی یا کد دیگر می توان نوشت که 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
کامنت