Re: [VBA ] 請問我想要判斷負數
※ 引述《lingze (walkman)》之銘言:
: 已爬文~
: 請問負數要怎麼判斷呢?
: 例如 A=負數
: 有這種指令嗎@@?
: 還是說判斷它是不是正數,如果不是就代表負數@@?
: 如果是要判斷數字為正,又要用什麼指令呢@@?
: 小弟是新手~還請各位大大幫忙一下~感謝
'mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm
Sub main()
Call isNegative([A1]) ' [A1] = -1
Call isNegative([A2]) ' [A2] = 1
End Sub
'mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm
'fffffffffffffffffffffffffffffffffffffffffffffff
Function isNegative(ByVal Rng As Range)
Dim vColor As Integer
If Rng < 0 Then
vColor = 3
isNegative = 1 ' is negative
Else
vColor = 5
isNegative = 0 ' not negative
End If
Rng.Interior.ColorIndex = vColor
End Function
'fffffffffffffffffffffffffffffffffffffffffffffff
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 119.77.128.167
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):