我正在开发一个excel vba项目并遇到了一个奇怪的问题。我在按钮单击子项内工作,并希望在更新注释时将当前注释显示为默认值。不幸的是,所有空单元格都显示为默认值" 0"。之前的msgbox用于调试目的,它显示"" (没有)。有什么想法吗?
MsgBox Sheet4.Range("E" & stallToAdd + 1)
inputFromUser = Application.InputBox("Update note: ", "Update Note", Sheet4.Range("E" & stallToAdd + 1))
编辑:inputFromUser是一个变体,stallToAdd是一个整数。
答案 0 :(得分:1)
只需将其转换为如下字符串:
inputFromUser = Application.InputBox("Update note: ", "Update Note", _
CStr(Sheet4.Range("E" & stallToAdd + 1)))