VBA (Excel) - создание листов / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBA (Excel) - создание листов

5 сообщений из 5, страница 1 из 1

VBA (Excel) - создание листов

#33256203

Elenka23

Гость

Помогите решить одну проблему...
Необходимо программно создать новый лист в Excel и назвать его так, как захочет пользователь... но пользователь может ввести что-нибудь неподходящее, к примеру скобки [] и т.п. Тогда Excel выдает ошибку (Run-time error '1004'. Во время переименования листа или диаграммы было введено неправильное имя), и выполнение кода прекращается... Оставшийся код не выполняется... Вобщем получается ерунда... Как программно проверить заранее, что ввел пользователь или поймать эту ошибку?

...

Рейтинг:

0 / 0

07.09.2005, 13:15:36

| Ответить | Цитировать | Написать

VBA (Excel) - создание листов

#33256319

e121

Участник

Сообщения: 109

Рейтинг: 0 / 0

Допустим, для ввода имени листа используется Input
Ввод имени загоняется в бесконечный цикл, который прервется, когдаа name станет нормальным.
Проверять введенное значение на предмет недопустимых символов.

...

Рейтинг:

0 / 0

07.09.2005, 13:40:56

| Ответить | Цитировать | Написать

VBA (Excel) - создание листов

#33256331

Antonariy

Участник

Откуда: ☭

Сообщения: 80 221

Рейтинг: 0 / 0

Код: plaintext

1.
2.
3.
4.
5.
6.
7.

On Error Goto errh
tryagain:
sheetname = Inputbox("Введите название листа")
Set sh = Sheets.Add
sh.Name = sheetname
Exit Sub
errh:
If Err.Number= 1004  Then Resume tryagain

...

Рейтинг:

0 / 0

07.09.2005, 13:43:31

| Ответить | Цитировать | Написать

VBA (Excel) - создание листов

#33256341

Antonariy

Участник

Откуда: ☭

Сообщения: 80 221

Рейтинг: 0 / 0

Так лучше

Код: plaintext

1.
2.
3.
4.
5.
6.
7.

Set sh = Sheets.Add
On Error Goto errh
tryagain:
sheetname = Inputbox("Введите название листа")
sh.Name = sheetname
Exit Sub
errh:
If Err.Number= 1004  Then Resume tryagain

...

Рейтинг:

0 / 0

07.09.2005, 13:45:23

| Ответить | Цитировать | Написать

VBA (Excel) - создание листов

#33256437

Elenka23

Гость

Спасибо большое, все получилось!!! :)

...

Рейтинг:

0 / 0

07.09.2005, 14:13:52

| Ответить | Цитировать | Написать

5 сообщений из 5, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBA (Excel) - создание листов

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?desktop=1&fid=60&tid=2167231]:	0ms
get settings:	9ms
get forum list:	18ms
check forum access:	4ms
check topic access:	4ms
track hit:	70ms
get topic data:	12ms
get forum data:	3ms
get page messages:	54ms
get tp. blocked users:	2ms
others:	227ms

total:	403ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы