powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как в VBA можно сделать следующее...
5 сообщений из 5, страница 1 из 1
Как в VBA можно сделать следующее...
    #32391793
Фотография SASH2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подскажите пожалуйста, как в VBA сделать следующее:
Проверить существует ли файл и если не существует то создать его.

Спасибо заранее всем кто поможет!
...
Рейтинг: 0 / 0
Как в VBA можно сделать следующее...
    #32391820
Фотография mahoune
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я думаю поможет совет от Microsoft.
mahoune
...
Рейтинг: 0 / 0
Как в VBA можно сделать следующее...
    #32391848
Фотография SASH2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
C VBA никогда не приходилось работать. А в совете все на английском и ничего не понять. Можно пожалуйста какой-нить пример.
...
Рейтинг: 0 / 0
Как в VBA можно сделать следующее...
    #32391903
Саша.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А чего не понять?
Если переписать так, то будет понятней?

Dim objFSO as Object
Set objFSO = CreateObject("Scripting.FileSystemObject")

If objFSO.FileExists("..Полный путь к твоему файлу..") Then
MsgBox "Файл существует!"
Else
MsgBox "Файл не существует!"
End If
...
Рейтинг: 0 / 0
Как в VBA можно сделать следующее...
    #32391970
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IF len(dir("D:\йцу.xls"))=0 then
' Нет такого файла
end if
У функции DIR есть параметры, с помощью которых можно "регулировать" поиск (файлы/папки, сжатые, системные, архивные, только чтение) путеи сложения соответвующих констант.
Так же можно искать файлы/папки с помощью масок *, ? : dir("D:\йц?.*")
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как в VBA можно сделать следующее...
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]