与用户表单条目相关的单元格数据

Question

我希望你能帮助我，因为我被困在我的新 VBA 项目的开始阶段，到目前为止还没有在互联网上找到任何有用的东西。

我正在尝试创建一个 excel sheet，它会根据用户表单中的条目而略有不同。我坚持的事情如下：我需要用输入到用户表单中的信息填充一个单元格： XXYYZZ - LL

XX 是年份的最后两位数字（在用户表单中作为日期输入 dd.mm.yyyy） YY 是来自组合框的数据（可能性很小） ZZ 是某种计数器（还没有弄清楚如何计算这个，因为计数器应该上升取决于之前使用相同的 XXYY 生成了多少数据 sheets） LL 是在用户表单的文本框中输入的数字或字母

我有什么办法可以做到这一点吗？或者这是没有希望的吗？我能想到解决这个问题的唯一方法是

range("A1").value = [yy&combobox1.text&ZZ&" - "&textbox1.text]

这可能吗？有更好的主意吗？还是得想办法算。

Answer 1

像下面这样的事情应该可以做到。您仍然需要确定如何填充 "ZZ" - 在本例中我将其设置为 1。我的示例假设 TextBox1 中的值是日期格式，即 ComboBox1有 2 个字符值，并且在 TextBox2 中输入的值始终为 2 个字符。此代码需要分配给用户表单上的命令按钮：

Private Sub CommandButton1_Click()

    Dim counter As Long

    counter = 1

    ActiveSheet.Range("A1").Value = Right(DatePart("yyyy", TextBox1.Value), 2) & ComboBox1.Value & Format(counter, "00") & " - " & TextBox2.Value

    Unload Me

End Sub

您可以实施一些控制措施来确保输入的数据采用此代码工作所需的格式，但这至少能让您入门。

与用户表单条目相关的单元格数据

Cell data relating to userform entries

vba

excel

counter

data-entry