Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


1320 / 9994 ←次へ | 前へ→

【11972】テーブル作成について
質問  MIMI  - 11/3/17(木) 10:58 -

引用なし
パスワード
   作成した、選択クエリから、テーブルを作成するマクロを作りましたが、
どうしても、一列だけデータが入ってこないフィールドがあって、
どう回避すればよいのか分からず、ココに来ました

クエリ名が、Q_情報追加 というものが有り、このクエリを
T_情報 というテーブル名でテーブルを作成したいのですが、
他のデータはうまく入っているのですが、
どうしても、【場所】というフィールド名があるのですが、それだけは、
作成したテーブルに反映されないのです。
フィールド名は項目に存在して、作成されたテーブルに載ってきているのですが、
内容のデータが全く入ってきてくれません
原因が全く分からず困ってます


今のコード記述です

Sub TBL作成()

On Error GoTo エラー

Dim cn As New ADODB.Connection
Dim Cmd As New ADODB.Command
Dim mySQL As String

Set cn = CurrentProject.Connection

mySQL = "SELECT * "
mySQL = mySQL & "INTO T_情報 "
mySQL = mySQL & "FROM Q_情報追加;"


Cmd.ActiveConnection = cn
Cmd.CommandText = mySQL
Cmd.Execute mySQL

cn.Close: Set cn = Nothing

Exit Sub

エラー:
  
  If Err.Number = -2147217900 Then
    DoCmd.DeleteObject acTable, "T_情報" '削除します。
    Resume
  Else
    MsgBox Err.Number & " : " & Err.Description
  End If

End Sub

どうか、ご教授願います

376 hits

【11972】テーブル作成について MIMI 11/3/17(木) 10:58 質問[未読]

1320 / 9994 ←次へ | 前へ→
ページ:  ┃  記事番号:
1078193
(SS)C-BOARD v3.8 is Free