Aşağıdaki kodu deneyebilir misin?

Me.Controls("Line" & Forms!Form1!sayi.Value).Tag = "Line" & Forms!Form1!sayi.Value

For Each ctl In Me.Controls

        If ctl.Tag = "Line" & Forms!Form1!sayi.Value Then

            ctl.Left = 2500

            ctl.Top = 2500

        End If

Next