Читаю данные из таблицы Excel через ADO:

Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset

With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Properties("Extended Properties").Value = "Excel 8.0;HDR=No;IMEX=1;"
.Open App.Path & "\" & IniSource
End With

rs.Open "Select * from [" & IniSheet & "$]", cn, adOpenForwardOnly, adLockReadOnly
Dim Rows() As Variant: Rows = rs.GetRows()

, при этом в таблице в одном столбце могут быть данные разных типов, поэтому используется ImportMixedType = Text. Все работает хорошо, но, если при работе программы исходный XLS файл открыт в Excel, то вместо дат возвращаются целые числа, например, вместо 26.09.1996 возвращается 35334 и т.д. И еще заметно тормозится работа программы (в 2-3 раза). Почему так происходит? Можно ли это обойти?

Каким образом Excel вообще может влиять на выборку, ведь он же не изменяет файл при открытии?