Verifier le format d'une textbox

Bonjour à tous

J'ai un formulaire qui me permet de creer et modifier des adhérents.

j'ai dans celui ci une textbox dans laquelle je rentre 1 lettre (L) et 8 chiffres (C)

Cette textbox est limitée à 9 caractères.

La saisie se fait ainsi : LCCCCCCCC

Lorsque je transfert ma textbox vers ma feuille excel, je met en forme de la facon suivant : L-CC-CCCCCC

Jusque là tout va bien.

Mon souci arrive lorsque je modifie une données de l'adhérent sans pour autant modifier la valeur de ma textbox.

Il me rajoute des tirets et je n'arrive pas à trouver comment bloquer ca.

voici mon code :

            If TxtNumLic.Value <> "" Then
                If TxtNumLic.Value = Format(TxtNumLic.Value, "L""-""00""-""000000") Then
                    .Range("r" & j).Value = TxtNumLic.Value
                Else
                .Range("r" & j).Value = Application.WorksheetFunction.Proper(Mid(TxtNumLic, 1, 1) & "-" & Mid(TxtNumLic, 2, 2) & "-" & Mid(TxtNumLic, 4, Len(TxtNumLic)))
                End If
            Else
                .Range("r" & j).Value = ""
            End If

Si quelqu'un peut m'aider, je l'en remercie d'avance.

Finalement, j'ai trouvé tout seul

Tout simplement

            TxtNumLic = Replace(TxtNumLic, "-", "")
            .Range("r" & j).Value = Application.WorksheetFunction.Proper(Mid(TxtNumLic, 1, 1) & "-" & Mid(TxtNumLic, 2, 2) & "-" & Mid(TxtNumLic, 4, Len(TxtNumLic)))

Si cela peut servir à d'autres