| Вопрос: поиск листа в книге | Добавлено: 15.02.08 08:58 |
Автор вопроса:  Таня | ICQ: 410031407 |
|
Подскажите, пожалуйста, как написать процедуру в VBA?
Есть книга, открываем ее, ищем лист ("Таня"), если находим- открываем, если нет - создаем, присваиваем имя ("Таня")и открываем. Заранее спасибо |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  Jasmin Вопросов: 23 Ответов: 417 |
Профиль | | #1 | Добавлено: 15.02.08 10:50 |
|
Sub Macro1()
Dim sh As Worksheet Dim prExists As Byte Workbooks.Open Filename:="Полный путь к имени файла и имя файла" prExists = 0 For Each sh In Worksheets If sh.Name = "Таня" Then sh.Activate prExists = 1 End If Next If prExists = 0 Then Set sh = Sheets.Add sh.Name = "Таня" End If End Sub |
||
Страница: 1 |