Question

我的vba代码从数据库中提取了最近“ 11”小时的数据。我想提取自己的时间数据，例如“在（1/4/19 1:30＆13/4/19 1:30）之间。”还希望将数据添加到表1中，例如表格。我可以知道如何添加此自定义时间并使用宏代码使其成为表格。

Option Explicit

Sub DbConnection()
' NA Query connection with DB
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim strConn As String
Dim mssql As String

strConn = "Driver={Redshift (x86)};Server=abc;Database=xyz;UID=abc;PWD=12345; Port=1234"
cn.Open strConn
cn.CommandTimeout = 60
mssql = "(using this line in SQL query here)"

where review_completed_timestamp_utc::TIMESTAMP > current_timestamp - interval'11 hour'

rs.Open mssql, cn
Sheets(1).Range("A2").CopyFromRecordset rs
End Sub

Answer 1

对于SQL部分，由于您没有提供名称，因此您可以执行以下操作：

INotifyCollectionChanged

如何在选定的Excel工作表单元格的宏中添加时间戳

1 个答案: