Compartir a través de

Propiedad Window.Caption (Project)

  • Artículo

Obtiene o establece el texto de la barra de título de una ventana del proyecto. String de lectura y escritura.

Sintaxis

expresión. Título

expresión Variable que representa un objeto Window.

Comentarios

Cuando la ventana activa está maximizada, la barra de título muestra el título de las ventanas principal y activa, separando los títulos con un guión. Por ejemplo, si el título de la ventana principal es "Microsoft Project" y el título de la ventana activa es "Proyecto1.mpp", la barra de título mostrará "Project1.mpp - Microsoft Project" cuando se maximice la ventana activa.

Si establece la propiedad Caption en vacío, la barra de título muestra el título predeterminado. El título predeterminado de la ventana principal es "Microsoft Project".

En un proyecto con una ventana, el título predeterminado de la ventana es el nombre de archivo del proyecto. En un proyecto que tiene varias ventanas abiertas, el título predeterminado de cada ventana es name: n, donde name es el nombre de archivo del proyecto y n es un número único para la ventana. Por ejemplo, si la segunda ventana del proyecto "Proyecto1" está activa, la barra de título predeterminada mostrará "Project1.mpp:2 - Microsoft Project".

Ejemplo:

En el siguiente ejemplo, se solicita al usuario que cambie el título de la ventana activa.

Sub ChangeWindowCaption() 
 
 Dim Entry As String ' Caption entered by user 
 
 ' Prompt user for a new caption. 
 Entry = InputBox$("Enter a new caption for the active window (enter 'reset' to set the caption to its default).") 
 
 ' If user chooses the Cancel button, exit Sub procedure. 
 If Entry = Empty Then Exit Sub 
 
 ' Set or reset the caption. 
 If Entry = "reset" Then 
 ActiveWindow.Caption = Empty 
 Else 
 ActiveWindow.Caption = Entry 
 End If 
 
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.