Question

我在excel中有一个数组。 6个细胞，4个下降。这将用于从测验中输入分数。

有没有办法可以输入＆＃34; *＆＃34; （星号）在单元格中的分数旁边并且具有excel自动加倍的值，删除＆＃34; *＆＃34;？

Answer 1

试试这个简单的VBA代码。根据您的需要进行修改，

Private Sub worksheet_change(ByVal target As Range)
If InStr(target.Value, "*") > 0 Then
    target.Value = Left(target.Value, InStr(target.Value, "*") - 1) * 2
End If
End Sub

此代码使用change事件来检测对单元格的更改。如果有*，则该值将自动加倍

如果＆＃34; *＆＃34;存在

1 个答案: