Search results

I tried to print a document by manually selecting print button from the menu bar and it works fine. Not sure why the code doesn't print it off.

yes there is trailing backslash after the folder name

that's great Arnelgp, it works perfect

Really weird , why its not working for me then? when I try to display the "Target Folder name" then it says C:\Access Databases\Project_1\MDB (which is right) And when I try to display the "File name" then it says Appointment clarity.xls (which is right as well) Not sure whats going...

I am using using a function named nameofuser() Function NameofUser() As String ' Returns the name of the logged-in user Dim Buffer As String * 100 Dim BuffLen As Long BuffLen = 100 GetUserName Buffer, BuffLen NameofUser = Left(Buffer, BuffLen - 1) End Function SO what...

sorry I can't upload database because of security restrictions in my company. Me.lstDocs.ItemData(I) gives me both filepath and filename but why its not printing anything . Does this code work for you?

Hi Guys I have been using following code to add files to the database. I am looking for some code to add in this existing code so that it creates a unique folder for each user and then store a copy of the files in that folder. At the moment all the files get stored in "C:\Scanned Documents"...

Column(0) in the listbox stores filepath and file name as well. so if I write following line of code then it gives me "c:\access databases\project_1\mdb\abc.xls". It doesn't print anything . MsgBox Me.lstDocs.ItemData(i) PrintAnyFile Me.lstDocs.ItemData(i)

Arnelgp, it doesn't print off anything. The file stored in column(0) is in the following format and we need to print off "Appointment Clarity.xls" file. C:\Access Databases\Project_1\MDB\Appointment clarity.xls

yes, it could be any file format e.g .pdf, .doc , .xlsx ?

Hi Guys I have a listbox which stores the file path in column (0), I want to write down the vba code so that when a button is clicked then it prints off all the files stored in the listbox. As the file path gets stored in a table , so for one recordID there might be multiple files in that...

Arnelgp Actually I just want to display just the headers Bold and not the value .

Hi All I have written the following code but I want to display 'Agent' and 'Submission Date' in Bold. ANy suggestions are welcome. Thanks Private Sub lstRed_Click() Me.txtRed = "Agent: " & DLookup("[Staff Name]", "[tblstaff]", "[Staff Number]=" & Me.lstRed.Column(2)) & vbNewLine &...

I have figured it out. I just had to define the query parameters in cross tab query for Forms!frm_RmS_dashboard!txtDateStart and Forms!frm_RmS_dashboard!txtDateend

as this is a group by query and I don't have to group by date so that's why there is a WHERE criteria on that field and its hidden. I think that's why my final query which is linked to graph isn't working because there is no date field in the row heading. Any help will be much appreciated.

The following queries have date filter in it and Date field is hidden . 'qry_RMS_ReturnReason1' SELECT tblstaff.[Staff Name], tbl_RMS_Paperless1.[1stRefuseReason], Count(tbl_RMS_Paperless1.[1stRefuseReason]) AS Times, tblstaff.[Staff Number] FROM tbl_RMS_Paperless1 INNER JOIN tblstaff ON...

This is a order of my queries so far. What changes you reckon need to be made to make date criteria working. 1. qry_RMS_ReturnReasons_1 2. qry_RMS_ReturnReasons_2 3. qry_RMS_UnionReasons 4. qry_RMS_Dashboard_Reasons 5. 'qry_RMS_Dashboard_Reasons_Final'

that's a good shout Arnelgp.But how can I make this working?

Ridders, I have put following date criteria in 'DateSubmit' field in the following query which works fine: SELECT tblstaff.[Staff Name], tbl_RMS_Paperless1.[1stRefuseReason], Count(tbl_RMS_Paperless1.[1stRefuseReason]) AS Times, tblstaff.[Staff Number] FROM tbl_RMS_Paperless1 INNER JOIN...

Ridders, I have tried it as well in access query wizard like below but getting error "The expression has an invalid date value" >=#" & Forms!frm_Dashboard!txtStartDate & "#