Создать поочередно заранее неизвестное количество листов в книге - Microsoft Office Excel

ShamanK · 01.05.2010, 18:31

всем привет, подскажите как лучше сделать

есть скрипт который создает новые учетные записи
под каждую учетную запись он должен создать отдельный лист и присвоить ему уникальный ID номер..
после ведется работа с листами по этому ID

макрос в экселе записал так:

Код:

    Sheets.Add After:=Sheets(Sheets.Count)
    Sheets("Лист6").Select
    Sheets("Лист6").Name = "1"

листов уже было 5 и он создал 6 лист.
а как программно выделять только что созданный лист и переименовывать его, не зависимо от того какой у него номер?

ShamanK · 01.05.2010, 18:40

Цитата:

Сообщение от ShamanK

всем привет, подскажите как лучше сделать

есть скрипт который создает новые учетные записи
под каждую учетную запись он должен создать отдельный лист и присвоить ему уникальный ID номер..
после ведется работа с листами по этому ID

макрос в экселе записал так:

Код:

    Sheets.Add After:=Sheets(Sheets.Count)
    Sheets("Лист6").Select
    Sheets("Лист6").Name = "1"

листов уже было 5 и он создал 6 лист.
а как программно выделять только что созданный лист и переименовывать его, не зависимо от того какой у него номер?

все спасибо - разобрался.. нашел этот пример http://programmersforum.ru/showthrea...9+%EB%E8%F1%F2
он очень даже подходит.

01.05.2010, 18:31	#1
ShamanK Пользователь Регистрация: 16.10.2009 Сообщений: 90	Создать поочередно заранее неизвестное количество листов в книге всем привет, подскажите как лучше сделать есть скрипт который создает новые учетные записи под каждую учетную запись он должен создать отдельный лист и присвоить ему уникальный ID номер.. после ведется работа с листами по этому ID макрос в экселе записал так: Код: `Sheets.Add After:=Sheets(Sheets.Count) Sheets("Лист6").Select Sheets("Лист6").Name = "1"` листов уже было 5 и он создал 6 лист. а как программно выделять только что созданный лист и переименовывать его, не зависимо от того какой у него номер?

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Макрос для всех листов в книге	Rok	Microsoft Office Excel	5	26.04.2010 08:55
Найти количество страниц в книге	HIP-H0P	Паскаль, Turbo Pascal, PascalABC.NET	1	19.04.2010 21:06
Получить имена всех листов в книге	Temnota	Microsoft Office Excel	6	26.12.2009 07:36
Удаление листов в книге по определённым условиям	inside9	Microsoft Office Excel	2	07.08.2009 13:37
Сравнение листов в книге, и копирование значений	Josser	Microsoft Office Excel	10	22.07.2009 08:26