エクセルのデータをアクセスにテーブルリンクしたいのですが
エクセルの先頭行が4行目から始まります。
なおかつA1に文字が入ります。
(画像参照)
このエクセルデータをアクセスの
「テーブルのリンク」→ファイルを選ぶ
→ワークシートリンクウィザードが表示され、次のページに進み、
「先頭行をフィールド名として使う」にチェックを入れたいのですが、先頭行は4行目です。
この場合、どうすればエクセルの4行目を
アクセスのテーブルリンクの先頭行にできるのでしょうか?
エクセルのA1の文字を消去すれば自動的に4行目がアクセスで先頭行になりますが
エクセルの方は決まったフォーマットなのでA1の文字を消去することはできません。
ご回答よろしくお願いします。
No.2
- 回答日時:
当方、Access2007、Excel2007 ですが。
項目名を含む、インポートするデータ範囲に 「範囲名」 を付けておきます。
Access でインポートするときに
・ワークシート
・名前の付いた範囲
を選択できるところで
「名前の付いた範囲」 を選択します。
表示された 「範囲名」 の一覧からインポートする範囲のものを選択します。
表示されるサンプルデータに項目名が表示されているなら
次の画面で、「先頭行をフィールド名として使う」にチェックをします。
状況によっては、項目名が表示されていなくて、
そのまま、チェックせずに進めても
正しい項目名付きでインポートされる場合もあります。
2003 以前でも、多少の違いがあっても
同様のことができたはずです。
なお Excel が2007 以降なら、
新機能のテーブルと範囲名を組み合わせることで
データが増えても、範囲名の範囲が自動的に調整されるようにできます。
No.1
- 回答日時:
VBA は大丈夫ですか
エクセルファイルの拡張子 xls に対してのものになりますが、
新規 Access ファイルを作成し、動作確認してみてください。
手順)
・新規 Access ファイルを作成します
・標準モジュールに以下を記述します
Public Sub Sample()
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Const sCon As String = "Excel 8.0;HDR=YES;IMEX=2;DATABASE="
Const sFile As String = "E:\hoge\ts4.xls" ' ★ ファイルのパス
Const sSheet As String = "Sheet1" ' ★ シート名
Const sRange As String = "A4:C56" ' ★ 範囲
Const sTable As String = "T_Tmp" ' ★ Access テーブル名
Set db = CurrentDb
On Error Resume Next
db.TableDefs.Delete sTable
On Error GoTo 0
Set tdf = db.CreateTableDef(sTable)
With tdf
.Connect = sCon & sFile
.SourceTableName = sSheet & "$" & sRange
End With
db.TableDefs.Append tdf
db.TableDefs.Refresh
Set tdf = Nothing
Set db = Nothing
RefreshDatabaseWindow
End Sub
・上記★部分4つを変更し、実行してみます
・テーブル名で指定したものが出来上がっていると思うので、開いて内容を確認します
動いた/動かなかった・・・程度で良いので、結果報告をお願いします。
※ 動かなかった場合、
・Access のバージョン
・エクセルファイルの拡張子
を補足いただければ、追加で回答できるかもしれません。(できないかも)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
あるあるbotに投稿したけど採用されなかったあるある募集
あるあるbotに投稿したけど採用されなかったあるあるをこちらに投稿してください
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
Access インポート
Access(アクセス)
-
ACCESS テーブルに2行目から取り込む方法
その他(Microsoft Office)
-
Vbaでアクセスからエクセルにリンクテーブルする
Access(アクセス)
-
-
4
Accessで、1つの項目に複数の置換えを1度でするには?
Access(アクセス)
-
5
Access2003 クエリで、空の列は作れますか?
Access(アクセス)
-
6
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
7
Accessクエリで特定の行を削除したい
Access(アクセス)
-
8
Accessのマクロでモジュールを実行させたい。
Access(アクセス)
-
9
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
10
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
11
Accessにインポートしたら並び順が変わっちゃった
Access(アクセス)
-
12
MS Accessでフォームの「開く時」と「読込み時」のイベントの違い
Access(アクセス)
-
13
エクセルのデータをアクセスにインポートしたいのですが、フィールド名として使用できないデータがあるようで・・
Access(アクセス)
-
14
エクセルからアクセスにインポートすると、エラーが出てしまいます。原因を教えていただけませんか。
Access(アクセス)
-
15
ACCESSのテーブルのデータで、先頭に「000」を付与するほう右方
Access(アクセス)
-
16
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
17
エクセルからアクセスにインポートする際のエラーについて
Access(アクセス)
-
18
アクセスからエクセルのシートを追加して、名前をつける方法
Excel(エクセル)
-
19
アクセスで追加した項目に全て同じ値を一発で入れたい
Access(アクセス)
-
20
「#エラー」の回避
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
visual studio でインデントを...
-
エクセル マウスで選択した範...
-
エクセル ダブルクリック入力の...
-
選択範囲の空白セルに0を入れる...
-
反転する時の色を変えたいのですが
-
EXCEL VBA----離れたセル範囲の...
-
エクセル オートザム 範囲選...
-
Wordデータの色を反転させたい
-
ペイントでの切り取り
-
ヤフオクなどでキレイな枠
-
Wordで一括範囲指定について
-
VBA 罫線を消さずに切り取り A1...
-
エクセルである行以下全部を削...
-
白飛びした(明るい)写真をiPhon...
-
Photoshop で8bit /チャンネル ...
-
「無」と「未」の使い方
-
EXCEL VBAで全選択範囲の解除
-
Wordでドロップダウンリスト連動
-
ipadのpagesでMS明朝を使う方法...
-
マウスカーソルをレーザーポイ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
visual studio でインデントを...
-
エクセル ダブルクリック入力の...
-
エクセル マウスで選択した範...
-
テーブルリンク エクセルの4...
-
選択範囲の空白セルに0を入れる...
-
EXCEL VBA----離れたセル範囲の...
-
Wordデータの色を反転させたい
-
反転する時の色を変えたいのですが
-
読み上げ機能について
-
セル削除右(又は下)方向にシフト
-
エクセルのマクロで選択範囲の...
-
アドレスを指定して削除できる...
-
エクセルのフィルタオプション...
-
これなんですか? iPhoneのメモ...
-
この画像の上と下の黒い部分を...
-
EXCEL VBAにて画像処理のアドイ...
-
手書き フォトショップ 文字 縁...
-
VBA 罫線を消さずに切り取り A1...
-
この表を下に 、SNS実名利用率...
-
Wordで一括範囲指定について
おすすめ情報