• 締切済み

マクロについて

お世話になっております。 マクロ初心者です。 以下の内容をマクロで行いたいのですが・・・、どうかご教示お願いします。 1~500まであるデータを300から下の数字を自動で削除し、別シートに移動させたい。 よろしくお願いいたします。

みんなの回答

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

これってやさしいのに回答者にコードを書いてくれという要求では。自分で勉強すること。 1-500かセルの値なのか行番号なのかも不明。 セル範囲のセルをすべて1つっずつ捉えるのはA2:J100の例で Sub test02() Dim cl For Each cl In Range("A2:J100") If cl.Value < 300 Then MsgBox cl.Address End If Next 空白セルは範囲に無いのか? それはどうする? ーー MsgBox cl.Address のところに本来入るべき 「1セル削除」のコードは、マクロの記録を採って勉強のこと。 マクロの記録を採るjことさえやってないのでは。

  • MARU4812
  • ベストアンサー率43% (196/452)
回答No.3

ある列にランダムに数値が入っていたとしても、データの[並び替え]して Pagedownで閾値の部分を探して、そこから上をコピーしてしまえば良いから、 マクロに頼らなくても10秒でできそう。

  • kmetu
  • ベストアンサー率41% (562/1346)
回答No.2

> 1~500まであるデータ どこにこのデータがありますか? A1からA500まで? で、1~500の数値だとしたら、300から下を削除すると、残りは301~500までの数値と決まっているので、移動するも何も、301~500を別シートに書けばいいわけですね。 もっと具体的に状態を説明できないとマクロ初心者以前の問題になります。

  • kazne
  • ベストアンサー率66% (8/12)
回答No.1

うーんと・・・ ものすごいアバウトな説明なので、意図がうまくつかめませんが・・・ 別シートって単語から、エクセルのマクロ(VBA)を使っての処理って事だと 推測できますが・・・ 1~500のデータってのは、行数の事ですか? それとも、セルの数ですか? それが分かればアドバイスできると思いますが・・・

関連するQ&A