2013-11-04 52 views
1

我正在使用at和able,並且我已經將excel中的數據導入到此表格中。下面一欄中的每個文本都有不同的文本,並且我想將ID放在所選的所有文本的前面,因爲不是所有的字段都有ID:在它前面,所以我不想要將格式應用於整列。我將如何做到這一點?如何在列表下的表格中插入文本infront的文本

This is what the column looks like:

我希望能夠選擇在表中的「備註」字段圓圈的數據,然後把ID:在衆人面前。

+1

。你是什​​麼意思「把ID放在前面」和「應用格式」? Access中的條件格式是逐行處理的,而不是列式處理。你可以考慮重寫你的問題,使問題更清楚。 – HK1

+0

我最近的編輯更有意義嗎? – D347HxD

+0

是否要更新Notes列以將「ID:」添加到尚未擁有它的每個字段值? – HansUp

回答

2

我是第一個可以理解作者的人;-),你想要這個嗎?

UPDATE MyTable SET Notes = 'ID:' & Notes 
WHERE (Notes NOT LIKE 'ID:*'); 

此訪問更新查詢預先在沒有它的Notes之前存在'ID:'字符串。

  1. 在Access中,您創建一個查詢,將其命名爲qryUpdNotes,例如,將類型更改爲UPDATE。保存並雙擊它。訪問將做的工作

  2. 使用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 
+0

我究竟在哪裏放這個vba代碼? – D347HxD

+0

在Access中,您創建一個查詢,將其命名爲qryUpdNotes,例如,將類型更改爲UPDATE。保存並雙擊它。訪問將完成剩下的工作...... – jacouh

相關問題