А в VBA зачем? По Workbooks.Open Filename:="имя файла.xls", если он уже открыт, активирует окно, если нет, то откроет. Или тебе для сетевого многопользовательского режима?
В VB проще всего поставить On Error на Open - неаккуратненько, но в ехе-шнике все равно никто не видит:)
примитивное не страшно, главное - чтоб надежно (с)
DDD , мне наоборот, нужно, чтоб он был закрыт (если существует, но это я знаю, как проверить с помощью dir), чтоб kill <имя файла>
не, у меня будет не ехе-шник, амакрос в книге. Будет брать из одной книги данные и автоматически рисовать штук 80 графиков на четырех листах новой книги, которую должен сохранять под одним и тем же именем. Соответственно, если прежний файл существует, его нужно убить.
-
-
16.02.2006 в 17:02В VB проще всего поставить On Error на Open - неаккуратненько, но в ехе-шнике все равно никто не видит:)
-
-
16.02.2006 в 17:12не, у меня будет не ехе-шник, амакрос в книге. Будет брать из одной книги данные и автоматически рисовать штук 80 графиков на четырех листах новой книги, которую должен сохранять под одним и тем же именем. Соответственно, если прежний файл существует, его нужно убить.
-
-
16.02.2006 в 17:23Sub one()
For i = 1 To Workbooks.Count
With Workbooks(i)
If .Name = "G.xls" Then
.Close
End If
End With
Next i
End Sub