Effacement des 3 premieres chiffres d'une cellule

V

vincent

Guest

• 28 Septembre 2003

• #2

bonsoir

voilà un solution par macro

option explicit

sub supprime
dim i as long
for i=1 to range("a65536").end(xlup).row
range("a" & i)=right(range("a" & i),len(range("a" & i))-3)
next
end sub

Bonne soirée

@+Vincent

 

Vote positif 0 Vote négatif

M

marc

Guest

• 28 Septembre 2003

• #3

Merci à toi Vincent,

Je pensais qu'il y avait une fonction, hors macro...
Mais j'essaierai ta macro

best regards

 

Vote positif 0 Vote négatif

M

Monique

Guest

• 28 Septembre 2003

• #4

Bonjour,

Si tu veux une formule :
=DROITE(A1;NBCAR(A1)-3)
Pour avoir un résultat numérique :
=DROITE(A1;NBCAR(A1)-3)*1

 

Vote positif 0 Vote négatif

V

vincent

Guest

• 28 Septembre 2003

• #5

Re le fil bonsoir Monique

Marc je ne propose qu'une solution parmis tant d'autres.Comme je ne suis pas un spécialiste des formules je passe par des macros.Maintenant, merci Monique, il y a toujours (ou presque) une formule qui peut repondre aux problèmes.

A plus

@+Vincent

Ps:enfin une formule que je connais et que je comprends lol !!!!

 

Vote positif 0 Vote négatif

M

marc

Guest

• 28 Septembre 2003

• #6

Un grand merci à vous deux, Monique et Vincent Bonne soirée

 

Vote positif 0 Vote négatif

C

chris

Guest

• 28 Septembre 2003

• #7

Bonjour

Juste pour élargir le débat )

Un autre formule numérique

=(ABS(A1/1000)-ENT(A1/1000))*1000

Salut à tous

Chris

 

Vote positif 0 Vote négatif