хочу уточнить: мне нужен только код sql

Если делать данный запрос через Access, то выглядит так:  
SELECT Max(Таблица1.Поле1) AS [Max-Поле1]
FROM Таблица1;

не много ошибся в предыдущем тезисе, правильный вариант:  
Так не получится. Запрос будет работать некоректно. Например, если применить к таблице:  
11.08.2009 12:05  
12.08.2009 15:05  
13.08.2009 14:05  
13.08.2009 13:05  
получится:    
13.08.2009 15:05  
нужно группировать по дате  
а если группировать по дате - то не получается единственного макс. значения - а выходят все сгруппированные даты, которые есть в таблице

Спасибо, Слэн,  - но я ничего не понял).    
Моя главная задача - сделать макрос, который в экселе будет доставать данные из аксеса sql запросом. Для этого нужно написать sql запрос и проверить его в аксесе. Но Ваш случай - это не запрос аксеса. Поэтому не подходит

Слэн, попытался применить Вашу конструкцию в запросе аксес:  
SELECT ForexQuotes.Дата, ForexQuotes.Время  
FROM ForexQuotes  
WHERE ForexQuotes.Время IN  
SELECT Max(ForexQuotes.Время)  
FROM ForexQuotes  
WHERE ForexQuotes.Дата IN  
SELECT Max(ForexQuotes.Дата)  
FROM ForexQuotes;  
Пишет ошибку: "Оператор in без ()...", после того, как поставил "()" написал ошибку синтаксиса в выражении "ForexQuotes.Время IN()"  
Как надо использовать оператор IN?

Слэн, база данных - признателен за помощь!  
Там много полей мне нужны только дата и время

не распаковывается...  
Попробуйте слить в таблицу Ексель, а там уже сделаю в Аксесе

оказалось не все так просто..  
 
но все же справился - см вложение  
 
нужно только изменить путь к файлу базы данных..

в экселе

Если я правильно понял, то Вам нужна одна строка запроса? Тогда так...  
 
SELECT TOP 1 [to BD].Код, [to BD].Котировка, [to BD].Период, [to BD].Дата, [to BD].Время, [to BD].OPEN, [to BD].HIGHT, [to BD].LOW, [to BD].CLOSE, [to BD].VOLUME, Max([Дата] & [Время]) AS Выражение
FROM [to BD]
GROUP BY [to BD].Код, [to BD].Котировка, [to BD].Период, [to BD].Дата, [to BD].Время, [to BD].OPEN, [to BD].HIGHT, [to BD].LOW, [to BD].CLOSE, [to BD].VOLUME
ORDER BY Max([Дата] & [Время]) DESC;

Или для подстраховки:  
 
--------------------------------------  
 
SELECT TOP 1 *  
FROM `C:\BD.mdb`.ForexQuotes  
WHERE ForexQuotes.Дата+ForexQuotes.Время IN  
(SELECT MAX(ForexQuotes.Дата+ForexQuotes.Время)  
FROM `C:\BD.mdb`.ForexQuotes);  
 
--------------------------------------

Собственно все это можно записать еще короче:  
 
SQL запрос:  
------------------------------------  
SELECT TOP 1 *  
FROM [ForexQuotes]
WHERE Дата+Время IN  
(SELECT MAX(Дата+Время)  
FROM [ForexQuotes]);
 
 
ADO макрос:  
------------------------------------  
Option Explicit  
 
Sub ADOImportFromAccessTable()  
   Dim cn As ADODB.Connection  
   Dim rs As ADODB.Recordset  
   Dim strSQL As String  
     
   strSQL = "SELECT TOP 1 * FROM [ForexQuotes] " & _
       "WHERE Дата+Время " & _  
       "IN(SELECT MAX(Дата+Время) " & _  
       "FROM [ForexQuotes]);"
     
   Set cn = New ADODB.Connection  
   cn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\BD.mdb;"  
   Set rs = New ADODB.Recordset  
     
   rs.Open strSQL, cn, , , adCmdText  
     
   ActiveSheet.Range("A1").CopyFromRecordset rs  
     
   rs.Close  
   Set rs = Nothing  
   cn.Close  
   Set cn = Nothing  
End Sub