• 締切済み

VBの初心者。 セルの削除について教えてください

まったくの初心者なもので、なかなか上手く動いてくれず困っています。 毎月前月のファイルをコピーして新たにデータを貼り付けして データ処理を行っているのですが、前月のデータを削除するマクロを作成したいと思っております。 1行目のデータは共通なので削除せず、2行目以降のA列~Y列のデータを削除したいのですが 月によって、削除する行の最後が違っております。 どのようにマクロを設定すればいいのかわからず、悪戦苦闘しております。 初心者の私にぜひ教えていただきたく投稿させていただきました。 宜しくお願いいたします。

みんなの回答

  • FEX2053
  • ベストアンサー率37% (7987/21355)
回答No.1

VBAですよね? .clearで消すのか、.Deleteで消すのかによって違いますが、 消すだけなら「それ以上はあり得ない」という十分広い範囲 を選択して消すだけで済みます。 例えば、絶対1000行以上は来ない・・・と言うなら Range("A2:Y1000").Clear で行けるはずです。 まあ、最終行を「もっと後ろの行から空白行を飛ばす」という 方法で見つけることは出来ます。例えば Range("A65536").End(xlUp).Select で、最終行を見つけることは出来ますが、そこまで頑張ること もないと思いますけど。

chimaki102
質問者

お礼

ありがとうございます。 削除できました。

関連するQ&A

  • 初心者です。EXCELのマクロを作ろうとして、困っています。

    初心者です。EXCELのマクロを作ろうとして、困っています。 やりたいことは、以下の通りです。 1行目には、年度並びで月が並んでいます(4月→3月)。 2行目は、空欄ですが、ここに後述のデータをコピーします。 セルA5には、コピーしたいデータが記載されています。 セルA6には、セルA5にデータを記載した「翌月の日付(YYMMDD)」が記載されています。 A6の日付を「前月」にして、2行目の該当月(前月)のセルに、セルA5のデータをコピーします。 以上のことをやりたいのですが、どの様にすれば良いか教えてください。 よろしくお願いします。

  • マクロにて空白のセルを一括して消去でなく削除したい

    空白のセルを一括して、空白セルについた色も含めてマクロで全て削除したい。 現在のデータ(仕様)について 1.Sheet2に列ごとにセルに色をつけ、データもあるとします。 2.A列10行・B列6行・C;列18行というように、列によってデータの入った範囲が違います。 3.どの行も途中に空白セルはなく、詰めたデータです。 以上です マクロで一括処理したいと思いますが、このようなことができるコードを教えて頂けませんか。よろしくお願いします。

  • 特定文字列以下のセル削除

    こんにちは。 特定の文字列を含むセルから5行削除するマクロを作りたいのですが、 どのようにするとよいでしょうか。 特定文字列は、各列に1つあり、行の位置はバラバラです。 その特定文字列を含み以下5行分のセルを削除し、上に詰めたいと考えています。 初心者ゆえ、ご指導ください。

  • 太字の入ったセルを削除したい

    office2000を使用しています。 エクセルで5列、数百行程度のデーターを持ったシートがかなりたくさんあります。 いくつかのセルには太字が記入されています。 マクロを利用し、この太字で記入されたセルだけを検出し、そのセルが含まれる行を削除することは出来るでしょうか。 よろしくご教示ください。

  • シート内の一部のセルを別シートにコピー

    Excelのマクロ(VBA)の記載方法について お分かりになる箇所だけでも結構ですので、 どなたかご教授を願い致します。 シートX   A    B   C  1 data1 data2 data3 2 x   data7 data8 3 data4 data5 data6 4 data7 data8 data9 シート Y   A   B   C    D 1 length 3  (任意) (任意) 2 xxxx (任意) (任意) (任意) 3 zzz  (任意) (任意) (任意) 4 (空白)(任意) (任意) (任意) 上記のような2つのシート(同一Excelファイル内)があって、 シートXの一部のセルを次の条件(1~4)でシートYにコピーしたい場合 1.コピー元の列の数は、シートYの "length"と書かれたセルの右となりの数字   とする(上記では3なので、A,B,C列をコピー対象) 2.コピー元の行の数は、シートXの1~4行目までとするが、   シートXのA列のセルが"x"だったら、その行は全てコピーしない。 3.コピー先(Y)の列は、コピー元(X)の列と一つずれてコピー(BならCに、CならDに) 4.コピー先(Y)の行は、シートYのA列で1行からで始めて空白セルになった行からコピー開始。 (上記では、A列で空白セルのある4行目からコピー) 上記条件で、下記のシートYを作成したいのですが、 この場合どようなマクロ(VBA)で実現できますでしょうか。 コピー結果(シートY)  A     B   C   D 1 length  3  (任意) (任意) 2 xxxx  (任意) (任意) (任意) 3 zzz   (任意) (任意) (任意) 4 (空白) data1 data2 data3 5 (任意) data4 data5 data6 6 (任意) data7 data8 data9

  • エクセル 網掛けしてあるセルの行を残してそれ以外の行を削除するVBA

    windows-xp、エクセル2003を使っています。 エクセルデータがA列からU列まであります。 (1000件程かな、時々AA列まである時もあります) G列には、網掛けしてあるセルがあります。 そこで!! 網掛けしてあるセルの行だけを残して、網掛けがされていない行のデータを一気に削除する!というマクロ(VBA)を作りたいのですが、どうすればよいでしょうか? VBAまだ、よくわかっていないので、初心者レベルでわかりやすく教えてくださると助かります。 宜しくお願い致しますm(_ _)m

  • 【マクロ】初心者です。色々教えていただきたいことがありますのでご教授く

    【マクロ】初心者です。色々教えていただきたいことがありますのでご教授ください。 やりたいことは下記になります。 元データ A B C 1 2 3 4 5 6 新データ D E F 3 1 2 3 1 2 6 4 5 6 4 5 かなり簡略化で書いていますがやりたいことを記述していきます。 (1)マクロの記述しているブックのシート1にボタンを作成する。 ボタンから別のブックの元データ(CSVファイル)を選択。 元データのブックのシート1をマクロブックのシート2にコピーします。 コピーデータを加工、修正していきます。 (2)次に列のデータを入れ替えます。 これは法則がないので一行目の行をみて判断します。 (ex.C行の列ならD行に挿入する) (3)列を入れ替えた後、 3 1 2 6 4 5 になっていますがこれを 3 1 2 3 1 2 6 4 5 6 4 5 というふうに一行を二行にしていきます。 (4)最後にorder byします。 1、3、2列目の順にorder byします。 以上がやりたいことになります。 特に(1)がよくわからずボタンを使用時に 別ブックのデータをコピー、貼り付けるのは どうしたらいいのでしょうか? どなたかご教授ください。 よろしくお願いします。

  • オートフィルで抽出後削除するマクロ

    いつもお世話になっております。 あるエクセルの表(1行目見出し、2行目以降データ)で、 A列は1~10がランダムに入っています。 (約4,000行、作業の度に変化します) オートフィルでA列を『2以上』で抽出、 (ここまでのマクロは判ります) 見えてる行を全削除(1行目の見出しは取っておく) はどのようなマクロを記述したらいいでしょうか? よろしくお願いいたします。

  • エクセルのシートを同時に行削除、行挿入させて自動連動させたい

    エクセルで、横(列)256列以上のデータを入力したいため、シートを分けざるをえません。その場合、次のようなことがしたいとき、どのようにすればよろしいでしょうか?(やりたいことの結論下記(3)になります。) エクセルのシートが2つ以上あるとします。 (1)「sheet1」には、基本データ(名簿録のようなもの・氏名ふりがなアイウエオ順配列) (2)ふたつめ以降のシートには、毎月変更するデータを入力し、「sheet1」の名簿の個々のIDに対応したそれぞれ同じ行番号に入力することになります。 (3)「sheet1」で行削除(名簿対象者解約)や行挿入(新規契約者)を任意の場所で行いたい。それに連動して、2つ目以降のシートでも同じ列で行削除・行挿入を自動でしたい。 ★この簡易システムを作成するのはマクロ初心者の私であり、日々の入力作業するのはエクセルそのものが初心者である他者となります。 ★行挿入、行削除のときだけシートの同時選択を手作業でしてもらうことは想定していません。そのあたりをも含めた自動化の智恵がでてこないのです。 以上、よろしくお願いします。

  • VBマクロ 色の付いたセルを含む行をコピーしたい。

    VB初心者です。 こちらでご指導頂きながら勉強しております。 今回もどなたかご教授お願い致します。 G列~R列内の色の付いたセルを含む行を 次のシートにコピーしたいのですが… マクロを組んで実行したいと思っております。 どなたかアドバイス宜しくお願い致します。

専門家に質問してみよう