VBA / Excel的微调输出不是一个数字，螺丝与Excel命令

我在我的用户表单中添加了一个Spinner，输出到一个文本框

Private Sub Level_Spinner_Change() Level_Select.Text = Level_Spinner.Value End Sub 

然后将其导出到不同的工作表

 'Write Level into Main Worksheet Worksheets("Main").Range("E1").Value = Level_Select 

但是，新工作表中的结果不是一个数字，并且在excel命令中不起作用。 例如，

 IF(E1<5,E1,"N/A") 

向所有值报告N / A。 如果我到特定的单元格，我可以单击错误消息并将其转换为数字，但我不知道如何使它自动执行或修复VBA代码中的错误。 我不能

 Dim Level_Select as Integer 

代码中的任何地方，因为它根本不会运行，或者只是在导出的单元格中报告零。 我无法将.text更改为.value，因为它没有效果。

Answer 1

通过在文本框中插入微调器值，它被转换成一个string。 只需使用原始的微调器值粘贴到Excel单元格，它将保持为整数：

 Worksheets("Main").Range("E1").Value = Level_Spinner.Value