Compartir a través de

Propiedad Resource.MaxUnits (Project)

  • Artículo

Obtiene o establece el porcentaje máxima disponibilidad del recurso. Variante de lectura y escritura.

Sintaxis

expresión. MaxUnits

Expresión Variable que representa un objeto Resource .

Comentarios

La disponibilidad porcentual se especifica en la columna Unidades de la fila actual de la cuadrícula Disponibilidad del recurso en el cuadro de diálogo Información del recurso. La fila actual es aquélla en la cual el rango entre las columnas Disponible desde y Disponible hasta incluye la fecha actual.

La propiedad MaxUnits no devuelve ninguna información significativa para recursos materiales. Si se establece un valor devuelve un error capturable (código de error 1101) cuando se aplica a recursos materiales.

Ejemplo:

En el ejemplo siguiente se establecen las unidades máximas de cada recurso del proyecto activo en un número especificado por el usuario.

Sub SetDefaultMaxUnits() 
 
 Dim Entry As String ' Maximum units specified by user 
 Dim R As Resource ' Resource object used in loop 
 
 Entry = InputBox$("Enter the default maximum units for each resource.") 
 
 If IsNumeric(Entry) Then 
 For Each R In ActiveProject.Resources 
 R.MaxUnits = Entry 
 Next R 
 Else 
 MsgBox ("You didn't enter a numeric value.") 
 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.