Excel VBA InputBox输入长文本触发“Text is not valid”报错问询

该「Text is not valid」错误和VBA String类型的存储上限无关，根源是Application.InputBox 当Type参数设为2（文本类型）时的内置输入限制：

• 该接口的文本输入模式硬限制最大输入长度为255字符，超过该长度就会直接抛出文本无效的报错，限制发生在输入环节，和后续变量的存储能力无关。
• 你后续改为Type=8选择单元格的方案规避了该限制，因为此时是直接读取单元格存储的内容，不会触发输入框的文本长度校验。

方案1：替换为VBA内置InputBox函数 #

普通VBA.InputBox没有255字符的输入限制，支持超长文本输入，仅需修改输入和取消判断逻辑即可：

' 替换原desired_comment赋值行
desired_comment = VBA.InputBox(prompt:="Please select the cell you would like copied into the range.", Title:="Select Comment")
' 替换原取消判断逻辑
If desired_comment = "" Then Exit Sub

该方案改动最小，可直接适配原有逻辑。

方案2：使用自定义用户窗体输入 #

如果需要支持多行输入、输入格式校验等更复杂的需求，可插入自定义用户窗体，添加多行文本框和确认/取消按钮。文本框控件无内置字符长度限制，可支持任意长度的文本输入。

内容的提问来源于stack exchange，提问作者zimide82