ReSQL.ru
     
powered by simpleCommunicator - 2.0.36     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / закрыть экземпляр книги excel которая уже открыта
22 сообщений из 22, страница 1 из 1
закрыть экземпляр книги excel которая уже открыта
    #39750745
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Ребята здравствуйте! подскажите пожалуйста у меня в проекте происходит проверка открытого файла так
Код: vbnet
1.
2.
3.
4.
5.
6.
If eOpen(App.Path & "\DOCM.xlsx") Then 
    If MsgBox("файл открыт", нажмите кнопку ок и файл закроется принудительно", _
        vbOKCancel + 48, "сообщение") = vbOK Then 

'а вот как ЗАКРЫТЬ его после нажатия кнопки "ок" не ведомо
End If
...
Рейтинг: 0 / 0
20.12.2018, 12:53
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39750939
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Код: vbnet
1.
Workbooks(App.Path & "\DOCM.xlsx").Close

?
...
Рейтинг: 0 / 0
20.12.2018, 16:20
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39750969
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Akina, а без сохранения изменений
...
Рейтинг: 0 / 0
20.12.2018, 17:25
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39750975
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Akina, дело в том что в проекте присутствует такая функция и она ругается
Код: vbnet
1.
2.
3.
4.
5.
Sub Save() 
    If oBook.Saved = False Then 'ругается на строку
        oBook.Save
    End If
End Sub
...
Рейтинг: 0 / 0
20.12.2018, 17:34
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39750984
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Akina, попробовал так что то не получается
Код: vbnet
1.
2.
3.
4.
Sub CloseApplication()
Application.DisplayAlerts = False
Application.Quit
End Sub
...
Рейтинг: 0 / 0
20.12.2018, 17:53
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751001
Фотография by-pass
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
by-pass
Участник
assei,

Когда-то давно писалось, попробуйте.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Private appEx As Excel.Application


Public Function ...

    Set appEx = New Excel.Application
    appEx.Visible = False
    
    With appEx
        .Workbooks.Open sFileName
...
        .ActiveWorkbook.Save
        .ActiveWorkbook.Close
    End With
    appEx.Quit
...
Рейтинг: 0 / 0
20.12.2018, 18:10
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751004
Andy_OLAP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Andy_OLAP
Участник
asseiAkina, а без сохранения изменений
Наверное, так - "oBook.Close savechanges:=False".
...
Рейтинг: 0 / 0
20.12.2018, 18:13
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751196
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
by-pass, да да вы правы, и до сих пор не могу для себя решить этот момент вопрос в уточнении состоит в том : если открыть в ручную файл xl, то при запуске проекта vb6 из проекта у меня не "хватат" познаний для того, что бы решить данный вопрос
что в моём понимании
1. открыт экземпляр файла который НЕ открыт средствами VB6
2. вопрос каким образом обратится к такому экземпляру и закрыть по имени файла

может что то я не правильно понимаю?
...
Рейтинг: 0 / 0
21.12.2018, 11:06
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751198
Фотография by-pass
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
by-pass
Участник
assei,

ИМХО:
Плохая практика закрывать то, что не Вами открыто. Можно потерять данные.
А так, по-видимому, только перебором открытых файлов.
Могу ошибаться, давно уже это было.
...
Рейтинг: 0 / 0
21.12.2018, 11:10
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751200
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
by-pass, ошибка вылазиет
...
Рейтинг: 0 / 0
21.12.2018, 11:12
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751205
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
getobject(excell.application) попробуйте так....
...
Рейтинг: 0 / 0
21.12.2018, 11:27
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751207
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
одна l конечно - ошибся...
...
Рейтинг: 0 / 0
21.12.2018, 11:28
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751211
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Serg197311, попробовал так с вариантом не получается
...
Рейтинг: 0 / 0
21.12.2018, 11:39
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751215
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Serg197311, ну я сразу убрал ошибка таже
...
Рейтинг: 0 / 0
21.12.2018, 11:42
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751224
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
Dim appex as object ??
...
Рейтинг: 0 / 0
21.12.2018, 11:58
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751225
Фотография by-pass
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
by-pass
Участник
assei,

VB у меня не установлен.
Опять таки, могу ошибаться, но вроде нужно подключить соответствующую библиотеку к проекту на VB.
...
Рейтинг: 0 / 0
21.12.2018, 11:59
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751232
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Serg197311, полный пример
...
Рейтинг: 0 / 0
21.12.2018, 12:06
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751234
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Serg197311, та же ошибка что и во втором варианте сообщения [21770323]
...
Рейтинг: 0 / 0
21.12.2018, 12:09
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751283
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Serg197311, у меня получилось так но ошибка в строке:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Public appex As Object
Public Sub Saveарр()
    Set appex = CreateObject("Excel.Application")
    appex.Visible = False
        
        With appex
        .Workbooks.Open (App.Path & "\DOCM.xlsx")
        .ActiveWorkbook.Save  'ошибка здесь
        .ActiveWorkbook.Close
    End With
    appex.Quit
    End Sub
...
Рейтинг: 0 / 0
21.12.2018, 13:08
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751298
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
У меня не VB, а VBA...
У меня работает такой вариант строки, где у вас ошибка -
.save
...
Рейтинг: 0 / 0
21.12.2018, 13:35
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751302
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Serg197311,
...
Рейтинг: 0 / 0
21.12.2018, 13:43
| Ответить | Цитировать | Написать  
закрыть экземпляр книги excel которая уже открыта
    #39751304
assei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
assei
Гость
Serg197311, вот какие ошибки
...
Рейтинг: 0 / 0
21.12.2018, 13:47
| Ответить | Цитировать | Написать  
22 сообщений из 22, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / закрыть экземпляр книги excel которая уже открыта
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&gotonew=1&tid=2154967]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 5ms
check topic access:
 5ms
track hit:
 40ms
get topic data:
 10ms
get first new msg:
 8ms
get forum data:
 2ms
get page messages:
 67ms
get tp. blocked users:
 1ms
others: 9ms
total:  170ms
созд. / загр.: 170ms
x
x
Закрыть


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