• 締切済み

EXCELのマクロについて教えてください。

初心者です。 「商品コード」と「販売個数」から成る表があるとします。 「販売個数」が10個以上の商品について、当該「商品コード」の内容を別のシートに転記できるようにしたいと思っています。 どのようなマクロを書けばよいか教えてください。 宜しくお願いします。

みんなの回答

  • keithin
  • ベストアンサー率66% (5278/7940)
回答No.4

具体的な内容(例): A列にコード,B列に個数 シート1の元データをシート2に転記する sub macro1() worksheets("Sheet2").range("A:B").clearcontents worksheets("Sheet1").autofiltermode = false worksheets("Sheet1").range("A:B").autofilter filed:=2, criteria1:=">=10" worksheets("Sheet1").autofilter.range.copy worksheets("Sheet2").range("A1") worksheets("Sheet1").autofiltermode = false end sub

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.3

この程度のことで、丸投げ質問する必要なないでしょう。 >当該「商品コード」の内容を の意味は不明だが、 >販売個数」が10個以上の商品について はIFステートメントで聞く 該当しないなら処理を下の行へうつす。 >別のシートに転記できるようにしたいと 2つのシートが合って1ポウを他方へデータを持ってくるコードなど、WEB\で照会のこと >転記できるようにしたいと 転記するのだろう。はっきりと表現すること。 (1)データの値を代入 (2)コピー貼り付け の2つの方法がある。 ーーー それにこの課題を手操作でやるなら、フィルタ・フィルタオプションの設定などでやるだろう。 その操作を「マクロの記録」を取るぐらいして、勉強して、考えて質問のこと。 操作した場合以外の他の場合ではどうなるべきかを考える。 その点で、一般化したコードはどうなるか(本件はデータ行数ぐらいしか、変化しないようだが)

  • mt2008
  • ベストアンサー率52% (885/1701)
回答No.2

フィルタオプションを使用して販売個数が10個以上の物をフィルタリングして表示させる事が出来ます。 それをマクロ記録して見ましょう。

  • nda23
  • ベストアンサー率54% (777/1415)
回答No.1

>当該「商品コード」の内容 これ何ですか?商品コードと販売個数しか 説明が無いのに、いきなり「××の内容」 とか言われても困ります。 >別のシートに転記 同一ブックか異なるブックかで記述が 異なります。 また、記録先の以前の情報をクリアするのは 誰がやるのか(マクロに含めるかどうか)が ハッキリしません。 列位置やサンプルを提示しない質問では 回答も抽象的になりますが、初心者では そういう回答で分かるのでしょうか? 次の観点で補足してください。 (1)実際に記録されていて、処理すべき情報 (2)マクロはどこに置くか(表のあるブックか  または別のブックか) (3)マクロ、あるいは転記元、転記先が異なる  場合、ファイル名を入力する機能をマクロに  含めるか (4)転記先の整理(初期化)は誰の分担か

関連するQ&A

  • エクセル2007 マクロについて教えてください。

    2種類のファイルがあります。 ファイルA   販売データ ファイルB   商品ごとの詳細表 ファイルAには、商品ID、販売日時、販売個数が入力されています。  商品ID  販売日時   販売個数   ABAB  2010/06/05    10   ABAB  2010/06/07     8  ABAB  2010/06/12     2  CDCD  2010/06/06    15  CDCD  2010/06/09     4  EFEF   2010/06/01    8  GHGH  2010/06/12    14  GHGH  2010/06/15     2 ファイルBは各商品IDごとに1枚のシートに商品情報が記入されています。 シートAの販売日時と販売個数をそれぞれのシートにマクロで転記させていきたいと思ってます。 「商品IDが変わったら、次のシートへ移動」という命令文を教えてください。 お願いします。

  • VLOOKUPをマクロで行いたい

    お世話になります。 画像の、Sheet1の担当者、商品名、受注額、売上月の内容を 別ブックのマスタシートからVLOOKUPをつかって転記しています。 これをマクロ化させたいと思っています。 どなたかご教授をお願い致します。 マクロ初心者ですので、コードの解説をして頂くとありがたいです。 よろしくお願いいたします。

  • エクセルのマクロ作成で困ってます

    マクロ初心者です。 ”Sheet1にあるデータについて、複数条件で抽出後、Sheet2の表に転記” という動作をマクロで組みました。 ここまでは良かったのですが、Sheet2に転記する際、下記の様にさらに条件を付加したいと思っています。 やりたいこと(ア) Sheet1で条件によりたとえば10個のデータを抽出できたとし、 1~6個目までは、Sheet2の1行~6行に転記、 7~10個目までは、Sheet2の11行~14行に転記。 ※”6個目まで1~6行に転記”というのは決まっているのですが、  この10個というのは、例であって、5個だったり、14個だったり、  抽出したデータにより異なるので、変数です。 やりたいこと(イ)   Sheet1から、さらに別の条件で抽出したデータを、  やりたいこと(ア)の10個目を転記した行のあとすぐ(例でいうと15行目)から転記したい。  ※やりたいこと(ア)で抽出した条件が6個以下だった場合、11行目から転記。 以上の2つです。 条件の抽出までは出来るのですが、 (ア)の7個目から別のところに転記 (イ)の別の条件で抽出したデータを(ア)の次(6個以下の場合は11行目)から転記 をどうやって組んだら良いかわかりません。 もし分かる方がいらしたら、 どのようなコマンド(?)を使ったら良いのか、 ご教示いただけると助かります。 よろしくお願いします!

  • エクセルのマクロについて

    マクロのコードについて教えていただきたいと思います。 sheet1のA2に[=today()]の数式があって、その下の表がであります。表にもオートサムなどの関数 B2~H 70まであります。 sheet2の 1行目が日付欄で、この日付とsheet1のA2が一致した時にB2~H 70の表の数値だけを転記することは可能でしょうか。 わかりにくくて申し訳ありませんがコードがわかれば助かります。

  • エクセル マクロ

    エクセルマクロで、複数ファイルにある全シートの情報を、別ファイルの1シートに転記したいのですが、なかなか上手く行きません。(ほぼ初心者です。) 詳細は↓です。どなたかご教授の程よろしくお願いいたします。 【やりたいこと】 同一フォルダ内にある約60個のファイルの、全てのシート内の情報を別の集計用ファイルに転記する。 (1) ファイル毎にばらばらなシート名&シート数で、これら全てのデータを集計用ファイルに転記するには?(シート数は1ファイルあたり1シートから最大13シート) (2) 以前に似たような作業をした時は、ファイル名をいちいち集計用ファイルにコピペして読み込ませたが、こうした手間を掛けずに一括処理するには? ※転記作業自体は「マクロの記憶」機能で書き出すので、それ以外の、特に始まりと終わりの部分を教えて下さい。 ※転記内容自体はあまり複雑ではなく、集計用ファイルに1シート1行として転記し、ズラッと下に120行書き込むつもりです。 説明が分かりづらい部分があればご指摘ください。よろしくお願いいたします。

  • Excelマクロの配布

    失礼いたします。 ExcelVBA初心者で、環境はExcel 2003です。 現在使用しているスケジュール表ワークシート(マクロあり)に、新マクロを追加したいと考えております。 新マクロの内容は、スケジュール表ワークシートのChangeイベントによって実行されるものです。 自分のスケジュール表の場合、ワークシートのコードにChangeイベントを追加・新マクロの記述をすればよいだけなのですが、 同僚にこの新マクロを配布しなければなりません。 なるべく同僚の手間を減らそうと考え、関係のありそうなアドインについて調べたのですが、 ワークシートのコードを変更せず(Changeイベントを追加せず)に、アドインを呼び出す方法が分かりません。 どなたか、詳しい方教えて頂けないでしょうか? よろしくお願いいたします。

  • EXCELのデータを転記したいです。

    関数やマクロは全く分からない初心者ですが、下記のことがEXCELで出来るか教えてください。 一つのBookに顧客名のあかさたな別でシートをつくり、顧客情報管理をしています。 内容は、日付と、顧客名と、電話番号、販売商品、値段、です。 今は、別のBookに、商品部門別にシートをつくり、同じ内容をコピーして貼っています。 これを、自動で転記するようにしたいのですが、出来るのでしょうか? 出来る場合、ざっくりでいいのでどういう機能を使うのか教えてください。

  • Excelで、既に作成してある月別Sheetを呼び出すマクロを作りたい

    Excelで、既に作成してある月別Sheetを呼び出すマクロを作りたいのですが教えて下さい。 2ヶ月に1回のゴルフ会の成績表を作成するのに、 1月成績、1月転記、3月成績、3月転記というように12のSheetが作ってあります。 当該月分の入力準備表を(Sheet 7月成績)に2ヶ月前の(Sheet 5月転記)のSheetを丸ごとマクロでコピーをしたいのです。  この7月と入力したら、(7月成績)のSheetを呼び出し、コピー元のSheet(5月転記)をマクロに記入出来るように設定したいのです。 例えば、   1(月)と入力したら、    11月転記Sheetから自動コピーの指定        3(月)と入力したら、     1月転記Sheetから自動コピーの指定        7(月)と入力したら、     5月転記Sheetから自動コピーの指定     年間6回の作業となります。 初心者の私が、自動記録でマクロを記入したところ、下記のようになり、同じ作業をするのに各月ごとのマクロ6本を作る必要があり、不便なので何とか1つのマクロで処理が出来ればと思い、その方法を教えて頂ければ幸いです。    Sub Macro1() ' 入力準備表作成 ' Macro1 Macro ' ' Keyboard Shortcut: Ctrl+a ' Sheets("5月転記").Select  ← 7月と入力した場合、自動的に5月転記となるように  Cells.Select Selection.Copy Sheets("7月成績").Select Cells.Select ActiveSheet.Paste Range("E5:F5").Select Range(Selection, Selection.End(xlDown)).Select Application.CutCopyMode = False   ・・・・・・

  • エクセルのマクロで結合セルに値を貼り付けたい

    お世話になります。 マクロ初心者で本やネットで色々調べたのですが分からないため 教えていただけますと幸いです。 Sheet1にはB1:B3、B4:B6…と3行縦に結合された表があり、 Sheet2のA列には単独セルに商品の名前が入っております。 膨大な量のため、Sheet2のA列に入っている情報を Sheet1の縦に結合されたセルに一つずつマクロで転記したいと 考えております。 Range("B1:B100").Value = Range("A1:A100").Value のように記載すると、2個飛ばしで入力されてしまうので、 結合されている分飛ばされないで一つずつ転記したいのですが どのようにしたら良いでしょうか。

  • EXCELのマクロでデータをクリアしたい

    仕事でエクセルのマクロを使ってリストを作る作業があるのですが、行き詰まりました。どなたか助けて下さい。お願いします。 表を作るのには二つのマクロを使っています。 【一つめのマクロ】 1.定形のウェブページからテキストをコピーする    内容は商品名や商品番号や数量です 2.エクセルの一番左上に貼り付ける 3.するとマクロが働いて貼り付けたデータはseet1に保存されて自動的に新しいシートが用意される 4.新しいシートに別のデータで1.2.を繰り返す この作業は9回まで繰り返し、一旦エクセルを閉じます。 次に再びエクセルで 【二つ目のマクロ】を立ち上げ、現れた『リスト作成』ボタンを押すと自動的に完成の表が作られます。 最初はこの方法で快調だったのですが、行き詰まりました。 ・行き詰まりその1 一つめのマクロで九つまでコピーペーストするのをくり返して、二つ目のマクロを使うと今までのデータをすべて反映して表が作られてしまいます。うまく説明できないのですが、例えば 月曜にコピーペーストして表完成。 火曜に別のデータでコピーペーストして表を完成させると、必要ない月曜のデータも含めて表が出来てしまう。 これが一つめの困りです。 ・行き詰まりその2 二つ目の困りは、ある日別の社員が一つめのマクロを使ってコピーペーストしていたところ、誤って9つ以上シートを作ってしまったらしく、作りすぎたシートを削除しました。 そうしたらフリーズしたので、再起動してやり直ししたら、そのマクロのファイルを開くたびに、上記の失敗が現れてそれ以上のデータが作ることができなくなりました。(2つめのマクロを動かすと失敗データが上書きされるのみです) 快調な時は表が完成すると、一つめのマクロでは何のデータも残りませんでした。 このような稚拙な説明しか出来ないのですが、どなたかご教授下さい

専門家に質問してみよう