Thanks, but I don't think it's that simple. It creates a caption for the first uncaptioned object and then gets hung up in the
.MoveEnd wdWord, 1
.MoveStart wdWord, 1
Loop
area. Then I created a new doc with three inlineshapes without creating any captions. The code just hung up and didn't create any captions. The test document is attached.
|