Search results

Ok thanks guys.... I had to do date diff by counting days to be more accurate. It works thank you!

Hello, I have to calculate years of service for each employee to show the correct vacation they would get. I am calculating the [YearsOfService] from the current year and changing the employees start date to year which works except the first vacation you get after your first 6 months and the way...

its option 1, I kept thinking I had to set focus to the group then the option.... Thanks that worked!

Hello, when I close my form2 I want to set an option "opt1" as selected in form1 option group "optReportGroup". What VBA do I use in the close of form 2 to make this happen?

It works, the Three text boxes that have the tag "required" I didn't add a second tag I just used Me.txtDateVWIReviewed = Null Me.txtDateSOCReviewed = Null Me.txtDateLOTOReviewed = Null

Thank you all!!! I got it working... instead of using the Instr() I just added the 3 controls at the bottom to clear. If Me.optMon Or Me.optTues Or Me.optWed Or Me.optThurs Or Me.optFri Or Me.optPaperLift = True Then Dim ctl As Control For Each ctl In Me.Controls With ctl...

Hello, I have two questions.... 1) I need to use the Tag property to clear my form and that's not a problem. The problem is a few text boxes already have a name in it that's used for verifying data. Can I use two tag names for one control? If so how would I enter it? this didn't work...

I tried a different work around, i used a query of the selected names to show in a list.

My row source type is Table/Query

Hello, I have a multiselect listbox and I want to move each item selected to the top of the list in the listbox so they are not all scattered in my listbox. How is this done? Thanks,

Thanks MajP, I put in the textbox source =[lstEmployeeNames].[ItemsSelected].[Count] & " Out of 10" An in the forms Current I put Me.txtNumOfSelected.Requery All works great thanks!

Hello, I have a multiselect listbox (lstEmployeeNames) that I can only have a max amount of 10 selections. I want to be able to show the number of selections already chosen from the listbox in a label named (lblNumSelected). Is this possible and how can I do it? I tried in a textbox control...

Trim will take any spaces away? If so then yes thanks!

Thank you that was it....

I did that but all its doing is moving the same comma separated data to my temp tables field. Its saving in temp table like: joe1, joe2, joe3..... I need it to be like: Joe1 Joe2 Joe3 Public Sub GetGenres() Dim rs As DAO.Recordset Dim rs_out As DAO.Recordset Dim x As Long Dim GenreList() As...

Hello, I have a field (DelimitedEmployees) from my table (tbl_WeeklySafetyHuddle) that are names/data saved as a comma delimited from a list box. Is there a function anyone knows of that will take that field in the table and separate the names into a temp table or something like that? I did...

@The_Doc_Man I can get it to print correctly using the code below for a 64 bit device but for some reason half way through running the code it closes or hides my form then showes is again. Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal Milliseconds As LongPtr) Option Compare Database...

Hello, How do I get the VBA below to wait until the .pdf opens and prints before continuing? My reports all stack in order by dates etc and the pdf is in the middle when its supposed to be after the first print. The code in question is marked with HERE.... TO HERE. I tried using DoEvents after...

Thanks for explaining! It does matter what day prints because I'm tiring to do several prints of different reports for a weekly packet and when I go through it the dates will all be in order. Thanks again!

@June7 that worked perfectly thanks! A few questions though.... First I got an error "Variable not defined" so I added (Dim x As Integer) was that correct? Next I really don't know how its printing if I didn't tell it to using Docmd.PrintOut? Last can you explain the For statement please? Im not...