快速编写多个if语句的方法

时间:2014-04-04 10:07:40

标签: excel vba

有没有办法在下面批量创建大约100个IF语句,而不是单独用不同的值代替“string”键入每个IF语句。我有时使用excel来创建代码,但我不知道如何在函数中进行换行。

IF语句是否可以在单行上运行,因为excel可能是一种可能性。

非常感谢任何帮助!

if dbread("column").ToString = "string" then
...
else
...
end if



if dbread("column").ToString = "string2" then
...
else
...
end if

1 个答案:

答案 0 :(得分:2)

最好选择一个案例。

select dbread("column").tostring
case "string"
''do stuff
case "string2"
''do stuff     
case else
''do your else code here
end select