Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
recognizing double digit numbers in code
i am currently working a code to add the numerical parts of strings such as
"M4G3 M4P0". A problem arises however in my code when the string contains a double digit number(ex. M4G3 M12P0). My code will recognize this as a two individual single digit numbers (12= 1 and 2). Any suggestions? Here is the code I'm using. ********** Sub Sumcharacters() Dim i As Long, s As String Dim lsum As Long For i = 1 To Len(ActiveCell) s = Mid(ActiveCell, i, 1) If IsNumeric(s) Then lsum = lsum + CLng(s) End If Next ActiveCell.Offset(0, 1).Value = lsum End Sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do I fix loosing 1st digit in zip code in mail merge? | Excel Worksheet Functions | |||
Recognizing 2-digit years | Excel Discussion (Misc queries) | |||
12 digit code sorting | Excel Worksheet Functions | |||
Recognizing Numbers or names as duplicates | Excel Worksheet Functions | |||
16 DIGIT NUMBERS IN CELL WITHOUT LAST DIGIT BEING A ZERO | Excel Worksheet Functions |