Excel输入框显示0而不是空字符串

时间:2015-01-18 19:18:32

标签: excel excel-vba vba

我正在开发一个excel vba项目并遇到了一个奇怪的问题。我在按钮单击子项内工作,并希望在更新注释时将当前注释显示为默认值。不幸的是,所有空单元格都显示为默认值" 0"。之前的msgbox用于调试目的,它显示"" (没有)。有什么想法吗?

MsgBox Sheet4.Range("E" & stallToAdd + 1)
inputFromUser = Application.InputBox("Update note: ", "Update Note", Sheet4.Range("E" & stallToAdd + 1))

编辑:inputFromUser是一个变体,stallToAdd是一个整数。

1 个答案:

答案 0 :(得分:1)

只需将其转换为如下字符串:

inputFromUser = Application.InputBox("Update note: ", "Update Note", _
    CStr(Sheet4.Range("E" & stallToAdd + 1)))