Под ред код в горния коментар имам предвид oOLEWd.ShapeRange.ScaleHeight 1, документацията на msoCTrue на уебсайта на Microsoft предполага, че не можете да използвате msoCTrue във VBA, но може да съм разбрал погрешно.

person Claude Hitech    schedule 15.09.2017    source източник