Я использую Access 2016 и Office 2016.
У меня есть форма с именем "frmFiles". В этой форме у меня есть связанный объектный фрейм с именем «FileOLE» и кнопка с именем «Command2». У меня есть таблица с именем "tblFiles" с 2 полями в нем. Один с именем "ID" (AutoNumber / Primary key) и второй с именем "File" (OLE Object).
RecordSource моей формы связан с моей таблицей, а ControlSource элемента управления моего связанного объекта - с файлом "Table" "field.
Моя цель - каждый раз, когда я нажимаю кнопку" Command2 ", добавлять к моей таблице один и тот же лист Excel.
Вот код, который у меня есть:
Private Sub Command2_Click()
Me.FileOLE.Class = "Excel.Sheet"
Me.FileOLE.OLETypeAllowed = acOLEEmbedded
Me.FileOLE.SourceDoc = <My worksheet's full path>
Me.FileOLE.Action = acOLECreateEmbed
Me.FileOLE.SizeMode = acOLESizeZoom
End Sub
Работает только для первого клика. Это добавит рабочий лист в пустую таблицу. После этого все последующие клики не смогут добавить файл в таблицу.
Чего мне не хватает, если это вообще возможно сделать sh?
Спасибо.