how can i remove a cell value if the cell value starts with space

[anilg0001]

how can i remove a cell value(string) if the cell value starts with space
requred vba code

[anilg0001]

Re: how can i remove a cell value(text) if the cell value starts with space

[pareshj]

Hi Anil,

You can use the below code and hope this is what you want:

Please Login or Register  to view this content.

Note: Instead of cell A1, use can also enter range value.


Regards,
Paresh J

[anilg0001]

thanks Pareshj

when i do that it will clear what ever the value in a1 cell

actually i need

if my A1 range has a string which start with space then i need to delete that cell value

eg
if " anil" need to delete
if "anil" not to delete

[pareshj]

Hi Anil,

Check the below code and hope this will help you:

Please Login or Register  to view this content.

Note: Please change Sheet1 and Range as per your requirement.


Regards,
Paresh J

[AB33]

Please Login or Register  to view this content.

[anilg0001]

thanks paresh j
i tried ur code but nothing was happening
these are the examples of a range

DEI Black Exhaust Wrap
XDP Price: From $25.78 to $75.38
rating
Universal - All Makes & Models
DEI Cell Saver - Battery Insulation Kit 010480
DEI Cell Saver - Battery Insulation Kit 010480
List Price: $23.97
XDP Price: $17.98
You Save: $5.99 (25 %)
Universal - All Makes & Models
DEI Cool Cover Air Tube Cover Kit 010417
DEI Cool Cover Air Tube Cover Kit 010417

here A5 and A11 texts are starting with space which i need to be blank
please review

[romperstomper]

For column A, simply:

Please Login or Register  to view this content.

[satputenandkumar0]

or

Please Login or Register  to view this content.

[rishiraj46]

Hi Anil,
Are you try space find replace ?

[anilg0001]

thanks rishiraj46
i tried both

range("A:A").Replace " *", "", xlwhole

Sub anilg0001()
Columns(1).Replace " *", ""
End Sub

but no results

[anilg0001]

thanks mr.AB33

which is not working

[anilg0001]

hello AB33
ur code is correct but i do not need to delete the row i need that cell value=""

thanks

[anilg0001]

hello AB33

thanks dear i change it

thanks for spending ur valuable time

[JOHN H. DAVIS]

Maybe:

Please Login or Register  to view this content.

[romperstomper]

i tried both

range("A:A").Replace " *", "", xlwhole

Sub anilg0001()
Columns(1).Replace " *", ""
End Sub

but no results

Then either the data isn't in column A, or the first character is not a space.

[rishiraj46]

Hi Anil
Try this
Find what: alt+0010
OR alt+0013

Replace with: Black

find replace.png