2012-02-16 57 views
0

能否請你幫如何查詢訪問數據庫,並從Excel VBA檢索與訪問數據庫查詢基於一些標準的從Excel VBA值

我的算法如下:


開放訪問連接數據庫

選擇table1.column1,table1.column2,table1.column3其中table1.column3.value =「x」和table1.column2.value =「Y」

開關盒1:如果發現從訪問數據庫的標準匹配的

插入一些值等沒有記錄......

開關案例2:如果發現記錄從Access數據庫

沒有滿足要求的需要採取的措施

開關情況3:如果發現記錄與訪問數據庫中的值不匹配

應在Excel VBA中,datagridview的顯示值

不應該允許插入值


請幫我從Excel VBA需要

感謝 Prabu中號

代碼
+0

搜索,以便使用該代碼'[MS-訪問] [EXCEL] ado' – Fionnuala 2012-02-16 23:17:22

+0

請參閱此鏈接。它會給你如何着手的基本想法。 http://stackoverflow.com/questions/9083232/writing-excel-vba-to-receive-data-from-access/9085127#9085127 – 2012-02-17 01:43:51

+0

感謝老兄,但你能幫助我如何使用開關情況基於沒有找到記錄訪問數據庫或記錄不符合標準 – 2012-02-17 16:51:35

回答

0

請注意,case3case1是類似的

可以

Dim recSet As Recordset 
    Set recSet = CurrentDb.OpenRecordset("Select table1.column1, table1.column2,"_ 
      & "table1.column3 where table1.column3.value = 'x' and table1.column2.value = 'y'") 
    If recSet.EOF Then 'No records matching criteria 
     'Do something 
    Else 'There was records found 
     'Do Something else 
    End If