Sub text()
For x = 1 To 5
If Cells(x, 1).Value = "0501" Or "0505" Or "0503" Then
Cells(x, 2).Value = "流机"
End If
Next x
End Sub
这个程序运行之后,为什么excel里面第二列1-5单元格不等于这三个值的,也赋值成“流机组”??
For x = 1 To 5
If Cells(x, 1).Value = "0501" Or "0505" Or "0503" Then
Cells(x, 2).Value = "流机"
End If
Next x
End Sub
这个程序运行之后,为什么excel里面第二列1-5单元格不等于这三个值的,也赋值成“流机组”??
解决方案 »
- 查询指定时间内的数据语句。
- 谁有VBScript的资料,初来砸道,还望提拔,谢谢!!!
- 请问:开发好数据库软件后,如何隐藏数据库呢?
- 用VB怎么样进行日期型数间的运算???
- 调用addnew 方法时出错,“3251,对象和提供者不能执行所需的操作”??急急!!!
- select * from table1 where len(trim(hl))< 10
- 如何解开MHT文件中的图片,还有网页?
- 百分送上-VB编的认证程序如何在其它语言中调用?
- 如何加快向excel中导入数据的速度?
- r_ain来令分
- 用 ado 动态连接 MDB 时的2种连接字符串的区别?
- 百分求Visual Studio.Net的高速可用下载阿
For x = 1 To 5
If Cells(x, 1).Value = "0501" Or Cells(x, 1).Value ="0505" Or Cells(x, 1).Value ="0503" Then
Cells(x, 2).Value = "流机"
End If
Next x
End Sub