Aplicación con Visual Basic para excel

[chuchunco]

Hola!...mi consulta es la siguiente, tengo que hacer una pequeña aplicación con UserForm con excel. Básicamente dicha aplicación debe rellenar con datos alguna de las seis hojas que posee el archivo (el formato de cada hoja es el mismo). Como los datos que van en cada hoja son del mismo tipo (Fecha, Hora y temperatura, para cada hoja) Hice un OptionButton para que se seleccione la hoja donde se desea ingresar los datos. La UserForm es llamada por un boton que se encuentra en otra hoja (ninguna de las seis hojas). Todo corre bien....el problema es que la hoja que se esta modificando es mostrada cuando ya se han ingresado los datos (al momento de apretar el boton de "ingresar") y me gustaría que se viese con solo seleccionarla en el OptionButton....esa es mi duda. Les dejo el código:

Private Sub CommandButton1_Click()

If OptionButton1 = True Then
Sheets("A").Activate
Else
If OptionButton2 = True Then
Sheets("B").Activate
Else
If OptionButton3 = True Then
Sheets("C").Activate
Else
If OptionButton4 = True Then
Sheets("D").Activate
Else
If OptionButton5 = True Then
Sheets("E").Activate
Else
If OptionButton6 = True Then
Sheets("F").Activate
End If
End If
End If
End If
End If
End If
NextRow = Application.WorksheetFunction.CountA(Range("A1:A30 000")) + 1
If OptionButton7 = True Then
Cells(NextRow, 1) = ComboBox2.Value
Cells(NextRow, 2) = ComboBox1.Value
Cells(NextRow, 3) = TextBox1.Value
Cells(NextRow, 4) = TextBox2.Value
Cells(NextRow, 5) = TextBox3.Value
Else
If OptionButton8 = True Then
NextRow1 = NextRow - 1
Cells(NextRow1, 6) = ComboBox2.Value
Cells(NextRow1, 7) = ComboBox1.Value
Cells(NextRow1, 8) = TextBox1.Value
Cells(NextRow1, 9) = TextBox2.Value
Cells(NextRow1, 10) = TextBox3.Value
End If
End If

End Sub

Private Sub CommandButton2_Click()
End
End Sub

Private Sub OptionButton1_Click()

End Sub

Private Sub OptionButton2_Click()

End Sub

Private Sub OptionButton3_Click()

End Sub

Private Sub OptionButton4_Click()

End Sub

Private Sub OptionButton5_Click()

End Sub

Private Sub OptionButton6_Click()

End Sub

Private Sub OptionButton7_Click()

End Sub

Private Sub OptionButton8_Click()

End Sub

Private Sub UserForm_Click()

End Sub
Private Sub UserForm_Activate()
ComboBox1.AddItem "A"
ComboBox1.AddItem "B"
ComboBox2.AddItem "1"
ComboBox2.AddItem "2"
ComboBox2.AddItem "3"
ComboBox2.AddItem "4"
ComboBox2.AddItem "5"
End Sub

Tambien me asalta otra duda, ¿es posible dejar protegidas hojas en excel, de manera de que solo sean modificadas a traves del UserForm que estoy diseñando?

Igual, si alguien posee manuales o algun link de ellos que trate temas de visual basic (sobre todo para validar los datos que se escriben en el textbox, o para hacer ventanas emergentes que se activen cuando algún campo del UserForm,OptionButton o TextBox se encuentra vacio) me avisa por favor.

De antemano muchas gracias por su ayuda.