• ベストアンサー

VBA初心者です。

VBA初心者です。 エクセルの決まった範囲(複数あります)のセルをテキストファイルに書き出したいです。 しかし一つのセルをテキストファイルに書き出すこともできていません。 どなたか書き出したことがある方、または書き出し方を知っている方宜しくお願いします。。

質問者が選んだベストアンサー

  • ベストアンサー
  • conanthe
  • ベストアンサー率65% (114/175)
回答No.1

こんにちは。ハンドルネームconantheです。 VBAはMSオフィスアプリに共通して搭載されているマクロ言語です。マクロはもともと定型作業をアプリケーションに自動でやらせるためのもので、エクセルをはじめMSオフィスアプリにはマクロを自動で記録する機能があります。 これがわかればマクロを難しく考えることはありません。人間が1回やって見せて、エクセルに自分でマクロを作らせればいいのです。エクセルのバージョンがわからないので、一般的な概念で説明します。 (1)メニューから「マクロの記録」をクリック。 (2)1つめの範囲をマウスでドラッグして選択する。 (3)2つめからあとは、Ctrlキーを押しながらドラッグする。 (4)名前を付けて保存 (5)保存形式を「テキスト(スペース区切り)」にする。 (6)OK (7)「記録終了」をクリック これでマクロが作られます。保存されたファイルは拡張子が「prn」になっていますので「txt」に変えてください。

g13atdga
質問者

お礼

ありがとうございます! 簡単にできました。マクロに記憶させればいいんですね! 勉強になりました、これを機会にマクロをもう少し活用して行こうと思います。 本当にありがとうございました!!

その他の回答 (1)

  • conanthe
  • ベストアンサー率65% (114/175)
回答No.2

こんにちは。ハンドルネームconantheです。 このたびはベストアンサーにお選びいただき、ありがとうございます。ただ、あらためて回答を見直したところ、とんでもない勘違いをしていたことに気づきました。申し訳ありませんが、下のように改めさせてください。 データがSheet1にあり、Sheet2は空いているものとします。 (1)メニューから「マクロの記録」をクリック。 (2)Sheet1の1つめの範囲をマウスでドラッグして選択し、Ctrl+Cキーを押す。 (3) Sheet2に移動し、適当な場所でCtrl+Vキーを押す。 (4) Sheet1の2つめの範囲をマウスでドラッグして選択し、Ctrl+Cキーを押す。 (5) Sheet2に移動し、1つめのデータと重ならない場所でCtrl+Vキーを押す。 (6)データ範囲をすべてコピーするまで(2)~(5)を繰り返す。 (7)Sheet2を表示した状態で、名前を付けて保存 (8)保存形式を「テキスト(スペース区切り)」にする。 (9)OK (10)確認ダイアログがでたら、「はい」をクリック (11)「記録終了」をクリック 以上です。これで大丈夫とは思いますが、またまちがいがありましたらお許しください。また、よく考えもせずに回答したことをお許しください。

関連するQ&A

  • VBA初心者です。質問があまりに簡単という方もいらっしゃるかも知れませ

    VBA初心者です。質問があまりに簡単という方もいらっしゃるかも知れませんが、 仕事上非常に困っているので何とぞよろしくお願い致します。 以下のようなマクロを教えてください(>_<) 動作:フォルダ内の複数のテキストファイルをエクセルのシートごとにインポートする。 条件:1.テキストファイルが保存されているフォルダは一つ 2.テキストファイルのファイル名に規則性はなし 3.保存されているテキストファイルのファイル数は不特定 動作例:フォルダ内に、10コのテキストファイルが保存されている場合 →それぞれのテキストファイルがエクセルの各シート(この場合、10枚のシート)に インポートされる。 以上、何とぞご教授のほどお願い致します!

  • エクセル マクロの書き方が分かりません。

    エクセルVBA超初心者です。あるエクセルファイル内の複数シートの同じ一つのセルをコピーしてテキストファイルに吐き出すプログラムをつくりたいのですが...どうすれば良いか分かりません。誰か教えてください。

  • 初心者です!エクセルVBAで

    初心者です!エクセルVBAでアクセスのデーターを修正したいのですが。 初心者です!エクセルVBAでアクセスのデーターを修正したいのですが。 データーがテキスト型を空にするには rs!Field1 = "" でいけるのですが 数値型だとエラーが出てしまいます。 フィールドを空文字にしたいのですが・・・

  • VBA初心者です。

    VBA初心者です。 今ユーザーフォームで入力項目などを作成し、セルに反映させようと思ったんですが。 構文エラーでが出てしまい、いまいちどこが悪いのかもわかりません・・・汗 やりたかったことは、 テキストボックス  テキストボックス 氏名        山田 太郎 住所        山田 花子 です。よろしくおねがいします。

  • VBA超初心者です。

    VBA超初心者です。 ファイル名の取得をしたいと思っています。 フォームからディレクトリを選択し、選択したディレクトリから ファイル名を取得し、OPENしたいのですが、 教えていただけないでしょうか。 すみません、超初心者がこの質問をするのはずうずうしいのかも知れませんが… Excel 2003(VB6.0)です。 何卒よろしくお願いいたしたします。

  • VBA初心者です。

    VBA初心者です。 Excel 2010のVBAで、 ワークシートのSheet1のオブジェクトモジュールに 他のシートから別のシートにコピー&ペーストをしたいと思い、 以下のプログラムの記述をすると、 アプリケーション定義またはオブジェクトの定義エラーとなってしまいます。 Worksheets("Sheet2").Range(Cells(1, 7), Cells(d, 8)).Copy Destination:=Worksheets("Sheet3").Cells(3, 1) (「d」は変数です。セルの範囲指定は、実際に記述するときは 範囲が広範になるので、行数列数で把握できるようにCellsを使っています) エラーになる理由と解決法をご教授いただければと思います。

  • エクセル VBA 初心者です

    初めて、VBAマクロに挑戦する初心者です。(エクセル2003) 下記サイトの説明のように 1つ1つのセルをテキストボックス化できるようにしたいと考えております。 http://tks.or.tv/note/2008/10/excelvba-3.php そこで、自分のエクセルから、マクロ→basic editor→挿入→標準モジュールを表示するところまで到達しました。 ここでわからない所が、上記サイトには、コードが3分割になっております。 どのように貼り付けを行い、目的の操作までできるのかわかりません。 どうぞよろしくお願いいたします。

  • エクセル VBA

    初心者です。 VBAを使って、ファイルを開かずにファイル本文の文字数を取得できないでしょうか。 出来ればテキスト形式・Word形式のファイルで使えると言いのですが・・・。 EXCELは2000です。 詳しい方、よろしくお願いします。

  • Excel VBA の作り方について【初心者】

    Excel VBA の作り方について質問させてください。 A1セルに「営業部【山本】」と入力されています。 B1セルに「01:35:24」(タイム)と入力されています。 (1)C1セルに「山本」を抜き出して表示 (2)D1セルに「95」(分数)で表示 (3)A2以降で同じ作業の繰り返し(最終入力列まで) というVBAを作成したいです。 マクロの場合だと、 (1)の部分は、=MID(LEFT(A1,FIND("】",A1)-1),FIND("【",A1)+1,50) (2)の部分は、=TEXT(A1,"[m]")*1 で入力ができますが、VBAの場合は違うため、困っております。 分かる方がおられましたら、よろしくお願いします。

  • VBA初心者です。 非常に困っております。

    VBA初心者です。 非常に困っております。 Excel 2003を使用しております。VBAにて下記のリスト表があるとします。 2010/04/05 りんご 30円 2010/04/12 みかん 20円 2010/06/12 もも  15円 2010/05/21 ぶどう 20円 2010/05/09 みかん 20円 このデータをExcelシートに入力されている場合、VBAのコンボボックスを使用して、 4月・・5月といったリスト表にて5月のデータのみを抽出するにはどうすればよろしいでしょうか? オートフィルタみたいな感じで結構です。さらに抽出した5月分のデータの計算を求めればどうすれば良いでしょうか?→合計値は、任意のセルに入れば良いです。 すいませんが、分かる方、丁寧なご回答のほどよろしくお願いいたします。 

専門家に質問してみよう