Копирование картинок и создание папок VBA

[STYDENT13]

незнаю возможно это или нет, нужно что бы по введеной информации в форму создавалась папка и по нажатию на кнопку в эту папку можно было скопировать необходимые картинки. Сама процедура поиска и копирования есть, проблема заключается в сохранении в созданную папку, я не знаю как обратиться к этой папке .

Заранее премного благодарен

[VictorM]

Возможно все.
Ну если уж Вы основное сделали, то предлагагаю посмотреть вот это Файлы и папки
И вот это Как отобразить диалоговое окно, позволяющее выбрать нужную папку
Вот ЗДЕСЬ еще...

[STYDENT13]

Спасибо, но возможно ли сделать так что бы не выбирать в диалогом окне папку куда сохранять. У меня оно сейчас копируестя по пути который я сам прописал, а необходимо что бы копировалось в вновь созданную папку имя которой до заполнения формы не известно. Можно ли при заполнении формы по оному из полей формы создавалась папка и уже туда автоматически копировалисть выбранные файлы?

[Hugo121]

Можно имя созданной паки хранить в публичной переменной.

[VictorM]

По вышеуказанной ссылке ищем
Как создать папку, каталог ?

MkDir "C:\Мои документы\Архив\Документы\Счета"
Примечание : Если папка уже существует или указан несуществующий путь "C:\Мои документы\Архив\Документы\", то при использовании инструкции MkDir Вы получите ошибку, которую можно избежать, если использовать :
Private Sub My_MkDir(iPath$)
iStart& = 1 '3
iPathSeparator$ = Application.PathSeparator '"\"
iPath$ = iPath$ & _
IIf(Right(iPath$, 1) = iPathSeparator$, "", iPathSeparator$)
Do
iStart& = InStr(iStart& + 1, iPath$, iPathSeparator$)
iTempPath$ = Mid(iPath$, 1, iStart&)
If Dir(iTempPath$, vbDirectory) = "" Then _
MkDir iTempPath$
Loop While iStart& <> 0
End Sub
Пример вызова вышеопубликованной авторской процедуры :
Private Sub Call_My_MkDir()
My_MkDir "C:\Мои документы\Архив\Документы\Счета" 'Or
'My_MkDir "C:\Мои документы\Архив\Документы\Счета\"
End Sub
Комментарий : Путь обязательно должен содержать существующий диск.

а дальше - как пишет Hugo121

[Lugovaya]

Student13 а можно поподробнее о копировании картинок. Нужно с одного листа перенести на другой несколько картинок. Как понять какая это картинка? По месту положения можно?