search for 1st non * in text

[winde]

Hi

Can i know how to find the first non "*" in a cell and return all the text after that?


example:

*****ant --> ant

**Bat --> Bat

*********cat --> cat


Thanks.

 

[winde]

Here is the VBA version that you mentioned you might want to use...

[TABLE="width: 500"]
<tbody>[TR]
[TD]AfterLeadingAsterisks = Right(Range("A1"), Len(LTrim(Replace(Range("A1"), "*", " "))))[/TD]
[/TR]
</tbody>[/TABLE]

Hi Rick

How do i apply this to all text in Column A?

below is my vba code. how do i edit it from there?



sName = ActiveSheet.Name

Set ws = Sheets(sName)


With ws

Firstrow = .UsedRange.Cells(1).Row

Lastrow = .UsedRange.Rows(.UsedRange.Rows.Count).Row

Set rng = .Range("A" & Firstrow, Range("A" & Lastrow))

rng.select


WorksheetFunction.Right(Range("rng"), Len(LTrim(Replace(Range("rng"), "*", " "))))


End With