i need some help in a frame

[elbazreturn]

i'm using this code to auto add textboxes inside the userform

Dim i As IntegerFor i = 1 To Sheets("sheet8").Range("a10000").End(xlUp).Row
Set tBox = Controls.Add("forms.textbox.1")
With tBox
.Name = "textbox" & i
.Left = 20
.Height = 20
.Top = i * 20
.Width = 160
.Font.Size = 12


Me("textbox" & i) = Sheets("sheet8").Cells(i, 1)


End With






Next i

i want to change their place to make it appears inside a frame in the same userform

 

[DanteAmor]

Try this

  For i = 1 To Sheets("sheet8").Range("a10000").End(xlUp).Row
    Set tBox = [COLOR=#0000ff]Frame1[/COLOR].Controls.Add("Forms.TextBox.1")
    With tBox
      .Name = "textbox" & i
      .Left = 20
      .Height = 20
      .Top = i * 20
      .Width = 160
      .Font.Size = 12
      Me("textbox" & i) = Sheets("sheet8").Cells(i, 1)
    End With
  Next i

 

[elbazreturn]

Try this

  For i = 1 To Sheets("sheet8").Range("a10000").End(xlUp).Row
    Set tBox = [COLOR=#0000ff]Frame1[/COLOR].Controls.Add("Forms.TextBox.1")
    With tBox
      .Name = "textbox" & i
      .Left = 20
      .Height = 20
      .Top = i * 20
      .Width = 160
      .Font.Size = 12
      Me("textbox" & i) = Sheets("sheet8").Cells(i, 1)
    End With
  Next i

Thank You The Code Worked well .

 

[DanteAmor]

I'm glad to help you. Thanks for the feedback.