Formato de fecha a un textbox

No tengo ninguna pregunta pendiente de combobox.
La otra consulta por lo que veo, obviamente no te la dejara modificar porque estas diciendo que cuando cambie el textbox te tome el valor del la celda B4 con el formato que colocaste.
Para la mascara de datos en los textbox en vba excel es algo engorroso, revisa en mis respuestas anteriores a otros usuarios que allí hay algo sobre esto.
O haces esto
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
valor = Format(TextBox1, "dd-mmm-yy")
TextBox1 = valor
End Sub

Entonces te pido disculpa creo que se lo envíe a tro experto, pero aquí te envío mi expicacion, espero que me puedas ayudar por que esta es la tercer vez que envío esto y no rescibo nada ayuda
Te explico cual es mi necesidad:
Estoy trabajando un Formulario en Excel, hasta hora ya le ingrese "Páginas múltiples, Labels, Textbox y ComboBox"
Los códigos que estoy trabajando el ComboBox son estos
Private Sub ComboBox4_Change()
Sheets("Contrato").Range("B28") = ComboBox4
End Sub
Private Sub UserForm_Initialize()
ComboBox4.List = Array("'", "SI", "NO")
ComboBox4.Value = "'"
End Sub
Ahora lo que necesito es que cuando seleccione la opción "SI" del ComboBox, este me tire el puntero de inserción al textBox28 que se encuentra en la Página No.3 de la Página Múltiple que inserte en el USerForm, y que cuando seleccione la opción "NO", este me tire el punto de inserción en el textbox21 que se encuentra en la página No.2.
Hasta he intentado muchos códigos y no me funcionan, te agradecería mucho tu ayuda y de antemano muchas gracias que tengas buen tarde.