這其實是很簡單的事,但最終的結果是從「正常化」,因此我強烈建議你把所有的數據在一個表中,有一個「PartNum」字段或東西,所以它可以是很遠必要時進行過濾。
但是,爲了回答你的問題......你可以做到這一點的方法就是使用unbound form。如果您沒有將特定的表格作爲表單的源數據關聯,則它被視爲未綁定。相比之下,如果您將表單綁定到特定的表格,然後將這些字段綁定到控件,只要您在表單中輸入數據,它會立即寫入表格。使用未綁定的表單可以完全控制寫入的數據和寫入的表。
因此,在使用未綁定的形式,你可以簡單地把表單上的「保存」按鈕,並把VBA在這個按鈕的onclick事件。在按鈕的OnClick事件中,您可以檢查PartNum字段,並根據該值寫入相應的表格。
例如:
Public Sub btnSave_OnClick()
dim db as Database
dim rec as Recordset
Set db = CurrentDb
'Find out which table to write to
if Me.PartNum.Text = "A" then
MyTable = "PartNumA"
elseif Me.PartNum.Text = "B" then
MyTable = "PartNumB"
else (etc...)
end if
Set rec = db.OpenRecordset("Select * from " & MyTable & "")
rec.AddNew
rec("PartNum") = Me.PartNum.Text
rec("Date") = Me.Date.Text
rec("Temperature") = Me.Temperature.Text
etc...
rec.Update
rec.Close
db.Close
End Sub
以上完全是 「aircode」;完全未經測試和假設,但可能非常接近你實際寫的內容。
我想真正的問題是爲什麼有多個零件表? –
現在我想,我想我可以只有一個表格,而且我總是可以過濾或導出它,以便通過零件號查看它。當我輸入結果時,我真正想要的是通過或失敗,因此每個零件號碼都有不同的限制。 –
那麼你需要問SQL相關的問題,因爲這種類型的數據過濾是什麼SQL是好的 –