이런식으로 사용자 정의 함수로 만들었는데 문제는 `시럽 5ml *30ea 1EA` 이부분은 합에 포함 되지 않습니다. 수정좀 부탁드립니다. 그리고 제가 초보라 함수들이 어떤식으로 진행되는지 간단한 설명도 부탁드립니다.ㅠㅠ
Function ExtValue(Txt As String)
Dim ext, i As Integer
Txt = Replace(Txt, " ", "")
ext = Split(Txt, "/")
For i = 0 To UBound(ext) - 1
If InStr(ext(i), "야쿠르트25ml") + InStr(ext(i), "커피50ml") = 0 Then
ExtValue = ExtValue + Val(Right(ext(i), Len(ext(i)) - InStr(ext(i), "ml") - 1))
End If
Next
If ExtValue < 10 Then ExtValue = ""