Question

在excel里写入VBA程序。哪位大神能帮我解答一下啊，小女子感激不尽！

6. 在“VBA”表中使用VBA编程，编写成绩转换为等级函数，函数名为“DJ”，功能是将大于等于60分的转换为“及格”，否则为“不及格”。

Answer 1

代码如下，供参考

Public Function DJ(rng As Range)
If rng.Value >= 60 Then
    DJ = "及格"
Else
    DJ = "不及格"
End If
End Function

PS：顺便吐槽下，出这种题目的人纯属是为了出题而出题，现实中一个if函数或自定义单元格就解决了，没人会为这个写个vba的

追问

大哥，我只是想知道在Excel里面怎么弄，我还是学生，你给我弄这个代码我也不懂啊 ，就在excel表格里弄的，

追答

......这个就是在Excel中的...

打开Excel——按Alt+f11打开VBA代码界面——在“插入”下拉菜单中选择“模块”——将代码复制到“模块”中即可

追问

哦，知道了，谢谢你

追答

不用谢

Answer 2

这个不需要VBA吧？

追问

没办法啊 ，题目就是这样的