Thread: .AddToPowerclip
View Single Post
Old 05-10-2015, 10:42
shark shark is offline
Senior Member
Join Date: Aug 2010
Location: Russia, Belgorod
Posts: 146

it looks like you are fighting for a year on this issue.

Try change Set s1 = d.Selection to Set s1 = ActiveShape. d.selection returns shape with a cdrSelectionShape type.
Reply With Quote