日毎に作成されるCSV形式のログファイルがあり、ADOを使って
データを取得し、データグリッド等に表示させようとしています。

Private cn As ADODB.Connection
Private rs As ADODB.Recordset
Private Sub Form_Load()
'データベースに接続
Set cn = New ADODB.Connection
cn.ConnectionString = "DRIVER={Microsoft Text Driver (*.txt; *.csv)};" & _
"DBQ=D:\testdata;"
cn.Open
End Sub
Private Sub Command1_Click()
Dim szSQL As String
'選択クエリを作成
szSQL = "SELECT * FROM hist_20040101.txt WHERE 社員ｺｰﾄﾞ = '1111'"
'レコードセットを取得
Set rs = New ADODB.Recordset
rs.Open szSQL, cn, adOpenStatic
'データグリッドに表示
Set DataGrid1.DataSource = rs
End Sub
Private Sub Form_Unload(Cancel As Integer)
rs.Close
cn.Close
End Sub

上記を複数のログファイルにまたがって検索したいのですが、
何かうまいやり方はあるでしょうか。（UNION ALL で連結？）
ちなみにログファイル数は1年分程度あります。