Search results

Doesn't display "Long date" to include the day of the week. I used this and it worked. Format([rangedate],"Long Date") Thanks for the help.

So I can get the "long date" to display within the query field itself. However, the "long date" is not displayed when using the date field in a user defined field. Is there a way to have the "long date" displayed. I tried using a calculated field in the table that the query references, but...

Thanks, I will try that out. I've never used DCount(), but I am sure that I can figure something out.

OK. New plan same result. I have 2 queries that return the trained and untrained records from their corresponding tables. I did not joining them, but I am still receiving a sum of the queries records as a result. I am only trying to return the count of the number of records returned by each...

The training types and information that is stored in the current training tables is too diverse to fit into one table, unless its un-normalized. As it stands I only have 4 training tables (normalized), which contain all of the training information, plus an employee table (normalized), and a few...

SELECT Count(tblMasterFile.EDIPI) AS Assigned, Count(qryATTrained.EDIPI) AS ATTrained, [ATTrained]/[Assigned] AS ATPct, Count(qryEOTrained.EDIPI) AS EOTrained, [EOTrained]/[Assigned] AS EOPct, Count(qryChamberTrained.EDIPI) AS ChamberTrained, [ChamberTrained]/[Assigned] AS ChamberPct...

I have one table that contains all of our assigned employees. Other training event tables have Employee ID and training dates. Looking to develop Trained and Untrained percentages based upon queries to populate to a dashboard on the main menu. tblMasterList ID Name EmployeeID...

So I am running a query against a table to return the total number of records within the table, this number changes following data imports. Viewing the table there are 550 records. Running just the query against the table returns a 550 count, but Running the query after associating it with...

Moved to one line, same error. SetWarnings removed, doesn't provide any other indication or warning other than the "subscript out of range" error. Modified code to search by both columns and rows, no effect. Tried using a Macro enabled file for import, no effect. I am at a loss. Is there an...

No. not specifically. I am removing all of the "." throughout the entire sheet. A specific cell or column selection is not required. I have run this same VBA through Excel only and it has no problem running this line of formatting code, the error is only when running as formatting as part of the...

Changing " " to "" has no effect. Error still present. :banghead: Thanks all.

All spaces have been removed from the columns. Still receive the "subscript out of range" error. Here is a more complete list of my code to assist. Private Sub btnImportMOL_Click() Dim MOL As Object Dim MOLFilePath As String Dim objXLApp As Object Dim objXLBook As Object Set MOL = Nothing Dim...

Hello all, So it seems simple, but as part of an excel import I use some automated formatting to match my excel to my table structure. Recently I tried to modify it to remove the "periods" in my name field. However, I keep receiving a subscript out of range error. I also receive this error...

objXLApp.Selection.Replace What:=".", Replacement:=" ", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Dies right here. Not sure why. I have taken out the VBA and placed it directly in the .xlsx sheet and it runs fine, but...

Thanks for the help. It worked with the following: Dim SQL As String SQL = "INSERT INTO tblNewJoinDate ( LastRun ) VALUES ( #" & Me.NewJoinDate.Value & "# );" DoCmd.SetWarnings False DoCmd.RunSQL SQL DoCmd.SetWarnings True

Good morning all. I'm trying to copy information from a unbound txt box on a form into my table and I am having trouble with the formatting: table name: tblNewJoinDate Field Name: Last Run Form txtbox name: New Join Date I'm getting a SQL INSERT INTO formatting error message Private Sub...

Good Morning All, I'm getting a "runtime error 9" Sub-script out of range. This hasn't been a problem before when I have used this same formatting code in other applications. The problem occurs in the objXLApp.Selection.Replace What:=".", Replacement:="..", LookAt:=xlPart, _...

OK, so I figured out a way around the issue. Its not pretty and it doesn't allow me to just type in the updates on the form, but it does allow me to select mismatched records by [command] from the combo box. I did this through the use of two queries. The first query finds all of the...

Unfortunatley no change.

The query does run both out of the form and in the form. It displays all mismatched records between the two tables. However, when I select an item (a specific command) from the combo box the query does not update to only show those mismatch records with the corresponding command. Because the...