• Anna
  • Восстановленный участник
  • На форуме с 23 июля 2004г.
  • Сообщений: 5
  • Спасибо: 0

Тема: Как вызвать "проводник"?

стандартный поиск ( через проводник) файла и считываение его пути...
я только-только начала в VBA разбираться - можно не отсылать меня на сайты, где есть "ПОЧТИ" такие скрипты...
плиииз....

  • DVAD
  • Восстановленный участник
  • На форуме с 15 июля 2004г.
  • Сообщений: 58
  • Спасибо: 0

Re: Как вызвать "проводник"?

я делал так для выбора книги Excel

Dim CMD As New CommonDialog
Dim PathToFile as String
With CMD
       .InitDir = CurDir
       .CancelError = True
       On Error GoTo Donothing
       .DefaultExt = "xls"
       .Flags = cdlOFNFileMustExist
       .FileName = "*.xls "
       .Filter = "????? Microsoft Excell (*.xls)"
       .ShowOpen
End With
PathToFile = CMD.FileName

  • bender
  • Восстановленный участник
  • На форуме с 5 мая 2003г.
  • Сообщений: 345
  • Спасибо: 0

Re: Как вызвать "проводник"?

Функция вызова стандартных окон "Открыть файл" и "Сохранить файл" из библиотеки comdlg32.dll.
http://www.cad.dp.ua/stats/a_vba/acobject.html#API OPENFILENAME