|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
19.05.2011, 20:15 | #1 |
Новичок
Джуниор
Регистрация: 19.05.2011
Сообщений: 2
|
найти и открыть файл... взять значение из файла и вывести
Есть шаблон в Excel. При его заполнении он сохраняется на диске D. нужно организовать поиск на диске.. т.е. проверить существует ли заданный файл, а в последующем открыть его или просто взять значение из ячейки и вывести в MsgBox...не открывая найденный файл... Я попыталась организовать это таким оброзом... вроде файл ищет, но не открывает его.
Private Sub CommandButton3_Click() fail1 = InputBox("Введи № Заказа:") papka = "D:\" fail = Dir(papka & "№ Заказ " & fail1 & ".xlsm") If Len(fail) = 0 Then MsgBox "Файл не найден" 'vbCritical: Exit Sub ' нет подходящего файла Set Ex = CreateObject("excel.application") Ex.Workbooks.Open Filename:=papka & "№ Заказ " & fail1 & ".xlsm" Ex.Application.Visible = True End Sub Последний раз редактировалось klukva200808; 19.05.2011 в 20:17. Причина: недовложение файла |
20.05.2011, 12:07 | #2 |
Форумчанин
Регистрация: 11.06.2010
Сообщений: 108
|
можно попробовать так:
Код:
-Возьмите лучших их лучщих!
-Лучшие из лучших зализывают раны... -Тогда, возьмите лучших из худших! |
23.05.2011, 02:36 | #3 |
Новичок
Джуниор
Регистрация: 19.05.2011
Сообщений: 2
|
огромное спасибо!!!! Все получилось!! Ура!!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Найти максимальное значение среди отрицательных элементов и вывести на экран его индексы. | Nursik77 | Помощь студентам | 2 | 08.04.2011 17:23 |
Взять значение ячейки не открывая файл и | kzld | Microsoft Office Excel | 17 | 25.01.2011 07:01 |
Найти часть текста и вывести значение | olga=) | Microsoft Office Excel | 10 | 21.01.2011 11:31 |
Взять имя переменной из файла и присвоить ей значение | ZaRDaK | Помощь студентам | 1 | 11.11.2009 00:33 |
может ли макрос взять данные из файла не открывая сам файл? | kievlyanin | Microsoft Office Excel | 1 | 14.10.2009 19:51 |