- ベストアンサー
マクロで数値の小さい順に並べたい。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
B列のデータの途中に空白がないなら Sub test01() Range(Range("B1"), Range("B1").End(xlDown)).Copy Range("A1") Range(Range("A1"), Range("A1").End(xlDown)).Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo End Sub でOKです。
関連するQ&A
- Excel 順不同数値の検索
| A | B | 100 115 110 120 130 120 110 120 このように数値が順不同で並んでいるA列を上から検索して、 B1の値と同じ値かそれ以上になる行番号(かその値)をB2に表示させるには どのようにすればよろしいでしょうか。 (上記の場合ですと、3行目の120の値をB2に表示させたい。) 出来ればVBAは使わず関数だけで実現したいと考えています。 VLOCKUP、MATCH等々、検索関数を調べましたが出来そうで出来ません。 ご教示頂けますでしょうか。
- ベストアンサー
- オフィス系ソフト
- Excel 順不同数値の検索 2
| A | B | 100 101 102 101 100 101 102 103 このように数値が順不同で並んでいるA列を上から順に検索して、 一番最初にB1の値と同じ値かそれ以上になる値をB2に表示させるには どのようにすればよろしいでしょうか。 (A列にはB1と同じ値かそれ以上になる値が必ず存在するものとします。) 前回質問の結果、B2に下記のように入力したところ、 「=SMALL(A:A,COUNTIF(A:A,"<"&B1)+1)」 B2には「101」が表示される結果となりました。 (期待結果としては一番最初にB1「101」を超える2行目の「102」を表示したい) QNo.7625709 http://okwave.jp/qa/q7625709.html で質問させてもらい回答を得ましたが、 期待とは違う結果となる場合があることがわかったため、 再質問になります。 ※前回質問ではわかりづらかったため少し内容を変えています。 ご教示頂けますでしょうか。
- ベストアンサー
- オフィス系ソフト
- 数値の大きい順にソート
数値の大きい順にソートするにはどのようにしたらよろしいでしょうか? 例えば、 @A = ("10","5","18","6","9"); という配列があるとします。 これを @B = sort @A; とすると、 10,18,5,6,9 となってしまいます。 これを 18,10,9,6,5 のように数値の大きい順に配列Bに代入したいのですが、どうしたらよいでしょうか?よろしくお願いします。
- ベストアンサー
- Perl
- エクセルマクロで重複数値と以外の数値を抽出する
数値の表を作成しておりますが、 重複数値で困っております。マクロで教えてください。 A列11~20まで1.2.2.4.5.6.6.8.9.10とあるデータに 2と6が重複しています 重複数値2.6をB列2行目以降に、C列2行目以降にはそれ以外の1.4.5.8.9.10 を抽出したいのですが、マクロで教えてください。 (offsetを使ってできますか?) また、重複数値を抽出する自作関数ってできるでしょうか? よろしくお願いいたします。
- ベストアンサー
- その他(業務ソフトウェア)
- スペースで別れたセル内の数値を若い順に並び替える
A1= b62 3d 6e b7f A2 = s6c 2d 6e s7f とA列内の各セルに、2桁ないし3桁の文字列(左はsかbもしくはブランク、 真ん中は1から7までの整数、右はアルファベットaからfまで)が各4つ~6つ程あります。これを以下の規則に従って、セル内で並び替えることはできますか?マクロだと助かります。 規則は (1)真ん中の数字が若い順に並び替え (2)真ん中の数字が同じものが複数ある場合は右のアルファベットが若い順に並び替え (3)真ん中と右の数字が同じものが複数ある場合はb、ブランク、sの順に並び替え。 つまり A64= s7b b7b 7b 7c だったら A64=b7b 7b s7b 7c このように並び替えられるようにしたいのですが、可能でしょうか。
- ベストアンサー
- その他MS Office製品
- 1分ごとの数値のマクロ
エクセルのVBAで、楽天RSSから1分ごとに株価が入るようにするマクロを作りたいのですが、初心者なので手が出ません。 作成したいものは以下のようなものです。 1分ごとに、1001行のA列に時間が入り、1001行のB列からIV列に、1行上の1000行の数値(この数値はあらかじめ入っていて変化します)が入るようにします。 新しい株価が1001行に入るようにして、時間が前の株価は1分ごとに1行ずつ下に下がっていくことになります。 10時に最初の株価が入ったのが例1でして、1分経ちますと例2のように1行繰り下がり、もう1分経ちますと例3のようにまた1行繰り下がります。 どうぞよろしくお願いします。 例1 A B C ・・・・ 1000 100 50 1001 10:00:00 100 50 1002 1003 例2 A B C ・・・・ 1000 105 45 1001 10:01:00 105 45 1002 10:00:00 100 50 1003 例3 A B C ・・・・ 1000 110 40 1001 10:02:00 110 40 1002 10:01:00 105 45 1003 10:00:00 100 50
- ベストアンサー
- オフィス系ソフト
- エクセルについて(初歩)
A1列に 1 5 18 29 4 7 ・ ・ ・ と順不同で数値が入っています。 1から順に大きくなっていく様に並べ代えたいのですが 教えてください
- 締切済み
- 画像・動画・音楽編集
- エクセルマクロで条件に該当する数値を探す
エクセル初心者です。 シート1のA1~A18に1~18の数値がランダムに入っています。(重複した値は無し) シート2の3行目C3~T3にも1~18の数値がランダムに入っています。(空欄あり、重複した数値は無し) シート2の2行目C2~T2までは左から順に1~18の数値が入っています。(順位表示) 以上の条件下で下記の作業をマクロで実行させる式を教えてください。 シート1のA1~A18の値と同じ値を、 シート2の3行目C3~T3の中からどのセル(列)に入っているかを確認して、さらに該当する列の2行目C2~T2の値を、シート3の1行目A1~R1に表示させる。 例:シート1のA1=3、A2=2、A3=1の時、 シート2のC3=3、D3=1、E3=2でした。 シート2のC2=1、D2=2、E2=3です(この行の数値は毎回同じ) 上記の時シート3にはA1=1、B1=3、C1=2となります。 *シート1のA列A1~A18とシート3の1行目A1~R1の位置関係はリンクしています。(列→行) シート1 A列 1 3 2 シート2 A列 B列 C列 D列 E列 2行見出し見出し1 2 3 3行見出し見出し3 1 2 シート3 A列 B列 C列 2 1 3 ご理解頂けたでしょうか? 初心者ですので分かりやすい回答を宜しくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- 不規則な数値を一覧表にしたいのですが
たとえば A B 3 6 4 2 1 5 5 8 9 9 1 5 と言う感じに縦にA列B列の不規則な数字が並んでいるものを B列 123456789 A1 2 列2 3 1 4 1 5 1 6 7 8 9 1 と言う感じに関数で並び替えることは可能でしょうか?? 数値は20位まで有り、同じ数値が2~3つになることも有ります。 関数が無理ならマクロでもかまいませんが、 マクロは素人なので丁重に指導していただくと幸いです。 宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excelの住所録を「あいうえお」順にならべるには?
Excelで住所録を編集しました。 名前が順不同になっているので 「あいうえお」順にしたいのですが出来ますか? 住所録にはB列にカタカナのふりがながとC列に漢字名付いています。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
お礼
merlionXX様 有難うございます。解決できました。