Страница: 1 |
Вопрос: Получить имя файла | Добавлено: 05.05.11 18:16 |
Автор вопроса: ![]() |
Коллеги, доброго времени суток.
Чет я в раздумьях... Надо запросить имя файла, открыть его в EXCEL'e, поправить и закрыть, сохранив там же, где лежал исходный файл, но с в текстовом виде. В хелпе нашел конструкцию: Sub Макрос1()
Dim file_name As String file_name = Application.Dialogs(xlDialogOpen).Show a = MsgBox("Имя файла = " & file_name, vbOKOnly, "Имя файла") End Sub Однако file_name = FALSE. Как получить имя с путями? EXCEL 2010. |
Ответы | Всего ответов: 5 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 226787316 Вопросов: 3 Ответов: 5 |
Профиль | Цитата | #1 | Добавлено: 05.05.11 18:22 |
Сорри, file_name = TRUE. Вопрос тот же ![]() |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 7 Ответов: 73 |
Профиль | Цитата | #2 | Добавлено: 05.05.11 20:02 |
исполуйзуй лучше другой метод - GetOpenFileName, а то с этим методом много геммороя ![]() |
Номер ответа: 3 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 226787316 Вопросов: 3 Ответов: 5 |
Профиль | Цитата | #3 | Добавлено: 06.05.11 09:07 |
Спасибо. |
Номер ответа: 4 Автор ответа: ![]() ![]() Вопросов: 0 Ответов: 1 |
Web-сайт: Профиль | Цитата | #4 | Добавлено: 09.05.11 02:40 |
Спасибо, а то я тоже искала решение такой проблемы. |
Номер ответа: 5 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 4 Ответов: 457 |
Web-сайт: Профиль | Цитата | #5 | Добавлено: 10.05.11 15:15 |
дело в том, что вызов стандартного диалога не возвращает имя файла, а логическое завершение вызова (так, для диалога Open это будет true если в результате вызова мы нажали "Открыть", а иначе если "Отмена" или крест на диалоге - false, т.к. по итогам вызова диалога мы не открыли книгу, а отказались). Тут более логично сразу по закрытии диалога проверять имя активной книги, ведь если мы открываем стандартным диалогом, то открывшаяся книга станет активной. Аналогично и для других диалогов (встроенных).
Как, собственно, тут и предложили... |
Страница: 1 |
|