[حل شده] For_next در textbox

[sunstar]

سلام علیکم
فرض کنید دریک فرمحاوی10 عدد textboxحاویاطلاعات ویک command button می باشیم.میخواهیم با اجرای commandbutton مذکور وبادستورFOR_NEXT اطلاعات تکست باکسها بهترتیب از A1 تا A10 درج گردد.خواهشمندم راهنمائیفرمائید.هزاران سپاس

[iranweld]

با سلام

Private Sub CommandButton1_Click()

For I = 1 To 10

Sheet1.Range("A" & I).Value = UserForm1.Controls("TextBox" & I).Value

Next

End Sub 

[sunstar]

iranweldعزیز هزاران سپاس و تشکر