Se for somente formatação utilize :

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
            'Limita a Qde de caracteres
            TextBox1.MaxLength = 7
           
            If Len(TextBox1) = 1 Then
                TextBox1.Text = TextBox1 & "/ "
            End If
           
        End Sub

Na linha : If Len(TextBox1) = 1 Then é onde determinamos em qual posição deverá aparecer o sinal.

[]s

Obrigado!