Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
validate phone number
hi,
how can i make sure the user enters a phone number. i know u can go to formatcellsgeneral and select specialphone number BUT.. this only formats it to a phone number. how do I ensure the user enters in only 10 digits?? and then also put it in the nice 'phone number' format (###) ###-#### Help! :) |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
validate phone number
if Len(ActiveCell) = 10 then
if isnumeric(activeCell) then activecell.Numberformat:="(###) ###-####" else msgbox "Must be a number" end if msgbox "Must be 10 digits" End if -- Regards, Tom Ogilvy "sarah" wrote in message ... hi, how can i make sure the user enters a phone number. i know u can go to formatcellsgeneral and select specialphone number BUT.. this only formats it to a phone number. how do I ensure the user enters in only 10 digits?? and then also put it in the nice 'phone number' format (###) ###-#### Help! :) |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
validate phone number
thanks! :)
umm....but another probably question... :D where do i put this code?? does it go in the macro or something :S -----Original Message----- if Len(ActiveCell) = 10 then if isnumeric(activeCell) then activecell.Numberformat:="(###) ###-####" else msgbox "Must be a number" end if msgbox "Must be 10 digits" End if -- Regards, Tom Ogilvy "sarah" wrote in message ... hi, how can i make sure the user enters a phone number. i know u can go to formatcellsgeneral and select specialphone number BUT.. this only formats it to a phone number. how do I ensure the user enters in only 10 digits?? and then also put it in the nice 'phone number' format (###) ###-#### Help! :) . |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
validate phone number
Think you missed an Else out after first endif?
-----Original Message----- if Len(ActiveCell) = 10 then if isnumeric(activeCell) then activecell.Numberformat:="(###) ###-####" else msgbox "Must be a number" end if msgbox "Must be 10 digits" End if -- Regards, Tom Ogilvy "sarah" wrote in message ... hi, how can i make sure the user enters a phone number. i know u can go to formatcellsgeneral and select specialphone number BUT.. this only formats it to a phone number. how do I ensure the user enters in only 10 digits?? and then also put it in the nice 'phone number' format (###) ###-#### Help! :) . |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
validate phone number
Your right
if Len(ActiveCell) = 10 then if isnumeric(activeCell) then activecell.Numberformat:="(###) ###-####" else msgbox "Must be a number" end if Else msgbox "Must be 10 digits" End if -- Regards, Tom Ogilvy wrote in message ... Think you missed an Else out after first endif? -----Original Message----- if Len(ActiveCell) = 10 then if isnumeric(activeCell) then activecell.Numberformat:="(###) ###-####" else msgbox "Must be a number" end if msgbox "Must be 10 digits" End if -- Regards, Tom Ogilvy "sarah" wrote in message ... hi, how can i make sure the user enters a phone number. i know u can go to formatcellsgeneral and select specialphone number BUT.. this only formats it to a phone number. how do I ensure the user enters in only 10 digits?? and then also put it in the nice 'phone number' format (###) ###-#### Help! :) . |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
validate phone number
It depends on when you want it to work and where you want it to work. I
have no way of knowing what you are doing. Do you want it to run when a person enters a number in a cell in a specific column. then you would use the change event Right click on the sheet tab and select view code in the module, at the top select worksheet and change Private Sub Worksheet_Change(ByVal Target As Range) if target.count 1 then exit sub if Target.column = 4 then if Len(Target.Value) = 10 then if isnumeric(Target.Value) then activecell.Numberformat:="(###) ###-####" else msgbox "Must be a number" end if Else msgbox "Must be 10 digits" End if End Sub -- Regards, Tom Ogilvy "sarah" wrote in message ... thanks! :) umm....but another probably question... :D where do i put this code?? does it go in the macro or something :S -----Original Message----- if Len(ActiveCell) = 10 then if isnumeric(activeCell) then activecell.Numberformat:="(###) ###-####" else msgbox "Must be a number" end if msgbox "Must be 10 digits" End if -- Regards, Tom Ogilvy "sarah" wrote in message ... hi, how can i make sure the user enters a phone number. i know u can go to formatcellsgeneral and select specialphone number BUT.. this only formats it to a phone number. how do I ensure the user enters in only 10 digits?? and then also put it in the nice 'phone number' format (###) ###-#### Help! :) . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Phone number not | Excel Discussion (Misc queries) | |||
Validate Whole Number Series with Exclusions | Excel Discussion (Misc queries) | |||
validate phone numbers etc. | New Users to Excel | |||
? Link attached - How to validate SIN (Social Insurance Number) | Excel Worksheet Functions | |||
Phone number | Excel Discussion (Misc queries) |