|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
07.05.2008, 12:29 | #1 |
Регистрация: 07.05.2008
Сообщений: 4
|
Условие на открытие файла Excel
Друзья, помогите, не могу справиться.
Чтобы обратиться из одной книги в другую пользуюсь следующей процедурой, точнее ей открываю нужный файл. Проблема в том, что бывает файл нужный уже открыт и вновь обращаться к процедуре нет необходимости. Не могу написать условие которое позволяло бы при закрытом файле обращаться к этой процедуре, а если книга активна обращаться к ней минуя эту процедуру. Заранее спасибо! Sub GetOpenFilename() Filt = "База (*.xls),*.xls" FilterIndex = 1 Title = "Выберите файл для загрузки данных" FileN = Application.GetOpenFilename _ (FileFilter:=Filt, _ FilterIndex:=FilterIndex, _ Title:=Title, _ MultiSelect:=False) If FileN = False Then MsgBox "Файл не выбран." Exit Sub End If End Sub |
07.05.2008, 13:03 | #2 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
После получения имени файла с помощью Вашей процедуры, перед тем, как открывать файл, можно воспользоваться следующим вариантом:
Код:
Чем шире угол зрения, тем он тупее.
|
07.05.2008, 13:36 | #3 |
Регистрация: 07.05.2008
Сообщений: 4
|
Благодарю за помощь!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Открытие Excel файла на текущей дате | Million | Microsoft Office Excel | 2 | 04.09.2008 20:37 |
Открытие Excel файла на текущей дате | Million | Помощь студентам | 1 | 04.09.2008 06:44 |
Открытие Excel-книги | Леон | Microsoft Office Excel | 1 | 04.07.2008 09:14 |
Открытие файла | Messir_Leonard | Win Api | 2 | 09.04.2008 19:33 |
Открытие файла | Lexakazanskij | Паскаль, Turbo Pascal, PascalABC.NET | 9 | 01.11.2007 22:27 |