🚀 go-pugleaf

Thanks Karthik,

Ok. The script I have is below. If there is an unassigned story,(not part of an assignment), it will delete the story, but I get the following error. Is there a way to have it ignore if stories are not assigned? Also, could it delete multiple assignments? Right now it only does one at a time and then I have to run the script again. Thanks, Mike

Error Number: 48645
Erro String: The Unassigned InCopy Content cannot be deleted.
Line: 14

Set myind = CreateObject("InDesign.Application.CS2")
Set mydoc = myind.ActiveDocument
   For Each mylink In mydoc.Links
        If mylink.LinkType = "InCopyInterchange" Then
            mypath = mylink.FilePath
            myfilename = mylink.Name
            mylen = Len(mypath) - Len(myfilename)
            myincname = Mid(mypath, 1, mylen)
            myincname = myincname & "*.incx"
            mylink.Unlink
        End If
    Next
    Set myinc = mydoc.Assignments(1)
      myinc.Delete