Recent content by RichD

Try using the dcount method: If dcount("Fieldname", "Queryname") = 0 then Msgbox "There is no data to display" exit sub end if HTH Rich Bespoke and off-the-shelf Access solutions www.blsoftware.co.uk

JAES, I would add another column to your combobox with the required value of your yes/no box. ie -1 or 0. Use the afterupdate event of your combo box: Private Sub Text87_AfterUpdate() me.casefileclosed = me.typeOfInvestigation.column(1) end sub This assumes that the -1 or 0 is in the second...

FXP, Thanks for the reply. I will have a look at forwarding. Rich Bespoke and off-the-shelf Access solutions www.blsoftware.co.uk

Hi All, I have a problem with Outlook VBA, as follows: I have my own domain name and consequently get everything@mydomain.com downloaded to outlook (mostly junk). There are several users on the same PC with their own profile. What I want to do is copy specific mail items to the relevant user...

Glenn, Its the data in the data table that cannot be read, because the field widths are too narrow for the values. It is a line chart. Keith, Good suggestion I will factorise the values. Thank you both, Rich Bespoke and off-the-shelf Access solutions www.blsoftware.co.uk

I have a chart with its data table displayed (approx 40 values) because the values are up to 15,000 you cannot read them when displayed normally, so I want to display the text vertically. Is this possible? there is no option in the Format Data Table dialog. TIA Rich Bespoke and off-the-shelf...

I had exactly the same problem and resolved it by using ' (single quote) in place of #. To use KenReay's example I changed " AND RequestStatusDate = #" & Format(dtmMax, "mm/dd/yyyy hh:nn:ss") & "#;" to " AND RequestStatusDate = '" & Format(dtmMax, "mm/dd/yyyy hh:nn:ss") & "';" Thanks Ken...

Only one wish: VBA type runtime (exe), not the 200Mb monster that Access currently creates. Rich Bespoke and off-the-shelf Access solutions www.blsoftware.co.uk

Golom, In the end I took the easy way out and linked the remote table in VBA, ran the modified SQL string, then deleted the link. Many thanks for your help, I have learnt a bit more about SQL strings today. Rich Bespoke and off-the-shelf Access solutions www.blsoftware.co.uk

Thanks Golom I have put variables in as follows, but I still get the same error: UPDATE [projectcodes] As T1 INNER JOIN [projectcodes]IN 'C:\Updatetables2.mdb' As T2 ON T1.[Code] = T2.[Code] SET T2.[Code] = T1.[Code], T2.[Description] = T1.[Description], T2.[Client] = T1.[Client], T2.[Full...

I am trying to use the IN clause to update a table in another mdb. VBA produces the SQL string, but I get Error 3144 Syntax Error in Update statement. The table names and field names are the same in both mdbs. Here is the string: UPDATE [projectcodes]INNER JOIN [projectcodes]IN...

Ben, Thanks for the reply and the download. I have had a look at it and have just one question. Do you know whether a zip file created in this way could be unzipped by Winzip or PKzip, or would the recipient have to have the unzip routine that is supplied in your download? Thanks again...

Tranman, Many thanks for your help I will give it a try. Rich Bespoke and off-the-shelf Access solutions www.blsoftware.co.uk

Take a look at Mike Thornton's excellent faq705-1634 in the FAQ section of this forum. I have just used it - no problems at all. Rich Bespoke and off-the-shelf Access solutions www.blsoftware.co.uk

I am trying to create a Windows XP compressed (zipped) folder from Access 2000 using VBA. I then want to copy files to the zipped folder and email it. The copying and emailing aren't a problem, but I am having trouble in creating the zipped folder. Any ideas? TIA Rich Bespoke and...