Propiedad Project.AutoAddResources (Project)
True si los recursos nuevos se crean automáticamente cuando se asignan. False si Project solicita antes de crear nuevos recursos. Boolean de lectura y escritura.
Sintaxis
expresión. AutoAddResources
Expresión Variable que representa un objeto Project .
Ejemplo:
El ejemplo siguiente solicita al usuario que establezca las propiedades AutoAddResources, AutoCalculate, AutoLinkTasks, AutoSplitTasksAutoTrack propiedades y.
Sub PromptForAutoPropertySettings()
Dim I As Integer ' Used in For...Next loop
Dim Prompts(5) As String ' Prompts to display on the screen
Dim Response As Long ' User response to prompt
Dim Responses(5) As Long ' Used to store user responses
' Set each prompt.
Prompts(1) = "Automatically create new resources as they are assigned?"
Prompts(2) = "Automatically recalculate a project when a value, such as a date or cost, changes?"
Prompts(3) = "Automatically link sequential tasks when you cut, move, or insert tasks?"
Prompts(4) = "Automatically split tasks into parts for work complete and work remaining?"
Prompts(5) = "Automatically update the remaining work and cost for a resource when the completion percentage of one of the resource's tasks changes?"
' Display each prompt, and store the user's responses.
For I = 1 To 5
Response = MsgBox(Prompts(I), vbYesNo)
Responses(I) = (Response = vbYes)
Next I
' Set the automatic properties according to the user's responses.
ActiveProject.AutoAddResources = Responses(1)
Calculation = Responses(2)
ActiveProject.AutoLinkTasks = Responses(3)
ActiveProject.AutoSplitTasks = Responses(4)
ActiveProject.AutoTrack = Responses(5)
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.