請(qǐng)問(wèn)如何編程從excel中導(dǎo)入數(shù)據(jù)？

wonking

各位大蝦，請(qǐng)問(wèn)已存在一個(gè)表，要從excel表中導(dǎo)入一批數(shù)據(jù)，如何編程實(shí)現(xiàn)。
小弟新手，請(qǐng)盡量詳細(xì)一點(diǎn)，急盼回復(fù)，多謝！[em09][em09]

Tom_HYQ

我也想知道，請(qǐng)大家多多指教。

make

查找transferspreadsheet的幫助

zing72721

select * from .db

[此貼子已經(jīng)被作者于2002-10-22 8:42:42編輯過(guò)]

zhengjialon

Function 導(dǎo)入XX訂單()
On Error GoTo 導(dǎo)入XX訂單_Err

    DoCmd.TransferSpreadsheet acImport, 8, "XX訂單", "D:\ACCESS\XX開(kāi)發(fā)版\XX平臺(tái)\XX訂單匯總", True, ""
    DoCmd.TransferSpreadsheet acImport, 8, "XX訂單", "D:\ACCESS\XX開(kāi)發(fā)版\XX平臺(tái)\XX訂單匯總", True, ""


導(dǎo)入XX訂單_Exit:
    Exit Function

導(dǎo)入XX訂單_Err:
    MsgBox Error$
    Resume 導(dǎo)入XX訂單_Exit

End Function
以前用宏做的，我把它轉(zhuǎn)成代碼了，你參考一下吧。

[此貼子已經(jīng)被zhengjialon于2002-11-15 8:10:47編輯過(guò)]

wonking

多謝各位兄弟幫忙！

wuwu200222

學(xué)習(xí)

wuwu200222

學(xué)習(xí)