Добрый вечер форумчане!  
У меня такой вопрос:  
где и как можно прописать (может на листе Properties?), чтобы при вводе пароля в ячейке "пароль" (см. приложение) выводились "*", а нижеописанный макрос проверяет соответствие Текстбокс1(имя) и Текстбокс2(пароль) и только при совпадении продолжает работу.  
И еще! Как можно создать базу данных "Имя-пароль", чтобы опреативнее вводить и коорректировать данные  
 
Private Sub Ввести_Click()  
   If TextBox1.Text = "07711012" And TextBox2.Text = "07711012" Then Sheets("Ввод данных").Cells(2, 3) = TextBox1.Text: _  
   Sheets("Ввод данных").Activate: Unload Запрос: _  
      Exit Sub  
   If TextBox1.Text = "Вася" And TextBox2.Text = "1" Then Sheets("Ввод данных").Cells(2, 3) = TextBox1.Text: _  
   Sheets("Ввод данных").Activate: Unload Запрос: _  
      Exit Sub  
   If TextBox1.Text = "2" And TextBox2.Text = "2" Then Sheets("Ввод данных").Cells(2, 3) = TextBox1.Text: _  
   Sheets("Ввод данных").Activate: Unload Запрос: _  
      Exit Sub  
         
   TextBox1.Text = "": TextBox2.Text = "": MsgBox "Неверные данные"  
End Sub  
 
Подскажите пожалуйста. Спасибо!