cliffwms
02-26-2010, 12:18 PM
I am trying to set up my worksheets so that when a specific sheet becomes the active sheet the application width is changed to a specifc setting. I am trying:
Sub ChangeMID_DAYReportWidth()
Dim worksheet1 As Excel.Worksheet = _
CType(Me.ActiveSheet, Excel.Worksheet)
Application.Width = 600
Application.Height = 825
End Sub
but it's not working
Sub ChangeMID_DAYReportWidth()
Dim worksheet1 As Excel.Worksheet = _
CType(Me.ActiveSheet, Excel.Worksheet)
Application.Width = 600
Application.Height = 825
End Sub
but it's not working