如何把excel表格中百分比大于100的全部转化等于百分之百300%150%像这种如何在excel表格中变成100%求教

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 15:02:42
如何把excel表格中百分比大于100的全部转化等于百分之百300%150%像这种如何在excel表格中变成100%求教

如何把excel表格中百分比大于100的全部转化等于百分之百300%150%像这种如何在excel表格中变成100%求教
如何把excel表格中百分比大于100的全部转化等于百分之百
300%
150%
像这种如何在excel表格中变成100%
求教

如何把excel表格中百分比大于100的全部转化等于百分之百300%150%像这种如何在excel表格中变成100%求教
假设你的数据在Excel中的A,B,C,D,E五个列, 运行下面的 Excel VBA 代码就可以
把大于100%的数据全部转化成100%
Sub Test()
Dim I As Integer
For I = 1 To [A65536].End(xlUp).Row
If Val(Cells(I, 1)) > 1 Then
Cells(I, 1) = "100%"
End If
If Val(Cells(I, 2)) > 1 Then
Cells(I, 2) = "100%"
End If
If Val(Cells(I, 3)) > 1 Then
Cells(I, 3) = "100%"
End If
If Val(Cells(I, 4)) > 1 Then
Cells(I, 4) = "100%"
End If提交修改
If Val(Cells(I, 5)) > 1 Then
Cells(I, 5) = "100%"
End If
Next I
End Sub