deneme amaçlı oluşturduğum çalışmada aşağıdaki kodu kullandım sorun çıkarmadı
burada önemli olan nokta group by ile kullanacağınız alanların sorguda da olması
tek alan için açılır kutudan alan seçip düğmeye bastığımda liste kutusu verileri sorunsuz şekilde aldı

 xSQL = "SELECT CUSTOMERS." & Me.Açılan_Kutu0 & ", Sum(SALES.AMOUNT) AS ToplaAMOUNT, Sum(SALES.PRICE) AS ToplaPRICE, Sum(SALES.TOTALPRICE) AS ToplaTOTALPRICE " & _

        "FROM CUSTOMERS INNER JOIN SALES ON CUSTOMERS.NAMESURNAME = SALES.CUSTOMERNAME " & _

        "GROUP BY CUSTOMERS." & Me.Açılan_Kutu0 & ";"

Me.Liste2.RowSource = xSQL