VBA'dan Tools/References'ten Microsoft Visual Basic for Applications Extensibility seçiyorsunuz. Daha sonra Textbox eklemek istediğiniz formdan önceki forma aşağıdaki kodları ekliyorsunuz. Form açıkken bu uygulama çalışmaz bu yüzden öncesinde yapmanız gerekiyor.

Sub deneme()

Dim X As Integer

Dim ctl As Control



DoCmd.OpenForm "FormAdı", acDesign



For X = 0 To 2 'Kaç adet eklemek istiyorsanız döngüyü o kadar değiştirebilirsiniz.







Set ctl = CreateControl("FormAdı", actextbox, acDetail)

With ctl

.Name = "Mytextbox" & X + 1

'Formda textboxları nereye yerleştirmek istiyorsanız aşağıdaki değerleri ona göre değiştirebilirsiniz.

.Top = 600

.Left = 600 + (800 * X)

.Width = 800

.Height = 3000

.BorderStyle = fmBorderStyleSingle

.SpecialEffect = fmSpecialEffectFlat

End With

Next

DoCmd.Close acForm, "FormAdı", acSaveYes

End Sub

ErtiAV arkadısımızdan alıntıdır
https://accesstr.net/konu-form-uzerindek...silme.html