2014-02-03 3 views
-4

Я читал различные сообщения о запуске макроса, который бы вставлял изображения продукта в лист на основе детали в ячейке. На моем листе должно быть изображение, отображаемое в ячейке A3, на основе подробных деталей SKU в B3. Все мои изображения хранятся в формате F: \ Images \ У меня будет около 500 SKU, для которых все нужны изображения и будут называться такими же, как SKU I, которые входят в колонку B.VBA Script, чтобы вставить изображение

Это для листа продукта, и если у кого-нибудь есть сценарий, который я мог бы использовать, это уже было написано, что было бы замечательно.

+1

это то, что вам нужно [Как я могу заполнить ячейку Excel изображением?] (http: /stackoverflow.com/questions/19448727/how-can-i-populate-an-excel-cell-with-an-image) –

+0

нет, это не похоже на то, что мне нужно, но потом снова я мог быть запутанным как это для меня все ново. Проще говоря, я хочу, чтобы изображение помещалось в ячейку A3 на основе SKU, введенного в ячейку B3. все изображения хранятся в папке в каталоге, расположенном на моем сервере. – user3267770

+0

Пожалуйста, [см. Это] (http://stackoverflow.com/help/on-topic) и [это] (http://meta.stackexchange.com/questions/156810/stack-overflow-question-checklist) – ARich

ответ

1

Вы можете попробовать

Sub InsertPicture() 

    Range("A3").Select 
    ActiveSheet.Pictures.Insert ("F:\Images\" & Range("A2")) 

End Sub 

Для вставки одного изображения в A3 на основе имени, представленной в А2. Убедитесь, что имя, указанное в A2, имеет расширение, например .jpg или .bmp.

В вашем вопросе вы упомянули, что ваши данные хранились в столбце B? если вам нужно заполнить все изображения в столбце B в столбец C, вы можете просто изменить код, используя цикл for

+0

I нужно что-то прояснить, я новичок в сценарии. Я вставил скрипт, как указано выше, и получил ошибку времени выполнения. «Вставить метод класса изображений не удалось». Не уверен, что это проблема, которую я создал. – user3267770

+0

Скорее всего, потому, что он не может найти каталог вашего изображения. Если ваше изображение называется «Foo.jpg», внутри этих скобок он должен сказать «F: \ Images \ Foo.jpg». Если Range B2 просто говорит «Foo», тогда он попытается открыть «F \ Images \ Foo» и выйдет из строя ... поэтому убедитесь, что у вас есть правильное расширение – Silenxor

+0

Not конечно, если бы я был в моем первом сообщении. Если у меня есть «27736» в D3, я бы хотел, чтобы макрос искал «27736.jpg» в C: \ Images и возвратил этот файл как изображение в A3. Любые идеи? – user3267770

Смежные вопросы