vba中until a为整形时,如何表达
答案:2 悬赏:60 手机版
解决时间 2021-03-12 15:35
- 提问者网友：鼻尖触碰
- 2021-03-12 09:14
当until a为整形时，跳出循环
最佳答案
- 五星知识达人网友：胯下狙击手
- 2021-03-12 09:36
Option Explicit
Sub test()
Dim arr As Variant, i As Integer
arr = Array("a", "b", "c", "1", 1.2, 6, "e")
i = 0
Do
i = i + 1
Loop Until TypeName(arr(i)) = "Integer"
MsgBox i
End Sub
Sub test()
Dim arr As Variant, i As Integer
arr = Array("a", "b", "c", "1", 1.2, 6, "e")
i = 0
Do
i = i + 1
Loop Until TypeName(arr(i)) = "Integer"
MsgBox i
End Sub
全部回答
- 1楼网友：不如潦草
- 2021-03-12 11:14
直接在b列中输入=if（a2=1,“a”, if（a2=2,“b”, "不在范围中输入"))
然后就可以直接在a列中输入，通过b列来实现显示了。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯