Método Application.TimescaleNonWorkingEx (Project)

Establece el formato de los períodos no laborables, donde los valores de color pueden ser valores RGB hexadecimales.

Sintaxis

expresión. TimescaleNonWorkingEx( _Draw_, _Calendar_, _Color_, _Pattern_ )

Expresión Expresión que devuelve un objeto Application .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Draw	Opcional	Integer	Cómo los tiempos de descanso se indican en relación con las barras de Gantt. Puede ser una de las constantes PjNonWorkingPlacement siguientes: pjBehind, pjInFront o pjDoNotDraw.
Calendar	Opcional	String	Nombre del calendario al que se va a aplicar formato.
Color	Opcional	Long	Color de los períodos no laborables. Puede ser un valor hexadecimal del color RGB, en el que el último byte representa el color rojo. Por ejemplo, el valor &HFF0000 es azul y &H00FFFF, el amarillo.
Pattern	Opcional	Integer	Trama de los períodos no laborables. Puede ser una de las constantes PjFillPattern.

Valor devuelto

Boolean

Comentarios

Usa el método TimescaleNonWorkingEx sin especificar ningún argumento, muestra el cuadro de diálogo escala temporal con la ficha período no laborable seleccionada.

Ejemplo

En el ejemplo siguiente, se dibuja el período no laborable detrás de las barras de tarea en color rojo claro.

Sub Timescale_NonWorking() 
    ' Sets nonworking time behind the task bars to red. 
 
    'Activate Gantt Chart. 
    ViewApply Name:="&Gantt Chart" 
    TimescaleNonWorkingEx Draw:=pjBehind, Color:=&HAAAAFF 
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.