Search results for query: *

Skip, Thanks for the help. Basically the code is more or less doing what I would like but for one major problem. The Find function does not seem to be reading the variable or linking with the FindNext function. The Find command finds the first instance of the search variable but the FindNext...

Hi all, I have read a few posts similar to what I'm trying to acheive but without anyone actualy seeming to come up with an answer. The problem I have is :-- Sheet 1 contains all my report data. I want to strip certain values/cells into a new sheet to for a table. I want to do this by...

Tom. You were spot on. Your problem is exactly what I was getting. I found that by having my default printer set to the microsoft image writer the problem just does not occur. Seems like that has to be a bug to me but at least it lets us edit the VBA trouble free. Thanks all for your help

Guys, I still cannot get this problem resolved. I have SP 1 installed for office 2003 ! I have compiled the code and got rid of all errors ! Tom, with regard to the printers could you be more specific in which ones you changed. I have a default printer set as part of windows. In access I...

I have now compiled the code and got rid of the errors it found. I still get the C++ error but I find it occurs when I try and access the editor from and open event on a form. If i access it manually or through a command button I do not get a problem. Seems like could be a bug. Will take a...

PHV, I will have to check on the SP. Not sure. I will carry on through the compile feature and see if I can get rid of the errors. do you think that will solve the problem ?? thanks

PHV, thanks. I have checked the references and they seem fine. I tried using the complie option in the VBA editor as you suggest and it stops at the following line at "column(3)" Me![Title] = Me![DrawingID].Column(2) & " " & [DrawingID].Column(3) & " " & [DrawingID].Column(4) The code for...

I have a database that was created in Access 2000. I'm in the process of testing the database in 2003, however if I try and edit any of the vba code in 2003 I get a C++ runtime error and the prgram closes without saving. I have tried to convert the db to 2003 and this makes no difference...

I went with the Add new method. Your code worked a treat. Thanks very much.

Thanks for the replies. I'm not sure whether your suggestions will be able to actually acheive what I want. Mainly because I actually use the queries to pass info to other queries rather than just populate list boxes. below are the three queries I would use in the process. Hopefully that...

I currently have a form with two list boxes. The first list box call up an SQL statment. I then have a command button which using an addition query allows you to select one row at a time and add it to the second List box. I also have a second command which copies all the entries across...

Ok, I have cracked it. For those that maybe interested in the future here is how I managed it. In saying that I would appreciate any feedback thanks CODE 'Make a new File System object. Dim fso As FileSystemObject Dim fsoFolder As Folder Dim fsoFile As File Set fso = New...

I have been trying to write a sub which would look in a folder and delete only certain file types. for example the folder would have three file types but I only want to get rid of 2. I hav tried something like this. Dim PathnameDGN Dim PathnameDWG PathnameDWG = DrgDest & "*.dwg"...

Thanks your a star !!!

Ok here is the full code. Private Sub Command178_Click() On Error GoTo Err_Command178_Click Dim SourceFile, DestinationFile As String Dim rstWzip As DAO.Recordset Dim DrgNo As Variant Dim DrgPath As Variant Dim DrgDest Dim DrgIsID Dim strSQL DrgDest = "C:\Test...

I have been working on this module for a while now. I have made progress with help on a previous posting but I seem to have hit a wall. Basically I have a recordset that I want to loop through. Within each loop I want to set VARIABLES from certain feilds within the Recordset. I then use the...

AFter debuggin through the code above basically it appears that the SourceFile remains "empty" as does the DestinationFile !! What is the reason for this. ?? Is it not possible to have this type of command as part of a loop ?? thanks in advance

Help again !!! Now that the query rountine works I cannot get the copyfile command to work in the loop. My code is this now While Not rstWzip.EOF SourceFile = rstWzip![Path] + rstWzip![DigitalFile] & ".dwg" ' Define source file name. DestinationFile = DrgDest + rstWzip![DigitalFile] &...

PHV, Thanks a mil. That got rid of the parameter problem. Only thing I need to figure out now is how to get the copy part to work, Regards

I apologise for the delay holidays and that. The form is open when the command is run. That is what confused my. If I do a run query command button whilst the form is open it works fine. This is my code now. Now I get an object required. I think I'm biting of more than I can chew with this...