VBA InputBox的背面填充?

时间:2019-02-25 16:42:39

标签: excel vba

因此,当前在特定条件下,我会弹出此InputBox供用户输入注释,然后该框将这些注释填充到单元格中。我想尝试做的是,如果在InputBox向其填充注释的单元格中已经有注释,这些注释将已经出现在输入字段中,以便用户可以添加到其中。我不知道这是否可以完成,在Google上找不到任何内容。如果不能做到这一点,请使用insted用户表单。

enter image description here

下面显示输入框的当前代码,“注释”是InputBox填充到的字段:

If InStr(OPs, "Incomplete") > 0 Or InStr(OPs, "Miss") Then
    notes.Interior.Color = RGB(255, 200, 0)
        If notes = "" Then
            Do While notes = ""
                notes = notes & InputBox("You must imput notes for " & Desc & " !", "Notes")
            Loop
        End If
End If

1 个答案:

答案 0 :(得分:2)

使用Default的{​​{1}}参数:

类似的东西:

InputBox

但是,如果您使用此方法,则您不想使用notes = notes & InputBox("You must input notes for " & Desc & " !", "Notes", notes) ,因为字符串字段会迅速溢出。.也许就是这样:

notes = notes & ...