-1

这是我的第一个问题,大家好:)

我必须在 Excel 中编写 vba 代码(由按钮执行),它将记录从文本文件添加到 Access 中的现有表中。文本文件中的数据以分号分隔,第一行作为标题。该文件始终位于同一位置,只有数据在更改。我在 2010 版的 MS Office 上工作。

我对 VBA 不太熟悉,所以我不知道如何开始 - 我能够在 Excel 中录制和播放宏。

预先感谢您的帮助!

4

1 回答 1

1

希望这可以帮助!!我没有 Office 2010,但这可能会让您对如何完成此任务有一个公平的想法,因为您对 VBA 并不陌生......这是在 MSO 2003 中完成的

Sub test_csv_import()
    Dim acAppl As Access.Application

    Set acAppl = New Access.Application

    acApp.OpenCurrentDatabase "D:\yvxs\db1.mdb"

    acApp.DoCmd.TransferText acImportDelim, "MyImportSpec", "MyCSV", "D:\yvxs\mycsv.csv", True

    acAppl.CloseCurrentDatabase
    acAppl.Quit acQuitSaveNone

    Set acAppl = Nothing

End Sub
于 2013-11-15T10:17:56.320 回答