Truncating read-in data
for the second part: in VBA to concatenate string ("add them together") you
use the & symbol, so it would be
ColumnC = "0" & ColumnC
You can accomplish both steps in one function: this one should do
Function FixCustNo(CustomerNo as String)
Dim i as integer, Result as String
Result = ""
For i = 1 to Len(CustomerNo)
If IsNumeric(Mid(CustomerNo,i,1)) Then _
Result = Result & Mid(CustomerNo,i,1)
Next i
Result = "0" & Result
End Function
--
- K Dales
"sweens319" wrote:
Ok, two quick questions.
I'm going to read in data from, let's say cells(9,3).Value
where row 9 col 3 contains a customer number that looks like this
1234567ABC
Hovever, the actual customer number I need for everyday use looks like this
01234567
I've declared my variable like this
dim ColumnC As String
First, I have to truncate that value to just the numbers
1234567
That's my first question. How do I do that?
Second, I need to add the Zero on the front.
I think I do would do it like this:
ColumnC = "0" + ColumnC
Is that right?
And, can I do both steps in one function?
|