Bouton modifier non actif VBA Excel

[Mirguy23]

Bonjour à tous,
J'ai un petit problème avec mon bouton validation modif pour modifier lié à deux TextBox. Lorsque je clique sur mon bouton il n'y a aucune modification qui s'effectue sur ma feuille et ça me donne aucune erreur ....
Voici le lien du fichier

Vous devez être connecté pour voir les liens.

Private Sub b_valid_Click()
Enreg = Me.b_valid
  For C = 1 To NbCol
   If Not Range(NomTableau).Item(Enreg, C).HasFormula Then
     Tmp = Me("textbox" & C)
     If IsNumeric(Replace(Tmp, ".", ",")) And InStr(Tmp, " ") = 0 Then
        Tmp = Replace(Tmp, ".", ",")
        Range(NomTableau).Item(Enreg, C) = CDbl(Tmp)
     Else
         If IsDate(Tmp) Then
           Range(NomTableau).Item(Enreg, C) = CDate(Tmp)
         Else
           Range(NomTableau).Item(Enreg, C) = Tmp
         End If
     End If
    Else
     Range(NomTableau).Item(Enreg - 1, C).Copy
     Range(NomTableau).Item(Enreg, C).PasteSpecial Paste:=xlPasteFormats
    End If
  Next C
  UserForm_Initialize
  raz
End Sub