ms-access - 在 Access VBA 中确定 Max() 值

Question

我有一个 Excel 方程

=IF(AB9>=MAX($AB$11:$AB$1048576)-7,"Past 7 years","")

基本上，我发现如果我们想在列中找到最大值，我们必须使用该DMax()函数。

此代码不起作用，可能是由于maxval = DMax("IATA_FY", "Main_Database"). IATA_FY 是 Main_Database 查询中的一列。iatafy 是与 IATA_FY 相同的列，将与 maxval 进行比较。

Function past7years(iatafy As String) As String

Dim maxval As Integer

maxval = DMax("IATA_FY", "Main_Database")


If iatafy >= maxval - 7 Then
    past7years = "Past 7 years"

    Else: past7years = ""

End If

End Function

Answer 1

您正在将字符串与整数进行比较 - iatafy 应该是整数或其他数字类型，不是吗？

Function past7years(iatafy as Integer) As String应该修复它。

Answer 2

尝试将 Dmax 修改为以下，对我有用

maxval = DMax("IATA_FY", "Main_Database", "")