- 締切済み
関連がある複数のテキストファイルの扱い方
chayamatiの回答
- chayamati
- ベストアンサー率41% (257/615)
変なたとえになりますが この無い親はいるが、親の無い子はいない ＞> 1:∞ のリレーションのテーブルから∞側 1側の順に初期化する ＞申し訳ないのですが、意味がよく理解できませんでした。 VBAのコーディングリストで Private Sub テーブル初期化_Click() If MsgBox("全テーブルを初期化します。", vbYesNoCancel) = 6 Then テーブル初期化RTN Else MsgBox ("取り消し") End If End Sub Private Sub テーブル初期化RTN() DoCmd.SetWarnings True DoCmd.RunSQL ("delete from カテゴリ ;") DoCmd.RunSQL ("delete from カテゴリ関連 ;") DoCmd.RunSQL ("delete from カテゴリ中継 ;") DoCmd.RunSQL ("delete from 成分 ;") DoCmd.RunSQL ("delete from 成分関連 ;") DoCmd.RunSQL ("delete from 説明 ;") DoCmd.RunSQL ("delete from 全説明 ;") DoCmd.RunSQL ("delete from 商品マスタ;") DoCmd.RunSQL ("delete from ブランド ;") DoCmd.RunSQL ("delete from メーカー ;") MsgBox ("テーブル初期化完了") DoCmd.SetWarnings False End Sub Private Sub txtインポート_Click() DoCmd.SetWarnings True 'シングルクォーテーションより右はメモです。 警告表示 True 非表示 False DoCmd.TransferText acImportDelim, , "メーカー", "D:\okwave\テキスト\メーカー.txt", True DoCmd.TransferText acImportDelim, , "ブランド", "D:\okwave\テキスト\ブランド.txt", True DoCmd.TransferText acImportDelim, , "説明", "D:\okwave\テキスト\説明.txt", True DoCmd.TransferText acImportDelim, , "全説明", "D:\okwave\テキスト\全説明.txt", True DoCmd.TransferText acImportDelim, , "商品マスタ", "D:\okwave\テキスト\商品マスタ.txt", True DoCmd.TransferText acImportDelim, , "成分関連", "D:\okwave\テキスト\成分関連.txt", True DoCmd.TransferText acImportDelim, , "成分", "D:\okwave\テキスト\成分.txt", True DoCmd.TransferText acImportDelim, , "カテゴリ中継", "D:\okwave\テキスト\カテゴリ中継.txt", True DoCmd.RunSQL ("INSERT into カテゴリ関連(成分コード,カテゴリコード) select 成分コード,大分類コード&中分類コード&小分類コード from カテゴリ中継 ; ") DoCmd.TransferText acImportDelim, , "カテゴリ", "D:\okwave\テキスト\カテゴリ.txt", True DoCmd.SetWarnings True MsgBox ("txtファイルインポート完了") End Sub を見比べて下さいテーブルの順が逆になっていますね Private Sub テーブル初期化RTN() は ∞から１へ Private Sub txtインポート_Click() １から∞へ わーまた大変なミスをしたようです。 次を Private Sub テーブル初期化RTN() の前に挿入して下さい これでテーブル毎にワーニングが出て、「いいえ」「デバッグ」で対象の行が表示され テーブル名と初期化の判断が出来ます '---------------------------------------------------------------------- Private Sub テーブル初期化_Click() If MsgBox("全テーブルを初期化します。", vbYesNoCancel) = 6 Then テーブル初期化RTN Else MsgBox ("取り消し") End If End Sub Private Sub テーブル初期化RTN() '------------------------------------------------------------------------- VBAを差し替え、以下の順で再度インポートを行ってみましたが、また同じようにエラーとなってしまいました… 【テーブル初期化】→【TXTファイルエキスポート】→【リレーションの再設定】→【先方データをD:OKWAVE\テキストのファイルにコピペ】→【TXTファイルインポート】 どこに原因がありそうか、少しずつファイルをいじっては試してるのですが…原因がつかめず仕舞いです。 ------------------------------------------------------------------------ いっそのこと、リレーションを全て削除して 【テーブル初期化】→【TXTファイルインポート】 を繰り返しやってみますか これだと、単独の処理出でチェックでき、テーブルとテキストの項目名の整合性が確認でき、 リレーションの再定義で総合チェックとなります
関連するQ&A
- 複数のテキストファイルを1つにまとめる
同一フォルダ内にある複数のテキストファイルの内容を1つにまとめる方法を探しております。 例えば、 a.txt, b.txt, c.txt が同一フォルダにあり、 それぞれの内容が AAA BBB CCC である時に、これらをまとめて matome.txtとして、その内容が AAA BBB CCC となるようなプログラムを書きたいのですが、どの様な方法が考えられますでしょうか。 上の例では3つのテキストファイルですが、実際に処理したいファイルは数百個になる為、一つ一つファイル名を入力する作業が大変で困っております。 同一フォルダ内のファイルをファイル名順に一度に読み込み、まとめる方法がありましたらお教え下さい。
- ベストアンサー
- C・C++・C#
- バッチファイルで複数のテキストファイルの置換
バッチファイルで以下のような処理を行うことはできないでしょうか？ フォルダ1以下の全てのテキストファイル内の abcde という文字列を あいうえお に置換して、上書き保存ではなく 元のファイル名＋(編集済み).txt というファイル名で同じ場所に保存できないでしょうか。 バッチファイルで出来ない場合他の物でも構いません。 ――――――――――――――――――――――――――――― 処理前 フォルダ1 │ ├フォルダ2 │ └ファイル1.txt (内容：123abcde) │ ├フォルダ3 │ └フォルダ4 │ └ファイル2.txt (内容：abcde123abcde123) │ └フォルダ5 └ファイル3.txt (内容：456fghij) ――――――――――――――――――――――――――――― ↓ ――――――――――――――――――――――――――――― 処理後 フォルダ1 │ ├フォルダ2 │ └ファイル1.txt (内容：123abcde) │ └ファイル1(編集済).txt (内容：123あいうえお) │ ├フォルダ3 │ └フォルダ4 │ ├ファイル2.txt (内容：abcde123abcde123) │ └ファイル2(編集済).txt (内容：あいうえお123あいうえお123) │ └フォルダ5 └ファイル3.txt (内容：456fghij) ――――――――――――――――――――――――――――― こんな感じで出来ないでしょうか。 よろしくお願いします。
- ベストアンサー
- その他（プログラミング・開発）
- 沢山のテキストファイルを一つに
下のように、Testフォルダに Area1、Area2・・・とフォルダがあり、 その中に、Sample.txtがあります。 C:\Test\Area1\Sample.txt C:\Test\Area2\Sample.txt C:\Test\Area3\Sample.txt ・ ・ ・ C:\Test\Area30\Sample.txt それぞのフォルダのSample.txtは "1234567890.123" "2345678901.234" "3456789012.345" . . . のように、数桁の数字が数百行並んでいます。 例えば、 Area1\Sample.txt に100行、 Area2\Sample.txt に200行、 Area3\Sample.txt に150行あるとします。 これを、 1～100行にArea1\Sample.txtの内容を、 101～300行にArea2\Sample.txtの内容を、 301～450行にArea3\Sample.txtの内容を、 として、Area30までのSample.txtを並べた 一つのテイストファイルに書き直したいのですが、 何しろ沢山あるので、一つ一つ開いてコピぺでは、 書き落としなども心配ですし、毎回大変時間が掛かります。 簡単に並べて書き出す方法はないでしょうか。 Excel等を使ってできないでしょうか。 宜しくお願いします。
- 締切済み
- オフィス系ソフト
- バッチファイルでテキストファイルを分割したい
テキストファイルを、指定した数値の倍数の行を、指定した個数に分割するバッチファイルを作成しようとしています。 例えば、以下の様な内容の「in.txt」というテキストファイルを3分割したい場合、 ----- in.txtの内容 ----- 1 2 3 4 5 6 7 8 9 10 ------------------------ 以下の様な内容で、 「out1.txt」「out2.txt」「out3.txt」として出力したいのです。 ----- out1.txtの内容 ----- 1 4 7 10 -------------------------- ----- out2.txtの内容 ----- 2 5 8 -------------------------- ----- out3.txtの内容 ----- 3 6 9 -------------------------- 自分はプログラミングの知識がないので、WEBに書かれている構文を少し書き換えたりして試しているのですが、うまく行きません。 AWKを使い、以下のようなバッチファイルを作成して実行してみましたが、「out3.txt」だけがうまく行きませんでした。構文の意味も分からないので修正も出来ません。 awk "NR%%3==1" "in.txt" > "out1.txt" awk "NR%%3==2" "in.txt" > "out2.txt" awk "NR%%3==3" "in.txt" > "out3.txt" AWKの解説ページを読み始めたのですが、時間的な猶予があまり無く、今回質問させて頂いた処理が出来るようになるまでまだ時間が掛かりそうなので、どなたかお分かりの方がおられましたお教え頂けないでしょうか。 AWKでなくとも、sedでもPerlでもその他のコマンドでも構いませんし、スクリプトファイルを読み込めるコマンドでしたらスクリプトでの書き方でも結構ですので、ご存知の方がおられましたらお教え頂けないでしょうか。
- ベストアンサー
- その他（プログラミング・開発）
- 複数テキストを一行ずつファイル名を付けて結合する方法
複数テキストを一行ずつファイル名を付けて結合する方法 フォルダにある複数のテキストデータを１つのテキストデータに結合する際、テキスト１行毎の先頭にファイル名を付けたいのですが。具体的には以下の通りです。 最終的にはexcelに取込み処理するので、excelのマクロかDOS系でできるとあり難いです。 [file1.txt] 1111111111 2222 33333333 [file2.txt] 123 1234 ↓ [all.txt] file1.txt 1111111111 file1.txt 2222 file1.txt 33333333 file2.txt 123 file2.txt 1234
- ベストアンサー
- その他（プログラミング・開発）
- テキストファイルを一つにまとめる
一つののフォルダ内に複数のテキストファイルがあります a.txt b.txt c.txt があり内容はそれぞれ 日付 商品名 数量と同一項目にしてあります これを同じフォルダに自動で一つのファイルにまとめる方法はありませんか 超初心者です よろしくお願いします
- 締切済み
- C・C++・C#
- Excel VBAで列ごとのデータをテキストファイルへ書くには？
エクセルのシート(たとえばSheet1）が以下のようになっているとします。 Ａ Ｂ Ｃ Ｄ Ｅ Ｆ １ 商品Ａ 11111111 あいうえお 3 1000 ２ 商品Ｂ 22222222 かくくけこ 1 2500 ３ 商品Ｃ 33333333 さしすせそ 2 3500 ・ ・ これを決まった列ごとにテキストファイル（固定ファイル名）に書き出すということは、エクセルのVBAで可能でしょうか？ テキストファイルの内容は以下のようにしたいのです。 Ｅ列を数量として、その分だけのテキスト行を書き出したいのですが… <<bbb.txt>> 商品Ａ 商品Ａ 商品Ａ 商品Ｂ 商品Ｃ 商品Ｃ ・ ・ <<ccc.txt>> 11111111 11111111 11111111 22222222 33333333 33333333 ・ ・ <<fff.txt>> 1000 1000 1000 2500 3500 3500 ・ ・ また、このようなことが参考になるHPがあればお教え願いたいのですが。 以上よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- テキストファイルを1行ずつ別のファイルに分割する
400行ぐらいのテキストファイルを、1行ずつ別のファイルに分割したいと思います。 ファイル名は**001.txtのように、（**は任意の文字列、数字は連番）なってくれれば嬉しいです。 どなたかこのような処理のできる簡単な方法をご存じないでしょうか？ よろしくお願いします。
- ベストアンサー
- その他（プログラミング・開発）
- エクセルの各シートに複数のtxtファイルを取り込む
Excel2013を用いたデータ整理をしているのですが，複数のファイルを扱う上でマクロを用いた効率化をしたいと思い，質問させていただきました． いま，Folder1 というフォルダに，text1 から text40 までの 40個のtxtファイルがあります． これらのファイルを，エクセル上であらかじめ作成してある Sheet1 から Sheet40 にそれぞれ貼り付けたいと考えています． txtファイルは，4列で構成されており，タブでそれぞれ区切られています． 行数は20,481行です． txtの中には，0 の値が入った箇所もあるため，その情報が消えないで貼り付けられると望ましいです． また，タブのところでしっかり区切られ，違うセルに貼り付けられると，ありがたいです． 質問は以上です． お手数ですが，よろしくお願いします．
- ベストアンサー
- Excel（エクセル）
- 外部テキストファイルの書き換えと作成について
外部テキストファイルの操作について悩んでおります。 アドバイスお願いします。 まず、外部テキストファイルdate.txtファイルの中身は以下のような具合です。 2/19 2/18 2/09 2/14 2/17 というたった五行の日付情報です。 この日付情報をユーザーがhtml上(実際はdate.phpというファイルです)で自由に変更できるようにしたいというのが私の処理の理想です。 そこで、この日付情報のそれぞれをhtmlのinput type=textのvalue値として、まず読み込ませて表示させます。 そしてユーザーは5つそれぞれを書き換え、もしくはそのまま変更なしでもかまいませんが、最終的にsubmitでphpに送信します。(自分自身、date.phpに送信します。) そのあと、date.txtファイルがユーザーの指定通りに書き換えられるという仕組みです。 さらに、その書き換えられた際に、date.txtファイルとは別に、updated.txtファイルを生成したいと思っています。(生成というか、常にdate.txtファイルの中身が変更される際に、updated.txtファイルも変更されるようにしたいということです。) そのupdated.txtファイルの中身は、 v_hensu1=2/19&v_hensu2=2/17&v_hensu3=2/14&v_hensu4=2/17&v_hensu5=2/15 というようにしたいと思っています。改行は必要ありません。 date.txtの日付情報を上からそれぞれv_hensu1、v_hensu2に当てはめていって、それぞれを&でつなぐだけです。 以上で処理の流れは完了です。 そこでわからないのは、「最初にdate.txtファイルを開く際に使う関数」と、 次に「date.txtを書き換える際に使う関数」と、 「updated.txtを作るための関数」です。 ファイル操作について、また簡単な例をあげていただけますと幸いです。どうぞ宜しくお願いいたします。
- ベストアンサー
- PHP