The VBA could be a sub with arguments for month and year. The code would use the month value to calculate how many days are in the month. Then a loop structure would save records. The save can be to an editable recordset opened by the sub or an UPDATE direct to table. Something like:
Code:
Sub CreateRecs(intMonth As Integer, intYear As Integer)
Dim intDays As Integer, i As Integer, strAMR As String
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
CurrentDb.Execute "DELETE FROM MonthAndDays"
rs.Open "SELECT DISTINCT AMR_AIS_NUM FROM tblMonthly_Link;", CurrentProject.Connection, adOpenForwardOnly, adLockPessimistic
intDays = Day(DateSerial(intYear, intMonth + 1, 0))
While Not rs.EOF
strAMR = rs!AMR_AIS_NUM
For i = 1 To intDays
CurrentDb.Execute "INSERT INTO MonthAndDays(AMR_AIS_NUM, Dates) VALUES('" & strAMR & "', #" & DateSerial(intYear, intMonth, i) & "#)"
Next
rs.MoveNext
Wend
End Sub