2013-09-26 171 views
0

我有类似以下内容的表工作:比较日期时,

PBName   InputDate  Amount 

Michael Brown 07-jan-13  1391000,000 € 
Mary Aspas  07-jan-13  -400000,000 € 
Thomas Dand  15-feb-13  3000000,000 € 
Mary Aspas  31-jul-13  3000000,000 € 

然后,我只是想通过PBName获得总量时InputDate是以前给定一个:

Dim dd As Date 

dd = 15-feb-13 

这是我使用的代码:

strSQL = "SELECT Rea.PBName, SUM(CASE WHEN Rea.InputDate < dd THEN Rea.AMOUNT/1000000 ELSE 0 END) As NNARea " 

当我尝试运行查询,我得到第m消息“无效的列名称”。

你能帮我吗?

感谢

+0

你没有一个'FROM schema.Table'在查询 –

+0

任何地方的数据库您使用的呢? – jle

+0

@jle'vba'标签让我觉得'访问' –

回答

0

这应该为你工作...

strSQL = "SELECT PBName, SUM(Amount)/1000000 AS NNARea " & _ 
     "FROM Rea " & _ 
     "WHERE InputDate < #" & dd & "# " & _ 
     "GROUP BY PBName;"