我正在使用at和able,並且我已經將excel中的數據導入到此表格中。下面一欄中的每個文本都有不同的文本,並且我想將ID放在所選的所有文本的前面,因爲不是所有的字段都有ID:在它前面,所以我不想要將格式應用於整列。我將如何做到這一點?如何在列表下的表格中插入文本infront的文本
我希望能夠選擇在表中的「備註」字段圓圈的數據,然後把ID:在衆人面前。
我正在使用at和able,並且我已經將excel中的數據導入到此表格中。下面一欄中的每個文本都有不同的文本,並且我想將ID放在所選的所有文本的前面,因爲不是所有的字段都有ID:在它前面,所以我不想要將格式應用於整列。我將如何做到這一點?如何在列表下的表格中插入文本infront的文本
我希望能夠選擇在表中的「備註」字段圓圈的數據,然後把ID:在衆人面前。
我是第一個可以理解作者的人;-),你想要這個嗎?
UPDATE MyTable SET Notes = 'ID:' & Notes
WHERE (Notes NOT LIKE 'ID:*');
此訪問更新查詢預先在沒有它的Notes之前存在'ID:'字符串。
在Access中,您創建一個查詢,將其命名爲qryUpdNotes,例如,將類型更改爲UPDATE。保存並雙擊它。訪問將做的工作
使用DAO在VBA的休息: CurrentDb.Execute 「UPDATE MyTable的設置Notes = 'ID:' &注意WHERE(注NOT LIKE 'ID:*');」
我用這個:
Function daoExecuteSql(ByVal strSQL As String) As Long
'
Dim nDone As Long
'
Dim db As DAO.Database
'
On Error GoTo ErrorStatus
'
Set db = CurrentDb
db.Execute strSQL, dbFailOnError
'
nDone = db.RecordsAffected
'
On Error GoTo 0
'
' db.Close
Set db = Nothing
'
daoExecuteSql = nDone
'
Exit Function
'
ErrorStatus:
'
MsgBox "daoExecuteSql(): " & strSQL
'
Set db = Nothing
daoExecuteSql = 0
'
End Function
而且在Sub /宏調用它是這樣的:我無法作出任何意義了你的問題的
Dim strSQL
strSQL = "UPDATE MyTable SET Notes = 'ID:' & Notes" _
& " WHERE (Notes NOT LIKE 'ID:*');"
daoExecuteSql strSQL
。你是什麼意思「把ID放在前面」和「應用格式」? Access中的條件格式是逐行處理的,而不是列式處理。你可以考慮重寫你的問題,使問題更清楚。 – HK1
我最近的編輯更有意義嗎? – D347HxD
是否要更新Notes列以將「ID:」添加到尚未擁有它的每個字段值? – HansUp