Question

Excel vba textbox 怎么根据每一行分割

然后把每行的内容保存为变量

Answer 1

只有在MuiltLine属性为True的前提下TextBox才有多行，由于在这个控件中输入文本时换行是Ctrl+Enter实现的，所以用Split(TestBox.Value,Chr(10))就可以分割文本并保存在数组中：

Private Sub TextBox1_LostFocus()
If Len(TextBox1.Value) > 0 Then
arr = Split(TextBox1.Value, Chr(10))
'激活下面的语句可以在A列显示数组arr
'Range("a1").Resize(UBound(arr) + 1) = Application.WorksheetFunction.Transpose(arr)
End If
End Sub

安排代码在控件失去焦点时才运行以保证输入完整

Answer 2

可以用：Split函数，split（字符串,"分隔符"） 拆分字符串转为一维数组。
如果不理解，请自行百度：VBA split

Answer 3

split吗？

Answer 4

你想实现什么吧 我帮你实现就是了