可以接受数字，特殊字符等的excel vba输入框答案

【问题标题】：excel vba inputbox that can accept numbers, special characters etc可以接受数字，特殊字符等的excel vba输入框
【发布时间】：2015-10-01 13:14:15
【问题描述】：

在宏运行之前，我有一组需要用户设置的输入。输入存储在稍后在宏中调用的各个单元格中。输入将是各种数字、单词或标点符号（例如：. - 、*）。每当我放一个“。”进入输入框代码停止并突出显示输入框代码。有什么东西（if 语句，输入框上的不同类型）基本上可以处理任何被抛出的东西吗？

Dim AN As Range
Dim AO As Range
Dim AP As Range

    Set AN = Application.InputBox(PROMPT:="ENTER SEPERATOR AFTER BLOCK/ARRAY NUMBER", Type:=2)
    Range("AN4") = AN
    Set AO = Application.InputBox(PROMPT:="ENTER SEPERATOR AFTER INVERTER NUMBER", Type:=2)
    Range("AO4") = AO
    Set AP = Application.InputBox(PROMPT:="ENTER SEPERATOR AFTER COMBINERBOX NUMBER", Type:=2)
    Range("AP4") = AP

【问题讨论】：

不使用 InputBox，不如让用户在运行代码之前将信息直接输入到一组单元格中。几乎就像在数据表本身上设置表单一样？
啊 - 我看到您将变量设置为 Range 类型，然后尝试将它们分配给类型 String 输入框值。如果您将变量设置为输入String，您的代码应该可以正常工作。此外，一旦将它们更改为键入 String，请删除每个 InputBox 行前面的 Set。
谢谢。我从另一个输入框中复制了代码，该输入框是我刚刚忘记调整的范围。当我有更多时间时，我计划使用包含整个宏所需的所有输入的用户表单来玩弄

标签： excel insert user-input inputbox vba

【解决方案1】：

将您的更改为以下内容，对我来说可以：

Set AN = Range("A4")
AN.Value = Application.InputBox(PROMPT:="ENTER SEPERATOR AFTER BLOCK/ARRAY NUMBER", Type:=2)

【讨论】：