XL 2010 Bouton modifier non actif

Mirguy23

XLDnaute Nouveau
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

VB:
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
 

Fichiers joints

Dernière édition:

dg62

XLDnaute Accro
Bonjour,

Comment voulez-vous que l'on fasse avec une image pour diagnostiquer votre problème ?
 

Mirguy23

XLDnaute Nouveau
Voici le lien du fichier
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas