excelで、文字列の中から複数の数字を判断するには？

excelで一つのセル内に、たとえば半角スラッシュで区切った数字を入れるとします。

例）A3内に
233/277/502/76
と入れると、別のセル（B3）に
OK/NG/OK/NG

こうしてA3の中からスラッシュで区切られた数字を参照して、
「250以内ならOK、250を超えるとNG」
という結果を表示するにはどのようにすればいいでしょうか？

もし一つだけ数字を入れると
A3：144
ならば
B3：OK
一つだけ表示。

A3：144/300
ならば
B3：OK/NG
…というように、A3内の区切りスラッシュを増やすごとに、B3内のスラッシュも増えるようにしたいのですが…。

入力時にスラッシュやコンマ区切りで入力できれば、表示時に複数セルを使っても構いません。
よろしくお願いします。

No.1 回答者： spnlight 回答日時： 2008/08/28 21:58

一例です。

簡易版（スラッシュオンリー）
Function sample(range)
'250以内ならOK、250を超えるとNG
Dim arr, i, str
arr = Split(Trim(range), "/")
i = UBound(arr)
For Chars = 0 To i
If arr(Chars) > 250 Then
str = "NG"
Else
str = "OK"
End If
If Chars = 0 Then
sample = str
Else
sample = sample & "/" & str
End If
Next Chars
End Function

発展版（cutに区切り記号を入れる）
Function sample1(range, cut As String)
'250以内ならOK、250を超えるとNG
Dim arr, i, str
arr = Split(Trim(range), cut)
i = UBound(arr)
For Chars = 0 To i
If arr(Chars) > 250 Then
str = "NG"
Else
str = "OK"
End If
If Chars = 0 Then
sample = str
Else
sample = sample & cut & str
End If
Next Chars
End Function

こんな感じで

No.2 ベストアンサー 回答者： maron--5 回答日時： 2008/08/29 06:03

>入力時にスラッシュやコンマ区切りで入力できれば、表示時に複数セルを使っても構いません

B3=IF(COLUMN(A1)>LEN($A3)-LEN(SUBSTITUTE($A3,"/",))+1,"",IF(TRIM(MID(SUBSTITUTE($A3&"/","/",REPT(" ",40)),40*COLUMN(A3)-39,40))*1<=250,"ＯＫ","ＮＧ"))
★右にコピー