技術標籤：access vba開啟excel檔案

Part 1：目標

1. 刪除姓名為張三的這一條記錄
2. 邏輯過程

• 連線資料庫
• 根據需求確定SQL語句
• 執行SQL語句
• 斷開與資料庫的連線

刪除記錄前

Part 2：程式碼

Sub test()  Dim cnn As New ADODB.Connection '連線 Dim rs As New ADODB.Recordset  Dim SQL As String Dim tblName  Dim dbAddr dbAddr = ThisWorkbook.Path & "學生資訊.accdb" tblName = "學生資訊表" '連線資料庫 With cnn .Provider = "Microsoft.ACE.OLEDB.12.0" .Open "Data Source=" & dbAddr  End With SQL = "delete from " & tblName & " where 姓名='張三'" Set rs = cnn.Execute(SQL) cnn.Close  Set rs = Nothing Set cnn = NothingEnd Sub
 

執行後效果

Part 3：部分程式碼解讀

1. delete from " & tblName & " where 姓名='張三'
2. 中文釋義：從工作表中刪除一條 姓名欄位取值為張三的一條記錄
3. 注意：張三有單引號包圍起來