Импортиране в Access за статично въвеждане на дата / час - vba, excel-vba, ms-access, access-vba, excel

Опитвате се да конвертирате този прост макрос Excel:

Private Sub Command74_Click()
On Error Resume Next
ActiveField = Format(Date, "dd/mm/yyyy") & "  " & Format(Time, "hh:mm")
End Sub

в Access за използване чрез бутон за въвеждане на статична дата И час в поле. В момента това се управлява от бутон във файла на Excel, просто искам да използвате това и в Access, възможно ли е това?

Отговори:

Не е много сигурно какво искаш да кажеш с "поле" ...

Ако обаче текстово поле с име ActiveField, направете това:

Me!ActiveField.Value = Format(Now, "dd/mm/yyyy hh:nn")

или просто:

Me!ActiveField.Value = Now

и приложете вашия формат към свойството Format на текстовото поле.

Текстовата кутия може да бъде обвързана с поле на таблицата / заявката, към която е свързана формата.