Добрый день. Есть файл, куда надо в определенные места вставлять определенные картинки в больших количествах. При чем для каждой строчки должна быть вставлена своя картинка.На данный момент есть такой кусочек кода:
Код |
---|
Sub Test()
Dim a1 As String
Dim a2 As Integer
a2 = Selection.Row
a1 = a2
Sheets("Лист1").Select
If ActiveSheet.Pictures.Count = 0 Then
Range("A30").Select
ActiveSheet.Pictures.Ins ert("C:\Users\user\Desktop\Metall\1.jpg").Sele ct |
В ссылке, вместо 1.жпг я хочу вставить переменную а2, чтобы в зависимости от ее значения в папке, которая прописана выбирался файл с цифрой равной переменной.
--
Сам в VBA не силен, потому очень прошу помощи.
С уважением.