Thank you everyone!!! I really appreciate your help and input.
The .csv file that I have linked to doesn't have the leading numbers on the SS#'s, so I guess this is why making the link table field a string did not help.
I did, however, create a new query with all of the fields from the link...
I have a link table created that links to a .csv file.
I can't get the SS#'s in one of the fields of the link table to show the first number of the SS#'s if the first number is 0.
It is important that the 0's are there, as I have several update queries that depend on this format.
any ideas?
I agree with TheAceMan1:-)
However, with forms, what you can do is create an unbound form and insert two subforms into this form. Both the subforms would be based on the same data source but the first subform should be set as data entry only. This subform would provide you the place to edit a...
This variation works for some reason Axo. Thank you very much for your help!
DoCmd.SetWarnings False
If (([TYPE] = "CHEST X-RAY") Or _
([RESULTS] = "COMPLETED") Or _
([TYPE] = "MANTOUX" And IsNull([RESULTS]))) _
Then
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
Else...
I am sorry Axo...I don't mean to be confusing :-)
If the TYPE is "CHEST X-RAY", I do not want the query to run.
Or
If the RESULTS are "COMPLETED", I do not want the query to run.
Or
If the TYPE is "MANTOUX" AND the RESULTS are null, I do not want the query to run.
Just re-stating for...
well...for some reason...it is not working
when I enter a record with "MANTOUX" TYPE and null RESULTS, the query still runs...the same with "COMPLETED" RESULTS.
I don't want the query to run if the above criteria is met.
Thank you Axoliien! :-)
I have the following event procedure:
Private Sub Form_AfterUpdate()
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
DoCmd.SetWarnings False
If [TYPE] <> "CHEST X-RAY" Then DoCmd.OpenQuery "UPDATE - TB DUE DATE"
DoCmd.SetWarnings True
End Sub
For the life of me, I cannot figure...
Can anyone please help me re-write this code more efficiently?
Private Sub RESULTS_AfterUpdate()
DoCmd.RunSQL "UPDATE [EMPLOYEE HEALTH] SET [EMPLOYEE HEALTH].[TB DUE DATE] = " & _
"IIf([TB DUE DATE] > DMax(""[DATE]"", ""EH - TB"", ""[ID]=" & Me![id] & """) Or [TB DUE DATE] Is Null, " & _...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.