Это работает ровно для 9 записей.Требуется поле уникального идентификатора.Предполагается, что идентификатор является последовательным от 1 до 9.
TRANSFORM Max(Table5.Field1) AS MaxOfField1
SELECT Switch([ID]<4,"a",[ID]<7,"b",[ID]<10,"c") AS Row
FROM Table5
GROUP BY Switch([ID]<4,"a",[ID]<7,"b",[ID]<10,"c")
PIVOT Choose([ID] Mod 3+1,3,1,2);
Если вы хотите разрешить неограниченное количество записей, ожидайте, что потребуется VBA.Либо функция, вызываемая запросом, либо запись записей во временную таблицу, скорее всего последняя.