窗体录入数值求助

JACKQIU888

请各位大侠帮看看，如何能实现。谢谢   ！

小花鹿

做窗体是很繁琐的事                                                                                                              

JACKQIU888

不好意思，前面没做窗体控件，这儿补上。烦请各位帮看看。谢谢！

JACKQIU888

边成 发表于 2019-8-25 10:29
看看这个视频是不是您要的效果

大慨是这样到。但敲数值是不按顺序的，比如：9  3  10    7   5    2，在文本框中也是按这个顺序显示。

dgenson

不知道你这个是用来做什么的，a-e列=1-6，还用做什么窗体只直填充数不就好了吗。如果你是还有其它要求，最好是一次描述清楚，不然你一会加一点要求，一会加一点要求，大家也没时间像对客户一样来来去去给你改代码
Private Sub CommandButton7_Click()
a = IIf(Sheet2.Cells(1) = "", 1, Sheet2.Cells(10000, 1).End(xlUp).Row + 1)
With Sheet2
For i = 1 To 8
   .Cells(a, i) = Controls("TextBox" & i).Text
      
   
Next
End With
End Sub