Agir sur les quatre dernières chiffres d'une cellule
Bonjour,
J'ai créé un userform que je dois agir sur les quatres dernières chiffres d'une cellule.
si quelqu'un pourra m'aider
Merci
Bonjour,
Le moins qu'on puisse dire, c'est que vous êtes avare d'explications. Qu'entendez vous exactement par "agir sur les 4 derniers chiffres" ? Votre UserForm est vide, on ne sait pas ce que vous cherchez à faire avec !
Pour récupérer uniquement les 4 derniers chiffres de votre code, ce sera une instruction du genre :
Qte = Right(code, 4) * 1Bonjour à tous,
Voici un essai pour votre problème, qu'il faudra probablement adapter au cas concret de votre fichier.
Cdlt,
salut,
Désolé pour le retard et merci pour vos réponses, j'ai essayé ton code 3GB et ça n'a pas marcher avec le userform
Cordialement
Bonsoir …
Le contrôle TextBox étant renommé Tx (MaxLength =0) :
Private Sub Tx_Change()
If Not IsNumeric(Tx) Then Tx = "": Tx.SetFocus
End Sub
Private Sub Tx_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Tx = Format(Tx Mod 10 ^ 4, "0000")
End Sub