Supprimer le dernier chiffre d'une cellule

[David590]

Bonjour,

J'ai besoin de créer un bouton pour supprimer le dernier chiffre écrit dans une cellule, je m'explique: ci dans la cellule A1 il est écrit "1574", en appuyant sur le bouton il serait ecrit "157", en réappuyant "15"...
Si cela est possible, je ne vois pas du tout comment écrire le code, pouvez vous m'aider?

Merci d'avance

 

[Paritec]

Re : Supprimer le dernier chiffre d'une cellule

bonjour david590
bon alors tu as ton bouton déjà?? essayes cela dans le code du bouton
a+
papou 🙂

sub commandbutton1_click
if len (range("A1"))>1 then range("A1")=mid(range("A1"),1,len(range("A1")-1)
end sub

 

[Paritec]

Re : Supprimer le dernier chiffre d'une cellule

Re David590
et si tu n'arrives pas à l'intégrer tu crais ton fichier ton bouton et tu joints le fichier ce sera plus simple
a+
papou 🙂

 

[David590]

Re : Supprimer le dernier chiffre d'une cellule

Merci pour ta réponse super rapide, j'ai donc essayer le code mais je ne comprend pas pourquoi il ne fonctionne pas, ci joint le fichier

 

[Paritec]

Re : Supprimer le dernier chiffre d'une cellule

Re David 590
un fichier avec le bouton
a+
Papou 🙂

 

[David590]

Re : Supprimer le dernier chiffre d'une cellule

Super, il manquait juste une deuxième parenthèse après A1, le débogueur me l'avais signalé mais je ne l'avais pas mise au bon endroit

C nickel, c juste ce qu'il fallait, merci encore 🙂

 

[Paritec]

Re : Supprimer le dernier chiffre d'une cellule

Bonjour David 590,
oui il faut dire qu'à 3h les yeux sont plus très bien ouvert
a+
papou🙂