Добрый день!
Может кто нибудь подсказать, как можно сохранить ячейку в виде картинки с названием картинки из этой же ячейки.
Т.е фактически если это делать в ручную, я выбираю нужную ячейку, копирую ее, нажимаю специальная вставка, выбираю вставить как картинку, потом сохраняю ее с именем из ячейки. Можно ли как то сделать это автоматом.
Т.е как бы получается мне нужно сделать много картинок из текста который находится в каждой ячейке
Код |
---|
Sub Макрос1()
Range("C2").Select
Selection.Copy
Range("D2").Select
ActiveSheet.Pictures.Paste.Select
ActiveSheet.Shapes.Range(Array("Picture 3")).Select
End Sub |
вот по факту нужно вот так, только чтоб он еще сохранил картинку с именем файла из ячейки С2. И потом прошел так же по всем ячейкам с3, с4, с5 и..т.д