VBA Excel 用户表单输出到 Txt 文件

Question

我正在尝试创建一个接受用户输入并打印到文本文件的用户表单。我知道 VBA 脚本函数来打印、存储字符串等。但我是用户表单的新手。如何限制文本文件的输入和输出？添加到同一个文件？

输入和输出：

我需要这种

主要特点：

限制输入： XXXX表示只能输入4个字符（记事本文件只能是某些字符长
多个条目： 将一组记录输入到文本文件后，将存储它们的值并允许另一个输入。此外，新条目必须写入下一行的同一文件
Space 如果留空： 如果 XXXX 留空则应打印四个“ ”。

如果您有部分或全部这些答案，我想听听您的意见！

------------------------编辑添加代码---------------- --------------

Private Sub Userform_Initialize()

'Fill Eggs
With Eggs
    .AddItem "Eggs"
End With

End Sub

Private Sub CreateList_Click()

Dim myFile As String, myString As String
myFile = "C:\Reformatted.txt"
Open myFile For Output As #1

Dim fourChars As String * 4
fourChars = Milk.Value

myString = Eggs.Value + Milk.Value + Bread.Value

Print #1, myString

Close #1
Shell "C:\Windows\Notepad.exe C:\Reformatted.txt", 1

End Sub

所以上面的代码启动了这个屏幕：

Answer 1

文本框有MaxLength属性。默认设置为 0，不限制字符输入。
要限制进入某个数字，只需将此属性的值更改为该数字即可。

现在将 XXXX 替换为空白（如果输入 none 或小于 4），请在评论中提出建议。

Dim fourChars As String * 4
fourChars = TextBox1.Value
MsgBox Len(fourChars) ' will always return 4

VBA Excel 用户表单输出到 Txt 文件

VBA Excel User Form Output to Txt File

excel

vba

file

userform