ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   deleting text (https://www.excelbanter.com/excel-programming/426773-deleting-text.html)

dstiefe

deleting text
 
I have values in a cell

A3452.79%

I need to delete the first 5 characters from the cell.

how do i do that?

Thank you

AltaEgo

deleting text
 
Depends what you are trying to achieve. Enter a value in cell A2. In another
cell


a) If you only ever want the last 4 characters:

=Left(A2,4)

b) if the value varies in length and you always want to drop the first five
characters:

=RIGHT(A2,LEN(A2)-5)

c) if you want to split at the decimal:

=RIGHT(A2,(LEN(A2)-FIND(".",A2)+1))


The same principal applies in VBA. Just assign a value to a variable,
replace references to the required cell (shown as A2 above) with the
variable.

When you finish, if you need to get rid of the original values:

1) Highlight the range with your formula.
2) Copy.
3) Move where you want your values.
4) Paste special/Values.
5) Delete superfluous data





--
Steve

"dstiefe" wrote in message
...
I have values in a cell

A3452.79%

I need to delete the first 5 characters from the cell.

how do i do that?

Thank you



Ron Rosenfeld

deleting text
 
On Sat, 11 Apr 2009 19:36:01 -0700, dstiefe
wrote:

I have values in a cell

A3452.79%

I need to delete the first 5 characters from the cell.

how do i do that?

Thank you


The Replace *worksheet function* does that. Since you posted in a programming
group, I will suggest a VBA macro.

To enter this Macro (Sub), <alt-F11 opens the Visual Basic Editor.
Ensure your project is highlighted in the Project Explorer window.
Then, from the top menu, select Insert/Module and
paste the code below into the window that opens.

To use this Macro (Sub), first select a range to process.

Then <alt-F8 opens the macro dialog box. Select the macro by name, and <RUN.

================================
Sub Rem5()
Dim c As Range, Rng As Range
Set Rng = Selection 'or whatever

For Each c In Rng
If Len(c.Text) 5 Then
c.Value = _
WorksheetFunction.Replace(c.Text, 1, 5, "")
End If
Next c
End Sub
================================
--ron

Rick Rothstein

deleting text
 
c.Value = _
WorksheetFunction.Replace(c.Text, 1, 5, "")


You can also use VB's built in Mid function to do that as well...

c.Value = Mid(c.Text, 6)

where the 6 is one more than the number of beginning characters that are to
be removed.

--
Rick (MVP - Excel)


"Ron Rosenfeld" wrote in message
...
On Sat, 11 Apr 2009 19:36:01 -0700, dstiefe

wrote:

I have values in a cell

A3452.79%

I need to delete the first 5 characters from the cell.

how do i do that?

Thank you


The Replace *worksheet function* does that. Since you posted in a
programming
group, I will suggest a VBA macro.

To enter this Macro (Sub), <alt-F11 opens the Visual Basic Editor.
Ensure your project is highlighted in the Project Explorer window.
Then, from the top menu, select Insert/Module and
paste the code below into the window that opens.

To use this Macro (Sub), first select a range to process.

Then <alt-F8 opens the macro dialog box. Select the macro by name, and
<RUN.

================================
Sub Rem5()
Dim c As Range, Rng As Range
Set Rng = Selection 'or whatever

For Each c In Rng
If Len(c.Text) 5 Then
c.Value = _
WorksheetFunction.Replace(c.Text, 1, 5, "")
End If
Next c
End Sub
================================
--ron




All times are GMT +1. The time now is 10:25 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com