Семейство программного обеспечения Майкрософт для работы с электронными таблицами, оснащенное инструментами для анализа, построения диаграмм и обмена данными.
Добрый день
По написанию макросов Вам лучше обратиться на форум MSDN. Там сообщество в основном состоит из разработчиков, которые смогут подсказать Вам правильный синтаксис. Попробуйте использовать вот такой вариант:
Sub insert_image()ActiveSheet.Pictures.Insert ("C:\example\1.jpg")With ActiveSheet.Shapes(ActiveSheet.Shapes.Count).LockAspectRatio = TrueEnd WithEnd Sub