Excel VBA ODBC соединение импортированное форматирование столбцов

Question

Я ищу способ переформатировать некоторые поля, которые импортируются на мой лист, используя соединение ODBC. В частности, полями являются поля даты. Мне нужно импортировать их как текст или какой-либо другой формат, потому что данные в базе данных иногда имеют даты «1850-01-01» или «0001-01-01». При импорте в excel даты отображаются только как ####.

Вот отредактирован запрос настоящее время я использую:

Public Sub REFRESH_DATA() 

Dim cnDB As New ADODB.Connection 'Declare the connection object. 
Dim rsRecords As New ADODB.Recordset 'Declare a Recordset object. 

'Open the connection 

cnDB.Open "DSN=DB;Database=DB;Servername=server.net;UID=username;Password=password;Port=0000;ReadOnly=0;SQLBitOneZero=0;LegacySQLTables=0;NumericAsChar=0;ShowSystemTables=0;LoginTimeout=0;QueryTimeout=0;DateFormat=1;SecurityLevel=onlySecured;CaCertFile=" 

rsRecords.Open "SELECT REGION_CD, CUST_NO, EFF_DATE FROM DATABASE.TABLE", cnDB 

'Print the records in the correct table 
.Range("A2").CopyFromRecordset rsRecords 

'Close everything 
rsRecords.Close 
Set rsRecords = Nothing 
cnDB.Close 
Set cnDB = Nothing 

End Sub 

EFF_DATE Столбец является столбцом под вопросом.

Answer 1

Проводка ответ на мой собственный вопрос для будущего потомства:

Где моя SELECT заявление EFF_DATE, я изменил его читать CAST(EFF_DATE as varchar(30)) который затем поддерживает формат из самой базы данных.