Check If String Contains Only Digits

Apr 19, 2008

I'm working on a project where I need to prevent the user from entering non-digit string inputs. I've tried the using IsNumeric(MyString). but that doesn't prevent , + - signs to be entered. I also had to conditionally enable the input of a string with leading zeros like "01" so what I've ended up with is a rather messy looking' sub that handles this (don't know if forum rules allows me to show it here?). The problem is that I'm not a 100% sure that my sub fit to handle all eventualities so therefore my question is whether there is an easier, fool proof way to check my strings?

View 6 Replies


ADVERTISEMENT

Check If First 5 Digits Of String Are Numeric

May 23, 2007

I have some code where I need to check if the first five char are numbers and not letters.

I have in a column for example
12345-someone is here
23456-someone else is here
someone is here too

I need to get all of the ones that have 5 digits and not pull in the other into a new list.

I have tried Left(CPHierAll. Cells(CPHierAllRow, 1),5) which will get me the fist 5 char. and then i need to check to make sure that they are all numbers and not char.

if Left(CPHierAll.Cells(CPHierAllRow, 1),5) = "#####" then
But this does not bring anything in.

I also tried if CPHierAll.Cells(CPHierAllRow, 1),5) = "#####" then

I have 3 column that i am checking for different thinks the first two work just find and seperate out on the check but the last one with the numbers is being a pain.

View 9 Replies View Related

Regular Expression: Check If A String Has A Sequence Of 6 Decimal Digits

Apr 13, 2007

I am using the following to check if a string has a sequence of 6 decimal digits in it. But am getting an error. If(str Like *######*). I have to check if str has values like 123456USA ; ABC725439 ; jh658478hd. I thought # represents a single digit and * represents any no of characters

View 2 Replies View Related

Check Number Uses Unique Digits

Feb 20, 2008

I would like a function that checks an input number to see if it contains unique digits. If the digits are unique the output is 1 else the output is -1. Thus, supposing we call the function UNIQ(), we find UNIQ(15423) = 1 but UNIQ(154532) = -1. The input is always a positive integer.

View 7 Replies View Related

Calculate Sum Of Digits In A Number String

Feb 22, 2010

I need to calculate the sum of digits in a numeric string. The function should keep on adding the digits of each result, till the final sum is a single digit. Please refer to the following example and result expected:-

Supposed the number entered in Cell A1 is 456789

Result 1 = 4+5+6+7+8+9 = 39

Result 2 = 3+9 = 12

Final Result required = 1+2 = 3

View 7 Replies View Related

UDF To Extract Digits From Variable Range String

Apr 28, 2014

I have a long string that has a list of digits in the middle that I want to extract. The string is variable length and the number of digits I want to extract is 5-7. I also have slashes in between the numbers I want to extract. I need a UDF that allows me to extract the 5-7 digit number from the string and restrict around the slashes (i.e. if two sets of digits in the string match the condition for extraction, extract the one around the slashes.) For example my original data is like

1. aaa/12345/aaa/123
2. aaaaa/123456/aaaaaa/3423
3. 323/aa/1234567/aa

and I want for results

1. 12345
2. 123456
3. 1234567

Is there a UDF that allows me to do this?

View 14 Replies View Related

Number Formatting: The First Three Digits Will Be Separated And Then Subsequently 2 Digits

Oct 31, 2008

i need to format my numbers in the following format

10,00,000.00

the first three digits will be separated and then subsequently 2 digits

View 2 Replies View Related

VLookup Only Right Most 4 Digits Of The 6 Digits Sequential Numbers

Apr 30, 2014

I have the following working great, but would like to see it refine a little, as the data vlookup is 6 digits, but i only needs the last 4 digits is enough for me to work, my question is how do i go about adding that to the following function i have implemented and working fine.

=IF(ISERROR(VLOOKUP(B4,' cmfs01home$peter[tracker data 4-25-14-a.xlsx]ControlSheet'!$B$2:$F$301,4,FALSE)),"",VLOOKUP(B4,' cmfs01home$peter[tracker data 4-25-14-a.xlsx]ControlSheet'!$B$2:$F$301,4,FALSE)

View 12 Replies View Related

Check Whether String Contains One Of Many Sub-strings

Nov 11, 2010

I'd like to write a formula that check if a string (contained in another cell - say A1) includes at least one occurrence of one of a set of 5 sub strings. If the substring is included then it should return which one.

For istance, say that the cell A1 = " The colour is BLACK" then I'd like a formula in cell B1 that check if any of the following strings is included in A1 (RED, GREEN, BLUE, BLACK, ORANGE) and that tells me which one.

How to do this with a one cell formula ?

View 6 Replies View Related

Check Last 4 Letter Of A String

Nov 18, 2008

how I check the last 4 letters of a String to make sure they say '.xls', '.csv', etc, etc, for varification purposes.

View 4 Replies View Related

Check If Cell Contains A Particular String

Apr 21, 2009

My question is about checking to see if a cell contains a particular word.

I know that the following checks to see if a cell's value IS a particular word:

View 2 Replies View Related

Check If String Contains A Number

Sep 25, 2009

Is there way in Excel VBA to check if a string contains a number, and then return TRUE or FALSE. Numbers can been anywhere in the string. See example below.

View 6 Replies View Related

How To Check Multiple Cells Have Same String

Jul 9, 2013

I want to check if cells C1, D1 and E1 contain the same name. For example if the cells all contain the 'Joe Bloggs' (or whatever the name variable happens to be) then cell F1 should say "Yes", else "No".

View 1 Replies View Related

Excel VBA - Check If String Is In Array?

Sep 2, 2013

I have a test to see if a text string is in an array that mostly works, but sometimes fails and I don't understand why.

The routine calls a Function IsInArray which returns a True/False value depending on whether the search term is in the array.

Code:
Sub TestFilterArray()
MyArray = Array("a", "b", "c")
If IsInArray("a", MyArray) = False Then

[Code]....

In this case the first item in my array is "a - b" (note that this is a text string ), but for some reason because my test value is "a" the routine things it must be in the array.

Thus I am thinking that the ampersand and dash symbols are somehow confusing my routine.

How can I change my routine so that it correctly identifies which text strings are in my array?

View 9 Replies View Related

Check If String Is Single Cell Reference

Jul 6, 2008

I'd like to check if a user supplied string is single cell reference. My problem is that the below code comes back as vallid if I enter a range like B2:B4.


Sub test2()

Dim UserAdd As String
UserAdd = InputBox("Enter your address")

'check if valid:
If ValidAddress(UserAdd) Then
MsgBox ("it's valid!")
Else
MsgBox ("it ain't valid!")
End If

End Sub

View 9 Replies View Related

Remove First X Digits And Last Y Digits From A Cell

Sep 25, 2009

I am editing a wine database which contains a vast amount of data, one column has the wine name and sometimes the vintage year in the begining or at the end of the cell. Sometimes the year is made of 2 digits (03, 05, ..) or 4 digits (1978, 2004, 2005, ...).
Is there a way to remove this vintage year form the string?

to make matters worse, there is often a single quote/apostrophe in front of the vintage year, which is driving me mad as 98% of the time it is one of these hidden ones that cannot be deleted using the find/replace function.

examples are like below:
De Wetshof Finesse/Lesca Cahrdonnay ‘07
De Wetshof Sauvignon Blanc ‘07
Lord Neethling Cabernet Franc 2002
Lord Neethling Pinotage ‘01
Bouchard Finlayson Tete de Cuvee Pinot Noir ‘07
Jacobsdal Pinotage 1994
Zondernaam Sauvignon Blanc 2007
Tokara Red
1976 St Emilion
03 Tokara rose
Plasir de Merle Cabernet Sauvignon ‘05
DuToitskloof Pinotage/Merlot/Ruby Cabernet
1999 Tradition Juracon 375ml

I have been searching the Internet for the past 2 days without luck on how to delete the end of string vintage year.

I have had some luck with the left side, as in:
=IF(ISERROR(VALUE(LEFT(B2,SEARCH(" ",B2)-1))),B2,MID(B2,SEARCH(" ",B2)+1,LEN(B2)))

As I am not an expert with Excel, I have no idea on how to use VBA (every time I have tried even basic things, I failed) nor even sure how the above funtion works (found it on another site).

I thought I could acheive my goal in two steps, first removing the left side vintage and use this partial result with the RIGHT equivalent funtion, but it simply is not working!

View 14 Replies View Related

How To Remove First X Digits And Last Y Digits From A Cell

Sep 25, 2009

I am editing a wine database which contains a vast amount of data, one column has the wine name and sometimes the vintage year in the begining or at the end of the cell.

Sometimes the year is made of 2 digits (03, 05, ..) or 4 digits (1978, 2004, 2005, ...).

Is there a way to remove this vintage year form the string?

to make matters worse, there is often a single quote/apostrophe in front of the vintage year, which is driving me mad as 98% of the time it is one of these hidden ones that cannot be deleted using the find/replace function.

examples are like below:
De Wetshof Finesse/Lesca Cahrdonnay ‘07
De Wetshof Sauvignon Blanc ‘07
Lord Neethling Cabernet Franc 2002
Lord Neethling Pinotage ‘01
Bouchard Finlayson Tete de Cuvee Pinot Noir ‘07
Jacobsdal Pinotage 1994
Zondernaam Sauvignon Blanc 2007
2003 Tokara Red
1976 St Emilion
03 Tokara rose
Plasir de Merle Cabernet Sauvignon ‘05

I have been searching the Internet for the past 2 days without luck on how to delete the end of string vintage year.

I have had some luck with the left side, as in:
=IF(ISERROR(VALUE(LEFT(B2,SEARCH(" ",B2)-1))),B2,MID(B2,SEARCH(" ",B2)+1,LEN(B2)))
As I am not an expert with Excel, I have no idea on how to use VBA (every time I have tried even basic things, I failed) nor even sure how the above funtion works (found it on another site).

I thought I could acheive my goal in two steps, first removing the left side vintage and use this partial result with the RIGHT equivalent funtion, but it simply is not working!

Does anyone have an idea on how to help with this?

Ideally I would love to cut the vintage year, whether 2 or 4 digit, whether on right or left of cell and paste it in another cell, so to avoid manually doing it.

However, this is surely too complicated to do, so iwould settle with just deleting the vintage year and manually typing the vintage in another cell.

View 9 Replies View Related

Partial String Check In Cell Against Range For Return

Feb 15, 2010

I've posted this query before, not on this forum, but I don't think the replies I've had so far are going to do what I want. Initially I was looking for a formula, but the suggested pile of nested IFs won't work for the number of conditions. I saw a previous post on here for a VBA macro to search for a text value in a cell against the cell contents of a range and it seemed to do at least the first part of what I wanted. I attempted to manipulate it a little to test its applicability for my own nefarious purposes but for the life of me I can't get it working.

This is complicated by the fact that the actual data is commercially confidential, so I can't show you the actual file, but I can fake what I want with two simpler ones. I've attached them to this post. What I want is a fair bit more complex than the other post I found - I want to be able to compare a partial text string from a given cell in a range ('Check Value' in the attached TestBook2 ) against the strings in a range of cells ('Value 1' in TestBook1), and return the corresponding value from 'Test Value' to the corresponding adjacent cell to the tested 'Check Value', with an order of precedence, for example...

Testbook2 contains an entry in C5 of 'a, e, h, z, x, y'. Testbook1 shows that the return for a, b, c, or d is 'moo', for e, f, or g is 'steve' and for g through q is 'fred', all others being no returned value. Moo>steve>fred, so I want the corresponding 'moo, steve. fred or <blank>' cell to contain 'moo'. Conversely, C6 contains 't, u, z' and therefore shouldn't have a value in 'moo, steve, fred or <blank>'. C12 contains 'f, z, s, y, u' and C15 'i, x, z, s', and therefore should display 'steve' and 'fred' respectively.

View 3 Replies View Related

Check If Text String In Cell With Other Text Is In List

Mar 27, 2008

I have a sheet in which some of the cells have two strings separated by a linefeed. I have come up with a cumbersome formula which will let me check if either of the two strings is a member of a list stored on another sheet. However, it fails if there is only one string in the cell, presumably as there is no linefeed for the formula to find. How can I modify the formula to cope with this situation?

There are also on occasions, three strings in the cell, but I can't seem to access the middle string with the formula. Simplified spreadsheet attached to show the problem. This must be formula-based, as we have a no VBA policy. If you think there is better way of doing this, please let me know.

View 3 Replies View Related

Macro To Force Format And Check Barcode Check Digit

Nov 27, 2009

My company uses 4 types of barcodes 8, 12, 13, & 14 number barcodes for our products my problem is that I can't figure out how to force the barcode to format properly no matter how somebody enters it if they don't use spaces or put them in the wrong spots, I can't use custom formats because there is 4 different layouts

8 digit should be "#### ####"
12 digit should be "###### ######"
13 digit should be "# ###### ######"
14 digit should be "# ## ##### ######"

these barcodes are in columns L, M, & N also right now 'm using a formula in another cell to verify the barcodes by calculating the check digit and comparing it to the check digit typed the formula i'm using is

View 9 Replies View Related

VBA Check If A Cell Is Empty - Move 7 Cells Over And Check Again (Loop)

Aug 10, 2012

I have data in Row 53 that spans 7 columns, but stays in the same row. I want to design a loop to select every 7th cell in that row and check if it is empty. If not, add onto a "counter" then display the final number of occupied cells (the value of the counter) at the end. This is what I have so far, but I get all sorts of errors.

Code:
Sub Tester()

Dim WB As Workbook
Dim WS As Worksheets
Dim modCounter As Long
Dim Cell As Range

Set WB = Workbook("Transverse Series.xlsm")
Set WS = WB.Sheets(BM18)

[Code] ......

View 1 Replies View Related

VBA Spell Check - Dont Ask To Check Rest Of Doc?

Nov 3, 2008

I am using this code

View 5 Replies View Related

Check Box Controlling Other Check Boxes?

Jul 4, 2014

I want to have 1 check box affect 3 others in the following way: check box 1 if checked, allow check/uncheck of check boxes 2, 3, 4 if unchecked, uncheck boxes 2, 3, 4 and do not allow checking check box 1 is linked to D1 which starts with a value of false. cell E1 is if condition to have value 1 when D1 has value of true.

I have attempted to attach an example worksheet.

Test check control.xlsx

View 1 Replies View Related

Check All Check Boxes With CheckBox

Sep 9, 2007

I am creating a userform with 10 checkboxes. The first 9 checkboxes are user options. I want the 10th check box to be a "Select All" option i.e. if the 10th checkbox is checked all the other 9 options are deemed to have been selected.

The way I want the display to work is that if the 10th checkbox is ticked all other checkboxes are cleared. Also if the 10th checkbox is ticked and any of the other check boxes is selected then the 10th checkbox should be selected.

I have tried coding this up but the checkboxes don't seem to operate as desired. I placed some code on the click event for the last option button to set the vlaue for all other buttons to false. This works but the 10th check box doesn't get ticked itself. When I try to code up the other bit I get similar issues.

View 9 Replies View Related

Find Max Of Last Four Digits?

Jul 12, 2014

I can't seem to find a way to find the max of only the last four digits of a cell, matching the first 8. As an example:

I have thousands of cells in a column like this, (and I can't add any columns to the sheet), and I have a cell with the first three digits and the second three digits. So, out of all these numbers, I want the MAX of ONLY the numbers with the first 8 digits of "800-123-". Also, the decimal on the end is how many times the number was called, and any the decimal and any number after it is to be ignored. The answer would be "800-123-0024", or "0024", I just need a faster way to find it without searching for it.

888-555-0099.2
800-123-0022.3
555-333-0474

[Code]....

View 9 Replies View Related

Delete The Last 2 Digits

Nov 11, 2008

I have a long list of 4 digit numbers:

e.g.

0234
2434
6566
4566
6785

But I only want the first 2 digits (I need the last two digits deleted). I don't want to just divide by 1000 as this will leve me with a decimal. The numbers are in text format as some of them begin with a 0. So it would be:

02
24
65
45
67

View 5 Replies View Related

Vlookup First Two Digits

Mar 6, 2009

I would like to take the first three digits of column A and do a lookup of column B that would return the corresponding number from column C. For example, if I entered the formula for 103PH, the lookup would find the 103 in column B and return "2775.00" from column C...........

View 4 Replies View Related

Must Have 3 Digits In A Cell

Nov 24, 2009

I was wondering how do you format a cell so that when i enter the number 7 it automatically sets it at 007 and for like 10 it would be 010 so a must have of 3 digits

View 5 Replies View Related

Add Sum Of Digits In A Cell Using VBA?

Mar 9, 2014

adding the sum of digits in a cell using VBA. For eg: in A1 if I have 12345 I need the sum of 12345 (15) in cell B1.

View 3 Replies View Related

Cut Off Digits Without Rounding

Dec 4, 2012

I have a number 53.30242 in a cell a1. How can I just make it 53.302? I don't want to round it to 3 decimal place, just keep the first 3 digits.

View 6 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved