Comme une gomme magique

Je n’arrive pas à faire proprement une macro qui efface une chaîne de caractère donnée dans la cellule active (j’ai essayé en utilisant la fonction Remplacer lors de la création de la macro, ça marche bien, mais à la fin de l’exécution de la macro, la cellule active se déplace…).

Exemple :

– la cellule active contient « bla bla bla ABC bla bla bla »

– je voudrais qu’après avoir exécuté la macro, la cellule devienne « bla bla bla bla bla bla »

– nota : le texte à « effacer » est toujours le même

Quelqu’un pourrait-il m’aider SVP ?

Bonjour,

Si je comprends bien essaye ce code en l'adaptant à ta cellule sur laquelle il faut agir et les caractères à supprimer dans cette cellule :

Sub Substitue()
  Range("A1") = WorksheetFunction.Substitute(Range("A1"), "ABC ", "")
End Sub

PS : "Range("A1")" pourra être remplacé par "ActiveCell"

C'est super, ça marche !

Mille mercis.

Au fait, comment peut-on se former au VBA ?

C'est un long apprentissage pour devenir un peu performant ?

Re,

En cherchant sur le net, tu trouveras pas mal de cours de VBA. Achète ou emprunte des livres pour solidifier la connaissance théorique et n'oublie pas de pratiquer.

Je vais m'y coller, merci !

Rechercher des sujets similaires à "comme gomme magique"