Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I'd like to see how to remove the alpha character from a cell, and
paste the contents to the cell next to it. i.e. 430A, changes to 430, so I can strip just the number out of there. Yesterday I was helped out with finding and alpha, how would I strip just the numbers out of a text cell. As the numbers and letters are all consider a text type in this case, in Excel. Here's my code I used for my last instance. It worked great. Sub Macro() Dim Row_Count As Integer Dim lastrow As Integer lastrow = (ActiveWorkbook.Sheets(2).Cells(65536, 1).End(xlUp).Row) - 1 Row_Count = "2" Do Until Row_Count = lastrow If Right(Trim(Cells(Row_Count, 1)), 1) Like "[A-Za-z]" Then Cells(Row_Count, 2).Value = "Alpha" End If Row_Count = Row_Count + 1 Loop Sample Data that I'll be running my macro on: 430A 430A 430B 430B V-57 V-58 V-59 V-60 V-61 V-62 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Remove Numbers from Alphanumeric String | Excel Discussion (Misc queries) | |||
HOW DO YOU COUNT ALPHA CHARACTERS IN AN ALPHANUMERIC FIELD | Excel Discussion (Misc queries) | |||
How do I replace last numeric string from a alphanumeric string? | Excel Discussion (Misc queries) | |||
Find largest alphanumeric value matching alpha criteria in databas | Excel Worksheet Functions | |||
Strip Alpha Characters out of an Alphanumeric Dataset | Excel Programming |