Search results for query: *

Thanks Deniall, back to the drawing board it is

Thanks for the information guys but im lost now. Maybe my question should be: Is possible to lock a cell down so a user can only input an 11 digit number sometimes including a zero at the beginning not allowing any special characters spaces just numbers ie: 01234567891 or 19876543211 Thanks

Hi All, I' trying to set a cell so the user can only input a 11 digit number that can start with a zero and contain no spaces. this is what I have thank for any assistance this is set via the data validation =AND(ISNUMBER(a1),LEN(a1)=11)

Hi Guys, I need to remove blanks from a variable range e4:g - variable ive managed to replace the blanks but only on a fixed range. here is what I have. Private Sub cmdClean_Click() Const sBad As String = "`!@#$;^()_-=+{}&[]\|;:'"",.<>/?" Dim cell As Range Dim s...

perfect thanks and also advising how to show the code

just to move to the next occurrence ive tidied the code a little. Private Sub cmdFind_Click() Dim totRows As Long, i As Long totRows = Worksheets("SUSPENSE ACCOUNT").Range("C1").CurrentRegion.Rows.Count If txtAmount = "" Then MsgBox "Enter Search Amount" End If For i = 2 To totRows If...

Andrejek im out of my depth now are you able to assist with the code to move to the next record?

My Sheet2 the tab is actually named Account, all sorted now. Many thanks to all

the form search and data are all in the same workbook and that is my full code for the search btn Thanks

Sorry for the code it was formatted when I copied it on here. the runtime error happens after I added the search criteria into the txtAmount on the userform and click the cmdfind when I debug it stops here totRows = Worksheets("Sheet2").Range("C1").CurrentRegion.Rows.Count with the msg...

Hi guys im trying to create a searchable user form but have come unstuck. When I enter the search details in txtAmount - my search box; hit the find btn, I get a runtime error 9 Subscript out of range. This is my code any help would be cool. Private Sub cmdFind_Click() Dim totRows As Long, i...

thanks guys

Hi guys I returning to this after 15 yrs out and my memory is poor. So any help would be fantastic. I have a button to select a range and print. Private Sub cmdbtnPrint_Click() ActiveSheet.Select Range("A3:F21").Select ActiveSheet.PageSetup.PrintArea = "A3:F21"...