Ой, не на ту кнопку нажал.
Проблема такая, необходимо добавить программно в таблицу новую строку, причём в таблице уже есть строки.
Пробовал AddNew, получилось но не то .
В принципе проблема решаема, но необходимо чтобы при добавлении пользователь не знал о добавлении.

Пробовал, всплывает "вопрос хотите добавить записи" или что-то типа того.

to paparome:
При использовании INSERT INTO всплавает окно, но его мне не нужно видеть.

Решение было найдено, оказалось, что я UPDATE делал после LOOP
Торможу по чёрному.

Private Sub с0_Click()
Dim rcd As DAO.Recordset
Dim db As DAO.Database
Dim cnn1 As ADODB.Connection
Dim rstEmployees As ADODB.Recordset
Dim strCnn As String
Dim varDate As Variant
Dim sSQL As String
' Open connection.

Set db = CurrentDb
strCnn = "Provider=Microsoft.Project.OLEDB.10.0;Project Name=c:\Special\1.mpp"
sSQL = "SELECT Taskcost,TaskName FROM Tasks"

Set cnn1 = New ADODB.Connection
cnn1.Open strCnn

' Open employee table.
Set rstEmployees = New ADODB.Recordset
rstEmployees.CursorType = adOpenKeyset
rstEmployees.LockType = adLockOptimistic

rstEmployees.Open sSQL, cnn1, , , adCmdText
Set rcd = db.OpenRecordset("balance", dbOpenDynaset, dbSeeChanges)
Do While Not rstEmployees.EOF
msg = rstEmployees.Fields.Item("taskcost")
msg1 = rstEmployees.Fields.Item("taskname")
rcd.AddNew
rcd!name_balance = msg1
rcd!price_balance = msg
rcd.Update
rstEmployees.MoveNext

Loop
cnn1.Close
rcd.Close
Set cnn1 = Nothing
Set rstEmployees = Nothing
End Sub


Причём галочек никаких снимать не надо.
Пользуйся народ.

to Rivkin:
Нет, видимо ты не понял.
Суть идеи была такова, из файла-проекта .mpp выхватить определённые значения запихнуть их в АКсовую таблицу, а потом сделать отчёт в Аксе по расходам на задачи, происходящие в проекте.

Выложил для того, мож кому-то когда-нибудь понадобится, а "Здесь" скопировал и не надо мучится, только путь до файла проекта модифицировать надо.

to paparome:
Ну что заинтересовало или так детский лепет.

P.S. Продолжаю модифицировать код, чтоб вообще всё круто было.
Типа: Нажал кнопочку, указал путь до файла и началась сказка.

Поясню, по поводу INSERT INTO/
Когда работаешь в VB с SQL запросом и необходимо делать какие-либо выборки, добавления и т.д. интерпритатор VB работает очень долго, если у тебя порядка 12000 записей, а напрямую работать с таблицей раз в 10 быстрее. ПРОВЕРЯЛ!!!

Да, ещё хотел добавить хоть пишу код VB давно, никогда до этого не приходилось применять сразу ADO и DAO (думал, что будет тормозить, нифига подобного, всем советую применять, скорость работы программы при таком использовании увеличивается минимум в 2 раза, чем только ADO, тоже проверил)

Напомню, что я работал со столбцом в таблице Project-а, и как ты себе это представляешь.
Если есть решения, прошу предоставить.

Будет время, попробую