| 投稿日 | ： 2004/07/22(Thu) 16:09 |
| 投稿者 | ： りっとっと |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^2: DataGrid上でのエクセルファイル編集 |
Set cn = New ADODB.Connection
cn.CursorLocation = adUseClient
cn.Open "Provider=MSDASQL;Driver={Microsoft Excel Driver (*.xls)};DBQ=" & xlFilePath & ";ReadOnly=False;"
Set rs = New ADODB.Recordset
rs.Open "[Sheet1$]", cn, adOpenStatic, adLockOptimistic
rs.AddNew
rs.Fields("フィールド1").Value = 123
rs.Fields("フィールド2").Value = "テスト"
rs.Fields("フィールド3").Value = "参照"
rs.Update
とりあえずこんな感じで編集できますね。接続文字列にReadOnly=Falseをつければ編集可能となります。