Suprimer des caractères?

[lavaltt]

Bonsoir à tous,

Es-ce quelqu'un aurais bien la mabileté de m'éclairer svp.

J'aimerais pouvoir suprimer, par une macro, les 4 premier caractères d'une cell.

Exemple:

abcdefhijklmnop
deviendrait
efhijklmnop

1234567890
deviendrait
567890

Strictement les 4 premiers caractère

Merci du support

 

[Gorfael]

Re : Suprimer des caractères?

Salut lavaltt et le forum

Es-ce quelqu'un aurais bien la mabileté de m'éclairer svp.

Plus ton sujet est moins écrit correctement moins tu risques d'avoir plus de réponses rapides.

=droite("texte"; nbcar("texte")-4)
A+

 

[lavaltt]

Re : Suprimer des caractères?

Bonsoir le Fil, chèr forum,

Je vous remerci de bien vouloir m'aider.....

Mon sujet: Suprimer des caractères? est pourtant clair pour moi.....

Merci pour la formule mais j'ai besoin d'une Macro car ceci doit etre effectué sous controle.

Merci

 

[Gorfael]

Re : Suprimer des caractères?

Salut lavaltt et le forum

Mon sujet: Suprimer des caractères? est pourtant clair pour moi

Relis ton sujet initial et tu verras ce que je veux dire.

j'ai besoin d'une Macro car ceci doit etre effectué sous controle.

sous contrôle ? ça veut dire quoi exactement ?

Pour faire une macro, il manque des données : plage source, plage résultat
Si les plages ne sont que du texte, ou s'il y a des nombres.
A+

 

[Staple1600]

Re : Suprimer des caractères?

Bonsoir à tous


Une macro "formulée" 😉

Sub a()
Dim donnees_brutes As Range
Set donnees_brutes = Range([A1], [A65536].End(xlUp))
With donnees_brutes.Offset(, 1)
    .FormulaR1C1 = "=MID(RC[-1],5,9^9)"
    .Value = .Value
End With
End Sub

La même version régime

Sub ab()
Range("B1:B" & [A65536].End(xlUp).Row).FormulaR1C1 = "=MID(RC[-1],5,9^9)"
End Sub

 

[lavaltt]

Re : Suprimer des caractères?

Bonjour le fil,

Serais-ce possible de simplement suprimer dans la case choisi.

Pour l'instant, les 4 caractères sont suprimé mais collé dans Offset (0,1)
Je voudrais que la cell sélection perde ses 4 caractères.....pas qu'elle soit copier,coller

Es-ce faisable?

Lavaltt

Mais merci quand même, nous approchons du but