Code to remove specific text from a cell

[MrOzman]

Is there a simple code to remove specific text from a range?

For example I can use

.range("A1").text = .range("A1").text & " extra text"

to add " extra text" to the cell text.

Is there an equally basic commmand to remove " extra text" from the cell text?

 

[Andrew Poulsom]

The Text property is read only, so you can't assign it a value. That said try:

.Range("A1").Value = Replace(.Range("A1").Value, " Extra Text", "")

 

[VoG]

Try

.Range("A1").Value = Replace(.Range("A1").Value, "extra text", "")

 

[njimack]

Range("A1").Replace what:="extra text", replacement:=""

 

[MrOzman]

Thanks that all works brilliantly! Exactly what I needed.