Как можно копировать SELECTION из WORD в поле таблицы access
Если можно-дайте ссылки на русские ресурсы
dim recordset as dao.recordset
dim wordapplication as word.application
set recordset=currentdb.openrecordset("tablename")
recordset.fields("fieldname")=wordapplication.selection.range.text
set wordapplication = getobject(,"Word.Application")
dim db as dao.database
dim recordset as dao.recordset
set db = opendatabase(userform1.textbox1.text)
set recordset=db.openrecordset("tablename")
recordset.fields(userform1.textbox2.text)=application.selection.range.text
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 82