Здравствуйте.
В базу данных с SQL сервера выгрузаются данные по продажам. Далее 6-го числа каждого месяца данные архивируются. Создается новая база данных, в нее копируются продажи за месяц и она называется определенным образом типа: 2014_2 продажи.mdb
Что бы с этими данными мне работать я использую линк

Set MDB = CurrentDb
NamTab = "продажи"
' Удаляем прилинкованную таблицу
On Error Resume Next
MDB.TableDefs.Delete NamTab
On Error GoTo 0
' Прилинковываем таблицу в предположении, что прилинковання
' таблица имеет такое же имя, как и в родной базе
Set MT = MDB.CreateTableDef(NamTab)
MT.Connect = ";DATABASE=" & "D:\архивы\продажи\" & Year(Date) - 1 & "_" & Month(Date) & " продажи.mdb"
MT.SourceTableName = NamTab
MDB.TableDefs.Append MT
DoCmd.Rename "Продажи-12", acTable, NamTab

Таким образом у меня появляется таблица с продажами аналогичного месяца но в прошлом году.

Но если я хочу получить продажи за месяц-13

Set MDB = CurrentDb
NamTab = "продажи"
' Удаляем прилинкованную таблицу
On Error Resume Next
MDB.TableDefs.Delete NamTab
On Error GoTo 0
' Прилинковываем таблицу в предположении, что прилинковання
' таблица имеет такое же имя, как и в родной базе
Set MT = MDB.CreateTableDef(NamTab)
MT.Connect = ";DATABASE=" & "D:\архивы\продажи\" & Year(Date) - 1 & "_" & Month(Date) - 1 & " продажи.mdb"
MT.SourceTableName = NamTab
MDB.TableDefs.Append MT
DoCmd.Rename "Продажи-13", acTable, NamTab

То в январе получаю ошибку: Мол год отнимается, а месяц нельзя отнять так как сейчас и так уже первый месяц.

Нужно заменить строку: " & Year(Date) - 1 & "_" & Month(Date) - 1 & " Но как это сделать не пойму.

http://www.sql.ru/forum/1168509/link-k-dannym-za-proshlyy-god