Aleksandr_r
Ученик
- Регистрация
- 5 Авг 2008
- Сообщения
- 1
- Реакции
- 0
- Баллы
- 0
Добрый день!!
Помогите пожалуйста.
Есть код:
iFilePicture$ = "C:\MyPicture.gif"
With Worksheets(1).Pictures.Insert(FileName:=iFilePicture$)
.Top = 50
.Left = 100
.Width = 250
.Height = 250
End With
Он вставляет определенную картинку из определенного места. Код работает если листы не защищены, а если какой, либо лист защищаешь он выдает ошибку.
Как сделать, так что бы картинка выбиралась и работала когда лист защищен.
Заранее cпасибо.
Помогите пожалуйста.
Есть код:
iFilePicture$ = "C:\MyPicture.gif"
With Worksheets(1).Pictures.Insert(FileName:=iFilePicture$)
.Top = 50
.Left = 100
.Width = 250
.Height = 250
End With
Он вставляет определенную картинку из определенного места. Код работает если листы не защищены, а если какой, либо лист защищаешь он выдает ошибку.
Как сделать, так что бы картинка выбиралась и работала когда лист защищен.
Заранее cпасибо.