I would just use a for/next loop. That there would add a new record with the AppName and the Date for the next 12 months.

Also you can just use AppDate (or whatever your field is called), don't need to call it like Forms!FormName!FieldName I was just messing around with it

Teeka
Great news!  You don't even have to wait for a video because this was already asked.  (Plus Richard seems to be a mind reader at times - LOL)
He covered this in the Add Records Automatically video.  All that you have to do is determine how many you want to add - Press the button - and (in ALZ speak)   BOOM! the records are input for you.

Here is another video that might make a good addition to your calendar.
On Click

Oh my gosh!  You guys ROCK!!!!

Bugger!  I got all of the code in and it runs but doesn't meet the requirement. It  goes through the loop BUT using date add creates SAME date for each month on the calendar for 12 months:  jan4, feb4, mar4, apr4, etc. The requirement is to select which week of the month (1st-4th) and which day of the week (Mon-Fri) and calculate the date for a standing appointment. EX: The first Monday of every month.  That part of the code works for the first instance:  The end user picks the week, then picks the day, Access calculates the date for that month and puts it in the table.  What I need is one step further:  Put it in the calendar EVERY month 12 months out using the week and that day the user selected.  I know it's possible.  If Preferred Week and Preferred Day stay the same once selected then we need to loop through and add 1 to preferred Month 12 times BUT we also have to check for Jan. in the count and add one to the year if that occurs.  I have NO idea how to write it.  Please help

Please copy and paste the code you have here. it would be easier for us to help you tweak it than guess what you have.

I was just looking, it looks like Rick made this for you a few months back? First Monday Using that template with some slight changes we can make our loop. You're a platinum member so you can download the template, copy the GlobalMod into your database.

I have a field called PreferedDay and PreferedWeek on my form, I had a value of 2 in both of those, those are the results I got from it. The second day(monday) of the second week.

Also you need those +0s or you get a type mismatch, I don't know why LOL

Also I'm sure that's not the prettiest way to do that, I was trying to include Rick's find the day code he wrote for you ;).

Sorry I didn't pick up that you were THAT Teeka.  haha.

Just to take Adams solution and Rick's solution one step farther...

To make this even more flexible, I would make another combo box called "MyHowMany" (following Rick's naming convention).  For that, the value list would simply be 1, 2, 3, ..., 10, 11, 12.  Default value to 12 (or what ever you want).  That way if your needs change in the future and booking out a full year isn't practical you can specify How Many Appointments you want to add.  Add 1, 4, or "Z" appointments with out changing your code.

You would have to modify Adams code.

      Z = MyHowMany

      For AppCounter = 1 to Z