Hi
I have the following code which does not work.
Public Sub CopyDepToDep()
Dim dep1 As Project
Dim dep2 As Project
Dim temp1 As Template
Dim temp2 As Template
Set dep1 = MyWorkspace.Application.Projects.Item("DEP01")
Set dep2 = MyWorkspace.Application.Projects.Item("DEP02")
Set temp1 = dep1.Templates.Item("DEP-OVS")
Set temp2 = dep2.Templates.Create("DEP-OVS_copy", False)
Debug.Print "temp copy result: " & temp2.Copy(temp1)
End Sub
Copy returns False and the DEP-OVS_copy template is a default template.
If I change temp2 so it is within the same project like this:
Set temp2 = dep1.Templates.Create("DEP-OVS_copy", False)
It works!
Is it not possible to copy across project? Is there a workaround?
Edit: I use 6.22 SP1 Build 8