2015-07-11 52 views
-1

目前我正在使用Access从excel导入外部数据。我正在获取无效或无资格的参考当我尝试超出价值。MS Acess无效或不合格的参考

列可在Excel工作表: -

  1. GROUP_NUMBER
  2. CARD_NUMBER

下面是我到目前为止已经试过代码: -

qry = "SELECT * FROM " & _ 
     "tbl_mainframe " 

Set rst = CurrentDb.OpenRecordset(qry) 

rst.MoveLast 
total_record = rst.RecordCount 
rst.MoveFirst 

For i = 0 To total_record - 1 
MsgBox (Nz(!Card_Number)) - > **Error** 
rst.MoveNext 
Next i 
rst.Close 

请指教。

+0

尝试NZ(rst.card_number),而不是 –

+0

@SamM ..仍然得到错误..找不到成员 –

+0

如果你使用'QRY = “SELECT CARD_NUMBER FROM tbl_mainframe”'有什么价值'total_record'和'MsgBox rst(0)'报告的是什么? – Jeeped

回答

1

这应该工作 qry = "SELECT * FROM tbl_mainframe" Set rst = CurrentDb.OpenRecordset(qry) do While not rst.Eof MsgBox (Nz(rst!Card_Number)) rst.MoveNext Loop rst.Close

+0

,谢谢你的伴侣。它工作正常。 –