dポイントプレゼントキャンペーン実施中!

Accessで以下のようなデータを“-”ハイフンで区切って、横のフィールドに格納したいのですが、
何かよい手法があったらおしえてください。
※下図の“,”はフィールドの区切りを示しています。
------------------------------------
場所,場所1,場所2,場所3,場所4
12
13-1
13-1-2
135-1-ロ-イ-A
--------------------------------------
というデータを
------------------------------------
場所,場所1,場所2,場所3,場所4
12,
13,1
13,1,2
135,1,ロ,イ,A
--------------------------------------

以上です。
どなたかよろしくお願いします。

A 回答 (1件)

VBAでないとできないと思いますが。



以下を標準モジュールにコピペして実行
してみてください。
DAOで書いているので、参照設定で
Microsoft DAO xx Object Library
にチェックをいれてください。

なお、以下はあらかじめ必要なフィールド数が
確保されているものとします。


Sub test40()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim var As Variant
Dim i As Long

Set db = CurrentDb
Set rs = db.OpenRecordset("テーブル名", dbOpenDynaset)

Do Until rs.EOF
  var = ""
  var = Split(rs!場所, "-")
  For i = 0 To UBound(var)
    rs.Edit
    rs.Fields(i) = var(i)
    rs.Update
  Next i
rs.MoveNext
Loop
rs.Close: Set rs = Nothing
db.Close: Set db = Nothing
End Sub
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!