Программирование переходов между листами в Excel

Если у тя нет ни одного модуля в проекте - добавь и объяви в нем глобальную переменную!! Туда и записывай!! ..оттуда и считывай!!

Честно говоря, я не понял Ваш ответ. Прочитал и почесал затылок. Может привести маленький примерчик с пояснениями. У меня проблема в том, что ни одна литература не описывает полностью все методы и объекты VBA. Как правило там все пишется вскольз. А иногда кратко и ясно. Но для кого ясно? Я подозреваю, что только для автора книги. Я еще не добрался до ООП. Поэтому мне нужно знать команды от и до.
Например,
a = UserForm1.ComboBox.Value 'возвращает значение КомбоБокса переменной а.

Вот это я пойму. Однако кто подскажет, где можно найти описание всего, что может быть написано после ActiveSheet.***
Это касается не только его но и всех других объектов.

'Подскажет' встроенный Help и знание английского языка!!..
Собираешься программировать и дальше - необходимо осваивать..)
Также, как правило, для большинства средств программирования, существуют авторские переводы Help'ов, имхо, не всегда правда корректные(читал один), но все-таки!!..
Так что либо в Help, либо в любимый.. Yandex!!

Я так понял, вы не знаете ответа на мой вопрос. А жаль. Мне срочно нужен ответ. А поиски занимают много времени. Английский я за 1 день не выучу. Похоже я зря ожидал помощи от форума. Как всегда прийдется грызть, грызть, грызть. :eek:

Нет, не зря ожидал. Давай я тебе помогу, только ты, пожалуйста, объясни что требуется. Из первого сообщения в теме не очень это понятно. Возможно, стоит зазипить сюда свой файл.

У меня есть такие листы "БД", "Накладная[COLOR="Red"]1[/COLOR]". Листы "Склад" и "БД" статичны. А Лист "Накладная..." переменная. То есть после каждого запуска программы это может быть "Накладная1", а может быть "Накладная2" или "Накладная...". Это зависит от того, с какого листа пользователь запустит программу.

При запуске программы открывается диалоговое окно. В нем есть ComboBox и TextBox.

Что мне нужно сделать:
1. В ComboBox загрузить данные из листа "БД".
2. После ручного ввода дополнительных данных в TextBox, и выбора элемента из списка ComboBox мне надо вернуться на лист "Накладная...", с которого я запустил программу. Заранее я не знаю, какой будет номер у листа после слов "Накладная".
3. Записать данные из диалогового окна (или формы) в лист "Накладная...".

Для перехода из листа в лист я пишу следующий код:

Sheets("БД").Select

Если бы я например знал, с какого листа будет стартована программа (например, с листа "Накладная23"), то я бы написал следующий код:

Sheets("Накладная23").Select

Но это может быть какая угодно Накладная. Я не знаю кода, который позволял бы делать переходы не так прямолинейно и явно.

=====================================================

Когда-то давно я пользовался командой Range("H21").Select для объявления ячейки, но не мог свободно перемещаться между ними пока не узнал про команду Cells(y,x). Сейчас я ищу аналог для перемещения между листами книги на подобии Cells.

А вопросик под тему: как можно клавишами переключаться между листами?
Вроде раньше я пользовался клавишей Ctrl-PgUp(PgDw). Но не сработала чего-то. Может какие настройки нужны?
А, нашел, вот:.
[COLOR="Navy"]Ctrl-Sh-PgUp(PgDw)[/COLOR]

Меня не интересует переключение между страничами при помощи комбинации клавиш или "ручками". Я хочу знать как это сделать программным путем.

Чтобы узнать какой лист активный:

Чтобы сделать лист активным:

Проверил. РАБОТАЕТ!!!! Спасибо!!!!!!!!!!!!!!!!!!!!!

А теперь подскажи, как ты откопал эти коды? Где их нашел?

Порядок поиска ответа на возникший вопрос)):
1) Help
2) Любимый.. Yandex)
3) Учебник/справочник/статья и т.п. по данному вопросу/языку/среде
4) Поиск на любимом форуме
5) Создание новой темы на форуме
Заметь "Создание новой темы на форуме" стоит на последнем месте..
Подобные вопросы относятся к, ИМХО, "ленивым"..
Человек поленился поискать в первых 4 пунктах и поэтому 'пришел' со своим вопросом на форум..
При этом не учитывается, что форумчане, заведомо зная, что этот вопрос обсуждается/разъясняется/объясняется и т.п. мягко говоря где попало, либо не станут на него отвечать из принципа, либо не захотят отвечать на него в очередной раз, либо, как в твоем случае, не поймут, что именно ты от них хочешь и.. 'забьют')
Вывод: гораздо быстрее будет найти ответ самому, чем ждать ответа от кого-то..
Задал вопрос ты 16.12.2006, 03:13
..а ответ получил 24.12.2006, 12:07
Больше недели вместо 'одного' клика в Help'e!!

Кликал я в хелпе, закачал e-Bookи по VBA. Пересмотрел все. Даже в Яндексе на поиск брал. На все потратил больше года. Пока не попал сюда. То, что я получил ответ через неделю, меня не огорчает, а наоборот радует. Наконец-то я получил ответ. Для меня важен результат.