Search results

Currently It works but with the exception that when Access doesn't find the jpg it reverts back to last found picture. Therefore pictures of the wrong person are showing up. I have code like this on AfterUpdate: Private Sub Form_Current() On Error Resume Next...

Below is my Sub and it doesn't work either.... Private Sub cmdExportExcel_Click() Dim qdf As DAO.QueryDef Set qdf = CurrentDb.QueryDefs("qselEmployeeInformation") qdf.SQL = "SELECT * FROM TableName WHERE " & Me.Filter qdf.Close Set qdf = Nothing DoCmd.TransferSpreadsheet acExport...

I did not, was I suppose to?

So I would type Sub first? Or Function? What would the code look like with a sub or a function?

=Nz([strImagePath],"\\sitmctcr.servers.chrysler.com\ctcgroups\Engineering Database\Photos\NO IMAGE.jpg") I put this in the control source

This doesn't work. Now no pictures come up.

VBinet, I appreciate all of your help but I have no idea where that code would go in my current sub. I DO NOT know how to write code or how it is structured. I can copy code and put it where it needs to go and that's about the extent of my code knowledge. Where would this code go...

Is this code on Before update, After Update? Where would I put this code? The current code is on After Update

It is a single form. This form contains each individuals information and photo. When going to next record if the picture is not found Access uses the last found picture. I'd like it to default to the NO Image Jpg

I am getting an error when I run this "Invalid Outside procedure" Dim qdf As DAO.QueryDef Set qdf = CurrentDb.QueryDefs("qselEmployeeInformation") qdf.SQL = "SELECT * FROM TableName WHERE " & Me.Filter qdf.Close Set qdf = Nothing Private Sub cmdExportExcel_Click() DoCmd.TransferSpreadsheet...

Is it possible to add a true or false statement to the coding for this? Currently, if Access can't find the individual's picture in the folder that the path is pointing to it displays the last picture that was found. Can I add a true/false statement that tells Access if file not found open...

OK. Thanks. I'm not sure what the code would look like for Query Def.... a little help here? I researched query def and I can't seem to find what I need.

I am all set on this one, Thanks. I changed form to continous form. Can you help me out with my export to excel VBA code. No-one seems to know how to write the code. Private Sub cmdExportExcel_Click() DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "qselEmployeeInformation"...

Access 2010 [Code] Private Sub cmdExportExcel_Click() DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, Me.Filter, "qselEmployeeInformation", "c:\EmployeeInfo.xls", True End Sub [code\] I am using this code to export to excel and I'm getting this error. I know it's the filter but...

What about a split form? In access 2010 there are split forms? I tried to view the split form on a navigation from and the datasheet portion of the split form doesn't show up. Any idea why it doesn't show up?

Will a datasheet view From allow command buttons? When I add a command button and then go to Form view only the datasheet is displyed. What happened to my command button?

Well, I've searched the internet for queryDef and I see what it's doing but I cannot write the code because I don't know how. I am looking to place a me.filter in export code but I don't know where it goes or if it's even possible.

Sorry but I don't know what either of those statements mean. That's why I am looking for the code. The form is in datahseet format so there aren't any text boxes.

Here is some code that I found on line? Where would I insert the me.filter so that access export only the filtered data from the query DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "qselEmployeeInformation", "c:\temp.xls", True

What does the code look like for the export to excel macro?