her tablo için neden yeni form oluşturmak istiyorsunuz?
zaten formların kaynağını değiştirerek de kullanabilirsiniz aslında her ay için farklı bir tabloya da gerek var mı onu da merak ediyorum
ama aşağıdaki kodların işinize yarayacağını düşünüyorum
önce yeni bir alt yordam oluşturup ekliyoruz

Sub YeniForm(FormTabloAdi As String)

Dim frm As Form

    DoCmd.TransferDatabase acExport, "Microsoft Access", CurrentDb().Name, acTable, "tablo_sablon", FormTabloAdi, True

    DoCmd.CopyObject CurrentDb().Name, FormTabloAdi, acForm, "mutabakat_formu_sablon" 'şablon formu kopyala

    DoCmd.OpenForm FormTabloAdi, acDesign, , , , acHidden



    Set frm = Forms(FormTabloAdi)

        frm.RecordSource = FormTabloAdi

    DoCmd.Close acForm, frm.Name, acSaveYes

End Sub

sonra da buton7nin tıklanma olayını aşağıdaki kodla değiştiriyoruz

Dim AyAdi As String



AyAdi = InputBox("Ay Yaz")

AyAdi = "Ayl_" & AyAdi

    YeniForm AyAdi

Me.Acilan_Kutu5.Requery

dosya 5. mesajdadır