Hello all
Running this...
Public Sub DBQueryRunExecution()
Dim DBFullName As String
Dim Cnct As String, Src As String
Dim Connection As ADODB.Connection
Dim Recordset As ADODB.Recordset
Dim Col As Integer
Dim LR As Long
Dim DB2U As Long
Dim FilterStr...