Home 
Search 
Today's Posts 
#1




How to extract each digit from a number in one cell?
I need to extract each digit from a number entered in one cell. I then need
to multiply each digit by another digit. The second part I can handle. It's how to parse that number into it's separate digits that is the challenge. I am used to redefine capabilities in other languages but can't find any easy equivalend in Excel. 
#2




How to extract each digit from a number in one cell?
See if this idea helps
Sub extracteachnumber() c = ActiveCell For i = 1 To Len(c) MsgBox Mid(c, i, 1) * 4 Next End Sub  Don Guillett SalesAid Software "greyhound girl" wrote in message ... I need to extract each digit from a number entered in one cell. I then need to multiply each digit by another digit. The second part I can handle. It's how to parse that number into it's separate digits that is the challenge. I am used to redefine capabilities in other languages but can't find any easy equivalend in Excel. 
#3




How to extract each digit from a number in one cell?
This might do it. I won't be able to try it for about an hour so will let you
know then. Thanks!! "Don Guillett" wrote: See if this idea helps Sub extracteachnumber() c = ActiveCell For i = 1 To Len(c) MsgBox Mid(c, i, 1) * 4 Next End Sub  Don Guillett SalesAid Software "greyhound girl" wrote in message ... I need to extract each digit from a number entered in one cell. I then need to multiply each digit by another digit. The second part I can handle. It's how to parse that number into it's separate digits that is the challenge. I am used to redefine capabilities in other languages but can't find any easy equivalend in Excel. 
#4




How to extract each digit from a number in one cell?
Data TextToColumns Fixed and set a column for each digit in your
maximum length number........... hth Vaya con Dios, Chuck, CABGx3 "greyhound girl" wrote: I need to extract each digit from a number entered in one cell. I then need to multiply each digit by another digit. The second part I can handle. It's how to parse that number into it's separate digits that is the challenge. I am used to redefine capabilities in other languages but can't find any easy equivalend in Excel. 
#5




How to extract each digit from a number in one cell?
This worked great. I actually had to start from the right most position so
just reversed the counter and end values and added a step 1. I need to do this with the text entered by a user, calculate a check digit and display the result as well as use the check digit in building a bar code. I have not worked much with text boxes. I assume I could use that to gather the data but wouldn't I need to have a separate calculate button to actually do the extract? Otherwise, how would the application know when the complete number had been entered. Any thoughts, suggestions? "Don Guillett" wrote: See if this idea helps Sub extracteachnumber() c = ActiveCell For i = 1 To Len(c) MsgBox Mid(c, i, 1) * 4 Next End Sub  Don Guillett SalesAid Software "greyhound girl" wrote in message ... I need to extract each digit from a number entered in one cell. I then need to multiply each digit by another digit. The second part I can handle. It's how to parse that number into it's separate digits that is the challenge. I am used to redefine capabilities in other languages but can't find any easy equivalend in Excel. 
Reply 
Thread Tools  Search this Thread 
Display Modes  


Similar Threads  
Thread  Forum  
How do I copy the last digit of a number from a cell  Excel Discussion (Misc queries)  
Extract number in middle of cell  Excel Worksheet Functions  
16 digit number wont keep alteration unless format cell to text  Excel Discussion (Misc queries)  
excel  numbers as text  New Users to Excel  
Formatting a cell as "text" in the number catagory.  Excel Worksheet Functions 