Recent content by GavZ

HI, I have used ghudsons 'Browse Directory' example in the attached thread, it works really well but how do i get to change the starting directory when a user clicks the browse button rather than starting on My Computer everytime...

fortnightly and it will be about 200 workbooks cheers

Sorry i should have made it clear. i am trying to import all workboorks in a folder. the code i pasted sort of does this but only the first worksheet from each workbook whereas the files have up to 10. THanks

Hi, I cannot seem to adapt the following code to import all worksheets in all Excel Files in a directory. It wil only import the first sheet in every file: Const strPath As String = "C:\" Dim strFile As String Dim strFileList() As String ' Dim intFile As Integer ' strFile...

Hi, I have a continuous form with a directory list of file and i want the user to tick a check box on the ones they want and click a button to import them. The only thing not working is the below where it cycles through the form. It updates the textbox correctly but it always calls the...

Because I was just testing the loop before I change it to call a separate function instead of just writing to a text box

Perfect thanks! - So simple!

hi, i have a continuous form where i am trying to get a loop statement working, i have tried simplifying it so that if the checkbox in the record is checked the write checked! in the textbox but it still not working! Can anybody tell me why this isnt looping through the records? Dim Rs As...

Excellent response thanks very much! Was bugging me all day yesterday!!

sort of but not really :) i used Replace([PhoneNo],"44","0") it replaces all of the 44 no matter where in the field but using a select query it doesnt update the original record, that why i was trying to use the Update query because it sounded like it was the right one. if i try and put it...

yes an update query but im not sure how to replace the 44 with a 0 i know this is obviously wrong but its what i have so far -

Firstly I have been searching the forums for ages for help with this but have been unsuccessful. Basically I have a column in a table that i want to update the first two characters if they are "44" with a "0". I currently have an Update Query with Left([PhoneNo],2) ="44" in the field box but...

Hi, I have a table which holds an imported spread sheet. how can i remove all of the spaces in all of the fields without doing the long winded ctrl + h. Is there any VB that would do it that i can run at the same time as the import? Thanks Gav

dont worry i put Len([f3])=11 in the criteria and it works perfectly! thanks again for all your help

Wow - you really are amazing, it works!! The only other thing is that it returned some fields blank (i suspect that they didnt have any numbers) and some that only had 3 numbrs in it. is there any way to limit it to just find 11 digit numbers (if it helps they all start with 0) Thanks again