Compartir a través de


Método Application.AppSize (Project)

Establece el alto y el ancho de la ventana principal.

Sintaxis

expresión. AppSize( _Width_, _Height_, _Points_ )

expresión Variable que representa un objeto Application.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
Width Opcional Long Expresión numérica que especifica el nuevo ancho de la ventana principal.
Height Opcional Long Expresión numérica que especifica el nuevo alto de la ventana principal.
Points Opcional Boolean True si Width y Height se miden en puntos. False si se miden en píxeles. El valor predeterminado es False.

Valor devuelto

Boolean

Ejemplo:

En el siguiente ejemplo, se mueve la ventana principal de Project a la izquierda la mitad de la pantalla.

Sub MoveMainWindowToLeftHalf() 
 
    Dim WindowHeight As Long 
     
    ' Remember the height when maximized. 
    Application.WindowState = pjMaximized 
    WindowHeight = Application.Height 
     
    AppSize Width:=UsableWidth / 2, Height:=UsableHeight, Points:=True 
    Application.Left = 0 
    ' Be sure the window uses all the available height. 
    If Application.Height < WindowHeight Then Application.Height = WindowHeight 
     
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.