GDC1970
Last Activity: Feb 9 '15, 05:53 PM
Joined: Oct 17 '14
Location:
-
It does not go into next year since the weeks start over. 1-52 -
Thank you for your assistance.
That works but it only gives me all my activity dates on Friday 5 weeks out. I need it to show me all dates Monday through Friday 5 weeks out.Leave a comment:
-
Query criteria - Looking for 5 weeks from this week
I need the criteria to pull all dates for five weeks from this week.
I am using the following for query criteria and it works, but now that the year is ending, it does not work.
Code:Year([Activity Date])*53+DatePart("ww",[Activity Date])= Year(Date())*53+DatePart("ww",Date())+5 -
Excellent thanks for your feedback, ill follow your suggestions.Leave a comment:
-
Weekday function
I am having problems with my code. I am trying to look at a date on a form and show me the weekday number for that date on the same form different text box. I am using MS ACCESS 2013 VBA
Code:Private Sub TxtAppointmentDate_BeforeUpdate(Cancel As Integer) Dim D As Date Dim W As Integer D = (TxtAppointmentDate) W = Weekday(D) Me.test = W End Sub
-
When I run code with an error, it gives me the option to debug. Once I click the reset buttom, VBA and my database closes.
Also when typing code, it is suppose to show you Properties and Methods, SUch asCode:Me.TxtBox
Leave a comment:
-
I reworked the code and I got it working great. I really appreciate all your help. This is going to make a huge difference.Leave a comment:
-
MS Access VBA closes with the database when I debug and stop the debuger
Anyone know why it does this or how to make that stop. Also It will not list properties and methods why typing. -
I changed
Dim DateCounter As Variant instead of As Date and it does not debug on this line.
Now it debugs on:
Do While Not Weekday(DateCou nter) = DayOfWeekLeave a comment:
-
I added a ) to:
DateCounter = CDate(DayOfMont h)
I think it was missing, the code is not red. But it does stop and debug.Leave a comment:
-
Thanks for your help, im trying the code and im getting an error on:
DateCounter = CDate(DayOfMont h & "-" & Format(dateadd( "m", Interval, DateCounter), "mmm") & "-" & Year(dateadd("m ", Interval, DateCounter))Leave a comment:
-
I really appreciate your helpLeave a comment:
-
I am pretty good with VBA but not and expert. I do use a form to select the activity I want, then enter a start and end date. I usually schedule for 2 years at a time. This code works great for weekly, bi weekly scheduling, but I need to incorporate the monthly.
Here is my current code:
...Code:Public Sub Assign_Groups_Click() Dim NumLoops As Integer Dim Freq As Variant Dim Interval As Variant
Leave a comment:
-
Or if my start date is a monday the 2nd monday of the month, I want it to add one month later on monday the 2nd monday of the month.
So I want it to use the start date info to produce the next month and day of weekLeave a comment:
-
Thats exactly what im looking for. There would be no special exceptions. I am scheduling activities for a treatment program and they are monthly on the 3rd fri of month, every month.Leave a comment:
-
DateAdd for The current month and day of week
I need to know the MS Access VBA code to produce a DateAdd to give me one month from today and the same day of the week.
No activity results to display
Leave a comment: