作者yata123 (...)
看板Visual_Basic
标题[VB6 ] 如何把vb6.0运用在Excel尚
时间Thu Jun 16 14:21:43 2005
Sub highlight() '设计highlight()程式
Dim Cell As Range '定义变数cell为范围格式
Worksheets(1).Select '选择工作表1
For Each Cell In Range("c2:f5") '设定回圈范围为c2:f5
If Cell.Value < 60 Then
Cell.Interior.colorIndex = 3 '设定cell color
EndIf
Next
End Sub
这个我会
但下面这个问题我就想不出来了
假设全班的学期成绩差异过大,请设计一个VB程式自动将成绩开根号再乘以10的程式。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.170.156.234
1F:推 fumizuki:是VB6 还是VBA? 61.222.155.162 06/16
2F:推 elva0204:vb6218.170.156.234 06/16
3F:推 fumizuki:vb6没有worksheets吧 61.222.155.162 06/16
4F:推 fumizuki:开根号 sqr() 61.222.155.162 06/16
5F:推 nanami2:算标准差来判断差异是不是过大,再开根号x10 140.112.22.15 06/16