一、应用程序窗口最大化显示

　　Sub wdstate()

　　Application.WindowState = xlMaximized

　　End Sub

　　二、应用程序窗口最小化显示

　　Sub wdstate()

　　Application.WindowState = xlMinimized

　　End Sub

　　三、应用程序窗口正常模式显示

　　Sub wdstate()

　　Application.WindowState = xlNormal

　　End Sub