Excel VBA集合函數錯誤

Question

我是Excel VBA的新手。當我運行下面的代碼時，我得到一個錯誤「查詢表達式總和[Project Hrs]中缺少運算符」。我究竟做錯了什麼？

Sub TaskHrs() 

    strSQL = "Select [User Name], [Task Name], sum[Project Hrs] from [idata$]  group by [User Name], [Task Name]" 

    closeRS 
    OpenDB 

    rs.Open strSQL, cnn, adOpenKeyset, adLockOptimistic 

    If rs.RecordCount > 0 Then 
    Do While Not rs.EOF 
    Range("A1").CopyFromRecordset rs 
    Loop 
    End If 


End Sub 

Answer 1

這不是一個VBA問題 - 這是一個SQL問題。在聲明的SUM部分中，您沒有放置括號。

strSQL = "Select [User Name], 
       [Task Name], 
       SUM([Project Hrs]) 
from    [idata$]  
group by   [User Name], 
       [Task Name]"