16:42

примитивное не страшно, главное - чтоб надежно (с)
Люди добрые, как в VB/VBA определить, открыт файл или нет? В частности, книга Excel.


Комментарии
16.02.2006 в 17:02

мне сказали, что ты меня все еще любишь
А в VBA зачем? По Workbooks.Open Filename:="имя файла.xls", если он уже открыт, активирует окно, если нет, то откроет. Или тебе для сетевого многопользовательского режима?



В VB проще всего поставить On Error на Open - неаккуратненько, но в ехе-шнике все равно никто не видит:)
16.02.2006 в 17:12

примитивное не страшно, главное - чтоб надежно (с)
DDD , мне наоборот, нужно, чтоб он был закрыт (если существует, но это я знаю, как проверить с помощью dir), чтоб kill <имя файла> :)



не, у меня будет не ехе-шник, амакрос в книге. Будет брать из одной книги данные и автоматически рисовать штук 80 графиков на четырех листах новой книги, которую должен сохранять под одним и тем же именем. Соответственно, если прежний файл существует, его нужно убить.
16.02.2006 в 17:23

примитивное не страшно, главное - чтоб надежно (с)
эврика! :ura::ura::ura::ura::ura:



Sub one()



For i = 1 To Workbooks.Count

With Workbooks(i)

If .Name = "G.xls" Then

.Close



End If

End With

Next i



End Sub