根据数值范围设置行中的值

时间:2012-11-02 10:54:28

标签: vba

我正在使用excel将数据导入我公司的订单系统。我需要导入的最重要的值是包代码,代码定义了需要订购的包。要定义需要哪个Package代码,我们先查看一个Numeric值。

假设我有以下3个包裹代码:

  • ES000034 - 在数值= 9
  • 时使用
  • ES000035 - 在数值=>时使用比9和<比16
  • ES000036 - 在数值=>时使用比16

我希望Excel根据上述条件设置需要使用的包代码的值。有人可以解释代码的样子。

1 个答案:

答案 0 :(得分:2)

在公式中:

这样的地方A1是你正在检查的单元格: =IF(A1=9,"ES000034",IF(AND(A1>=9, A1 <16),"ES000035",IF(A1>=16,"ES000036","")))

在VBA中,像=PackageCode(A1)这样使用的东西:

Function PackageCode(value As Variant) As String
    If IsNumeric(value) Then
        Select Case value
            Case 9
                PackageCode = "ES000034"
            Case 9 To 16
                PackageCode = "ES000035"
            Case Is > 16
                PackageCode = "ES000036"
            Case Else
                PackageCode = ""
        End Select
    End If
End Function