Recent content by scuddersm

  1. S

    Diplay long date in defined field in query

    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.
  2. S

    Diplay long date in defined field in query

    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...
  3. S

    Multiple Query Returns Incorrect Totals

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

    Multiple Query Returns Incorrect Totals

    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...
  5. S

    Multiple Query Returns Incorrect Totals

    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...
  6. S

    Multiple Query Returns Incorrect Totals

    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...
  7. S

    Multiple Query Returns Incorrect Totals

    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...
  8. S

    Multiple Query Returns Incorrect Totals

    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...
  9. S

    Subscript out of range 9

    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...
  10. S

    Subscript out of range 9

    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...
  11. S

    Subscript out of range 9

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

    Subscript out of range 9

    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...
  13. S

    Subscript out of range 9

    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...
  14. S

    Run Time Error 9 Sub-script out of range

    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...
  15. S

    Copy form data into table

    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
Top Bottom