Search results

Yes..of course....Think I was trying too hard...Thanks for your help.

Hi All, I have a table that has multiple records that are basically duplicates that differ in one field only. I want to get rid of all duplicates leaving 1 record which is the one with the highest value in this field. Can this be done with a query? or do I need to use VBA code to generate this...

Hi All, I have a table that has multiple records that are basically duplicates that differ in one field only. I want to get rid of all duplicates leaving 1 record which is the one with the highest value in this field. Can this be done with a query? or do I need to use VBA code to generate this...

Thankyou... I used your code like this to replace my last line... [Forms]![frmMain_Form].Controls(Fld).ForeColor = 112 And it did exactly as I wanted... Thanks Curry

Him All, I am trying to change the forecolor of multiple text boxes after the selection of one or many of these text boxes listed in a List box. As a user selects from the list the coresponding text box needs to change to red. There are a lot of text boxes and I do not want to have an...

This solved it....Thanks very much.

I put back the OutputTo command and tried the above code and I got the same Object Required Error.

Actually I tell a lie. The issue I get without the OutputTo command is "Object Required" and the code stops. If I Add a new Excel Workbook rather then trying to open the existing all works fine. My problem is with opening the existing File.

Thanks for that however I have tried this without the OutputTo command using an existing excel file in the correct location. I get the same problem.

Can anybody assist me with this? The file outputs OK to the location I want however I keep getting an Script Out of range error when Access tries to open the file to run the rest. DoCmd.OutputTo acOutputQuery, "qryExcel_Selected_List", acFormatXLS, "C:\Users\" & Environ("UserName") &...

Hi All, I came up with a solution which will change the Worksheet name in the Excel Spreadsheet removing the space at the end or will ignore if the space is removed down the track. Dim db As Database Set db = CurrentDb Dim xlApp As Object, xlWrkb As Object Set xlApp =...

I am using this command DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblSales_YTD", strFileName, True, Worksheet & "!" where Worksheet is the name of a Worksheet on an Excel spreadsheet which is importing into the Database. The user puts the name of the worksheet they want...

Hi All, Is there a way to format a text box to allow a space at the very end of a alpha/Numeric entry...ie "@@@@ ". Every time I type the space at the end it drops off however I want the space to be a part of the Text box entry. Thanks All.

Thanks for that....This helped me a lot. IC

Hi All, I have a Union query that brings together several tables into one. This works perfectly well however there is an occassion when a field in one table has its data type changed to text from date. This is to allow N/A to be entered rather than a date. When this occurs the union query...

Hi All Again, No responses to this so I assume this can't be done.....Instead I created an Option Group with the two potential data types my fields can be (Text or Date) which I named Type_Select. I then use the following code which runs when you select a field from the Field_List list box. The...

Hi All, I have a List box in a form which is currently showing the Field List of a table. I also want to show the data type of each field next to each field name. eg Field_1 Text Field_2 Text Field_3 Date Field_4 Text I have set the List Box to column count 2 however all...

Not to worry...I have tackled this differently and resolved my issue. Thanks All IC

Hi All, I am using the followong code to create a form on the fly based on another form... Set frm = CreateForm(, "frmTemplate") This works fine for what I want except frmTemplate has some code within it which runs On Load however this code does not copy over into the new form. I have tried...

Thanks for that....I will give this a go. IC