PRJ41: "Out Of Memory" Adding Task or Resource in Macro

CAUSE

This problem occurs if you use the Add method of the Tasks collection, or the Resource collection, without specifying a name argument.

For example, if you run the following macro in Microsoft Project, you receive these error messages:

   Sub Test()
      Projects(1).Tasks.Add
   End Sub
				

Although the Help topic for the Add method indicates that this argument is required, it also states that by default, the name argument is Empty.

In Microsoft Project version 4.0, you can add a task or resource using the Add method without specifying a name argument. In this case, a task or resource is added without a task name or resource name.

   Sub Test()
      ' Add task "Task1"
      Projects(1).Tasks.Add "Task1"
   End Sub
				

   Sub Test()
      ' Add blank task
      Projects(1).Tasks.Add ""
   End Sub
				

Sub Test()

   Dim x As Object, y As Object
   Set x = GetObject("", "MSProject.Application")
   x.FileNew
   Set y = x.Projects(1).Tasks.Add ""
 
End Sub