Code:
Private Sub Command14_Click() Private Sub Command14_Click() stDocName = "Table1" DoCmd.TransferSpreadsheet [acExport], , stDocName, _ "C:\ Export Folder\Table1.xls", 0 End Sub
fieldling
Last Activity: Oct 6 '08, 12:34 PM
Joined: May 16 '07
Location:
-
Transfer spreadsheet question
I use the following code on a command button to export "Table1" into a spreadsheet called "Table1.xls .
This works fine but what I would like to do is save the spreadsheet like this: "Current... -
Hi I've managed to fix it and all running smoothly. Thanks for your help.... -
Thanks for your help.
It's version 6.3
It doesn't recognise the EndEdit command although I may not have done it correctly. How would you put that command in?...Leave a comment:
-
I have put .edit in line 10. Is this incorrect?...Leave a comment:
-
Recordset update problem
I've written the following code to update a recordset but when I run it I get a Run-time error 3020: Update or CancelUpdate without AddNew or Edit. When I debug it highlights the rs.update line. I've serached this forum and others for an answer but no luck. Anyone got any ideas? Thanks
[CODE=vb]Option Compare Database
Public Function fImportdata()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set... -
It's only taken a month but I've finally got around to replying.
I used Freefile as you suggested and it's all working perfectly now so thanks for your help....Leave a comment:
-
Ok. I haven't come across FreeFile() before but I'll look into it and let you know how I get on. Thanks for your help....Leave a comment:
-
I've changed the code so it now looks like this:
...Code:Private Sub Ship_labels() Dim db As DAO.Database Dim rs As DAO.Recordset Set db = CurrentDb() Set rs = db.OpenRecordset("Daily Shipping Query", dbOpenDynaset) rs.MoveFirst Do Open "LPT1:" For Output As #1 Print #1, rs![Module] Print #1, "" Print #1, rs![Name]Leave a comment:
-
OK thanks for that. I'll make some changes and come back to you....Leave a comment:
-
Hi, that close is in there by error by the look of it. I've removed it and also changed the string to variant. When I run it it says "object required."
Here's how the code looks now:
...Code:Public Function fcmdPrint3_Click() On Error GoTo Err_cmdPrint3_Click Dim t_module, t_Name, t_ADDRESS1, t_ADDRESS2, t_ADDRESS3, t_POSTCODE Set t_module = [Forms]![Shipping Labels]![txtmodule] Set t_Name = [Forms]![Shipping
Leave a comment:
-
Printing from a query / recordset.
I have a query which I view through a form. Due to problems with the label wizard printing to a dot-matrix printer I have some code to print out a single label when a command button is clicked. This works fine.
However I would like to print all the records from the query on to consecutive labels.
Below is the code for this function but it doesn't work (surprise, surprise). I probably don't need the form in the code... -
Yeah I did have a look but to no avail. I'm going to cut my losses and go with the laserjet I think....Leave a comment:
-
I don't think they are still marketing it. The printer was here before the office was built! :-)
I've also worked out why there was only one label per page when using label wizard. On the page set-up the bottom margin was set to over 200cm. I've adjusted this and all the labels are now showing on one page.
However, the label wizard can't seem to grasp the concept of continuous labels. It even prints the blank space between...Leave a comment:
-
New drivers have been installed and the error code is no more! :-)
However it is still printing the blank labels but as far as I can tell this is an error within the label wizard. It just does not seem to recognize continuous labels.
I'll have to use sheet labels on the laserjet instead.
Thanks.Leave a comment:
-
It's Access 2003. I tried what you said but hasn't made a difference. The labels look fine when I choose a sheet rather than continuous. I guess I'll have to use that option.
If you have any other ideas please let me know.
Thanks for your help.Leave a comment:
-
Label Wizard question
This follows on from my previous post about label printing. Can anyone tell me if this is correct:
I've created a standard address label on the wizard. The labels to be used are Avery 4011 continuous feed to a dot-matrix printer.
When I run the report with for example five different labels, in print preview it shows each label on a separate page rather than on the same page. Is this correct?
As I'm still trying... -
Couldn't find any .dbf files. I'll post back here if I do find anything. Thanks for all your help....Leave a comment:
-
Thanks Linq, I'll try that out and get back to you....Leave a comment:
-
Yeah I tried that and the same thing happens. It prints labels fine from the DOS database we've got but as soon as I try to print from access or word all hell breaks loose.
I think it is the driver but not sure what to replace it with.Leave a comment:
-
Label printing problem
I have set up a query and a report using label wizard so that I can print the address details of the current record when viewed on a form. This works fine until I actually need to print:
The printer I'm using is an Epson LQ-300, printing on continuous-feed labels (Avery 4013's I think).
The problem I've got is that the following text is printed before each label:
@EJL 1284.4
@EJL
The address is then...
No activity results to display
Leave a comment: