1.我用ADO的方式讀Access的資料,然後ㄝ用ADO轉存到Excel的table裡,無論我怎麼轉,數字型態都會變成文字型態??
紀文和兄 用 Set oExcel = GetObject(, "Excel.Application")
方式存取,難到不能用 ado 方式嗎?
附上 connection 方式
strDBFile_Excel = "c:\abc.xls"
 
  strCon_Excel = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
          "Data Source=" & strDBFile_Excel & ";" & _
          "Extended Properties=""Excel 8.0;HDR=No;"";"
  Set objCon = New ADODB.Connection
  Set objRst = New ADODB.Recordset

objCon.Open strCon_Excel

2.strSQL = "SELECT count(*) as sCount ,sum(金額) as sTotal FROM [Sheet1$A5:R2000] where a = 'xxx' "
為什麼加 where 無效用法 ? 其它方式解決嗎??
文章標籤
全站熱搜
創作者介紹
創作者 vbqa 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(0) 人氣(53)