訪問TransferSpreadsheet命令選擇自定義範圍

所以只是爲了我的背景。沒有接受培訓，我必須以某種方式設置條形碼，導入和創建身份證（哦，並通過訪問更新蓮花筆記聯繫人！（仍然不知道我將如何使這一個工作））如果我的問題似乎很抱歉....好白癡。訪問TransferSpreadsheet命令選擇自定義範圍

無論如何，我想重要的自定義範圍的列從Excel表格到表格。這種格式不應該改變，每月生成，我只需要弄清楚如何設置我想要的列的範圍。

這裏是我的代碼：

Private Sub Command143_Click() 
Box1 = MsgBox("Importing information CANNOT be undone, are you sure you want to continue?(BE SURE TO BACK UP THE ORIGINAL TABLE FIRST!!!)", vbOKCancel, "Warning!!!") 
If Box1 = vbOK Then 
DoCmd.TransferSpreadsheet acImport, 10, _ 
    "blarg", Me.Text138, True, "(range goes here)" 
End If 
End Sub

到目前爲止，一切都很正常，只需要選擇自定義的範圍，但我似乎無法得到正確的synthax。有任何想法嗎？

來源

2013-11-14 user2744572

這爲我工作在Access 2007年：

Private Sub Command143_Click() 
    Dim Box1 
    Box1 = MsgBox("Importing information CANNOT be undone, are you sure you want to continue?(BE SURE TO BACK UP THE ORIGINAL TABLE FIRST!!!)", vbOKCancel, "Warning!!!") 
    If Box1 = vbOK Then 
    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12Xml, _ 
     "blarg", Me.Text138, True, "B2:C5" 
    End If 
End Sub

Excel文件，該範圍B2的第一行：C5將用作結果表中的字段名：

enter image description here === =>