Создание формы для книги EXCEL

[joojle]

Помогите пжл уже целый день бьюсь над проблемой как сделать форму для книги в MVB .
при запуске книги выходит форма в форме должен быть список "ComboBox1" листов книги "лист1, лист2, лист3" и в эти листы доступ через пароль. Ну типа я запускаю книгу открывается окошко я выбираю лист1 и ввожу пароль если пароль неверен лист1 не открывается


----------- (добавлено модератором)
Посмотрите пример подобного макроса: http://excelvba.ru/tools/Authentication
Примеры создания форм ввода для книг Excel можно найти здесь: http://excelvba.ru/category/userform

[joojle]

Help!!! Кто нить!
Вот что пока получилось

[nikolai_P]

Добавь проверку условий

Private Sub ОК_Click()
If  (Me.ComboBox1.Text="Лист2" and Me.Text1.Text="пароль") Then
   Unload Me
   Application.Visible = True
Else
 MsgBox "Не верный пароль!"
EndIf
End Sub

[doober]

У тебя какая задача стоит создать форму или реально защитить книгу и листы от взлома.По твоей идее защиты формы она элементарно открываеться

[SAS888]

Посмотрите пример во вложении.
В книге 4 листа. Чтобы открыть "Лист1" - введите пароль "111". Чтобы открыть "Лист2" - "222". Соответственно для "Лист3" - "333". 4-й лист "Заставка" введен для того, чтобы на случай, если пользователь попытается открыть книгу, предотвратив выполнение макроса по событию открытия (удерживая клавишу "Shift"), то книга откроется с одним видимым листом "Заставка".
Обратите внимание, что пароли "привязаны к порядковым номерам листов. Поэтому, при добавлении листов, внесите соответствующие изменения в макрос, содержащий пароли (в коде есть комментарий). Для предотвращения возможных ошибок, во всех меню все команды связанные с добавлением, удалением и перемещением листов исходно запрещены.

P.S. Не забудьте поставить пароль на сам VBA-проект.
P.P.S Все подобные защиты не дают гарантий от взлома.

[joojle]

[B]Спасибо! и респект всем по отдельности . Конечно же я забыл написать о защите этой книги . Пример SAS888 идеален, но,
вопрос к SAS888 как мне теперь добавить дополнительные листы и изменить их имена. Просто дело в том что я не профи в MVB.

[joojle]

Во общем задача стоит такая эта книга как единый документ в него по сети будет вливаться инфа от других книг и к каждому листу будет закреплена определенная книга (лист этой книги) у каждого кто захочет просмотреть ту или инфу должен будет располагать разрешениями типа логина и пароля и будет один главный который может просматривать все (директор)

[SAS888]

Посмотрите вложение. При открытии книги, будет предложено ввести логин и пароль. В примере это: "Иванов" - "111", "Петров" - "222" и "Сидоров" - "333". При правильном вводе, отобразится лист этого пользователя с запретом действий с листами. При неверном вводе - отказ в доступе.
Если же ввести логин "Admin" и пароль "000", то будут отображены все листы и сняты все запреты. Т.е. можно добавлять, переименовывать, перемещать листы и т.д.
Соответствие логинов и паролей, находится в массивах "a" и "b" соответственно, в модуле пользовательской формы в коде обработки события нажатия кнопки CommandButton1. Поставьте свои. При добавлении листа (нового пользователя), добавляйте в эти массивы новые логин и пароль.

P.S. На VBA-проект установлен "abcd". Измените на требуемый.

[joojle]

SAS888 спасибо большое как раз то что нужно. Благодаря Вашим способностям решилась проблема над которой я бился почти три дня.
Еще раз благодарен.
Тему считаю закрытой всем респект

[joojle]

SAS888 Можно тебя еще попросить сделать в этой книге запрет любых действий т.е. чтоб был доступен только просмотр данных которые будут вливаться в книгу особенно хотелось бы запретить сохранение и пресохранение (сохранить как)книги. а то получается так я сохраняю книгу под Admin она так и остается т.е. я открываю книгу под другим логином а там все листы видны как будто я зашел по Adminом
Кстати будет ли возможен слив инфы в эту книгу после этих действий т.е. "запретов на все"
И можно сделать так чтоб в форме вместо TextBox для логина использовался ComboBox для того чтоб пользователям не нужно было вводить свои логины постоянно, а пароль чтоб вводился **** звездочками.