My goal is to move the activecell to the first empty task in the project, in other words to the end of the project plus one. This is what I've tried so far: Dim t As Task Dim num As Long For Each t In ActiveProject.Tasks num = t.UniqueID If num = 0 Then EditGoTo ID:=ActiveProject.Tasks(num).UniqueID Call openpfile Call buildparrays End If Next t Project nevers finds a unique id of 0(zero) plus I've tried NOT(isnumeric(t)) and I've also tried t.name = "" Is it possible to refer to an empty cell/row? Any suggestions, your help is greatly appreciated!
see my reply in the developer group (where I replied before you even posted here!) You can address an empty CELL in an existing task but IMHO not an empty ROW (the related task is a Nothing object) HTH -- Jan De Messemaeker Microsoft Project Most Valuable Professional http://users.online.be/prom-ade/ +32-495-300 620 "Ruth" schreef in bericht news:1136561011.273751.110020@z14g2000cwz.googlegroups.com... > My goal is to move the activecell to the first empty task in the > project, in other words to the end of the project plus one. This is > what I've tried so far: > > > Dim t As Task > Dim num As Long > For Each t In ActiveProject.Tasks > num = t.UniqueID > If num = 0 Then > EditGoTo ID:=ActiveProject.Tasks(num).UniqueID > Call openpfile > Call buildparrays > End If > Next t > > > Project nevers finds a unique id of 0(zero) plus I've tried > NOT(isnumeric(t)) > > > and I've also tried > > > t.name = "" > > Is it possible to refer to an empty cell/row? > Any suggestions, your help is greatly appreciated! >
