hatena
hatena
2022/04/17 (日) 16:42:09
データのテキストボックス txtData
4つのテキストボックス txt1, txt2, txt3. txt4
として、
Dim aryData
aryData = Split(Me.txtDXata.Value, Chr(13))
Me.txt1.Value = aryData(0)
Me.txt2.Value = aryData(1)
Me.txt3.Value = aryData(2)
Me.txt4.Value = aryData(3)
通報 ...