VBA SQL Query

Формулировка задачи:

Добрый день! Создал

                    Листинг программы
                
Set cn = CreateObject("ADODB.Connection")

, рекордсет

                    Листинг программы
                
rs.Open strSQL, , adOpenDynamic, adLockBatchOptimistic

, SQL-запрос отрпавляю

                    Листинг программы
                
SELECT * FROM [R1$] LEFT JOIN [R2$] ON [R1$].name1 = [R2$].name1

и он выполняется, а:

                    Листинг программы
                
SELECT * FROM [R1$] LEFT JOIN  [R2$] ON [R1$].name1 = [R2$].name1 
INNER JOIN  [R3$] ON [R1$].name1 = [R3$].name1

выдаёт аот это: Не могу понять, где ошибка

Решение задачи: «VBA SQL Query»

textual
                            Листинг программы 
                        
SELECT a1.* FROM (SELECT * FROM [R1$] LEFT JOIN  [R2$] ON [R1$].name1 = [R2$].name1 ) AS a1
INNER JOIN  [R3$] ON [a1].name1 = [R3$].name1