per lo stesso motivo che se scrivi una cosa del genere ti da lo stesso errore:

rec.open "UPDATE...."

prova a fare così:

query = "select nome, count(*) as conteggio from cliente group by nome"
tabella.Open query,1,3
query = ""

all'interno i valori li prendi con tabella.fields("nome") e tabella.fields("conteggio")...

tabella.close
connessione.Close