ник: Мишок
Dim sSQL As String
sSQL = "SELECT Договоры_СТАРАЯ.НомерДоговора, Договоры_СТАРАЯ.ДатаЗаполнения, Договоры_СТАРАЯ.ФамилияЛат, Договоры_СТАРАЯ.ИмяЛат, Договоры_СТАРАЯ.Кратность, Договоры_СТАРАЯ.Заказчик, FROM Договоры_СТАРАЯ" & _
WHERE "(((Договоры_СТАРАЯ.ФамилияЛат) Like [Forms]![вкладки2]![find1] & "*"))"
Select Case grpSort
Case 1
sSQL = sSQL & " ORDER BY НомерДоговора"
Case 2
sSQL = sSQL & " ORDER BY ДатаЗаполнения"
Case 3
sSQL = sSQL & " ORDER BY ФамилияЛат"
и т.д.
но если я в sSql строку добовляю & _
WHERE "(((Договоры_СТАРАЯ.ФамилияЛат) Like [Forms]![вкладки2]![find1] & "*"))"
то не работает :
ругается на sSQL
Как правильно сделать?