- ベストアンサー
エクセルのVBAでソートをしたい
エクセルの A列に1,1,3,2,4・・・・・というデータがあって、 B列にB,A,C,D,E・・・・・というデータがった場合、 上から順番に1A,1B,2D,3C,4Eという順番に並べ替えしたいです。 エクセル単独でやる場合は、データの並べ替えでA列を第一優先、B列を第二優先で並べ替えをすればよいのですが、 VBAに埋め込んで、ボタンを押せば並べ替えできるようにできますでしょうか？
- miya2004
- お礼率21% (690/3220)
- Visual Basic
- 回答数2
- ありがとう数0
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
こんばんは！ ＞ボタンを押せば並べ替えできるようにできますでしょうか というコトですので、Sheet上にコマンドボタンを挿入したとしての一例です。 尚、データはA1セルからあるとします。 Private Sub CommandButton1_Click() Range("A1").CurrentRegion.Sort key1:=Range("A1"), order1:=xlAscending, Header:=xlNo, _ key2:=Range("B1"), order1:=xlAscending, Header:=xlNo End Sub ※ タイトル行がある場合は当然コードも変わってきます。m(_ _)m
その他の回答 (1)
- mesihuro
- ベストアンサー率34% (23/66)
マクロの記録取ればいいだけではないのですか？？？
関連するQ&A
- ＥＸＣＥＬ ＶＢＡ
はじめまして。ＥｘｃｅｌのＶＢＡについて質問させて頂きます。 - A-B-C １ 0 あ ２ 0 い ３ 1 う ４ 1 え ５ 1 お 上記のようなデータに対して、A列の値が１の場合、B列の値をC列へコピー して、B列をゼロにする。A列の値が０の場合は、そのまま。 （結果） - A-B-C １ 0 あ ２ 0 い ３ 1 0 う ４ 1 0 え ５ 1 0 お といったようにＶＢＡを作成したいのですが、なにぶん初心者なもので、 どのように記述すればよいのかわかりません。 よろしくお願いいたします。
- ベストアンサー
- その他（プログラミング・開発）
- 【Excel VBA】複数範囲の並べ替えは可能でしょうか？
【Excel VBA】複数範囲の並べ替えは可能でしょうか？ Excel2003を使用しています。 CSVデータを元に作成された下記のような表があります。 A列…日付、B列…受注番号、C列…摘要(会社名・品名等)、D列…金額となっています。 6行目以下に上記の内容でデータが入力されていますが、会社ごとのデータ内で日付順に並べ替えをしたいのですが、VBAで複数の範囲を選択して、それぞれの範囲内での並べ替えは可能でしょうか？ A B C D 6 ○○会社 7 1/20 123 AAA 1,000 8 1/15 120 BBB 2,000 9 10 計 3,000 11 12 ××会社 13 計の1行上と下は空欄行で、以下、会社名の後にデータが続くというパターンの繰り返しで数十社分あります。 Excelのデータ⇒並べ替えでは複数選択した状態での並べ替えはできないので、VBAで可能であればと思い、質問させていただきました。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- EXCEL 空白セル削除 VBA使用せず
EXCELで、以下のような表を作成しています。 A B C D E １ あ 10 ２ い 20 ３ う 20 ４ え 10 ５ お 10 もし、B列の値が10なら、C列にA列の内容を次のように表示します。 A B C D E １ あ 10 あ ２ い 20 え ３ う 20 お ４ え 10 ５ お 10 上の例の場合、C列の2行目・3行目にはA列を反映させないということを VBA無しで行いたいのですが、関数だけで可能でしょうか？ 式はいくら複雑になっても構いません。 ヒントになるようなことでも、自分でトライしてみますので、 お教えください。 宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel VBAでのプログラム作成方法
次のようなことができるプログラムをVBAで作りたいと考えています.概略どのような考え方で作ったらいいか初心者向きに教えてください. ・Excelのシート上にA1～A100,B1～B100,C1～C100までの表を用意し,A,Bにはいずれも予めデータ(文字列)が入っています.Cは空欄です. ・フォーム上にボタンBT1,BT2,BT3を設けます. ・フォーム上にテキストボックスC,D,Eを設けます. 操作は,最初は,表の先頭のデータA1,B1,C1をテキストボックスC,D,Eにそれぞれ表示します.表示された内容に従って,BT1,BT2,BT3のいずれか一つのボタンを押す.どのボタンを押したかの記号をC1の欄に書き込みます.ボタンを押した時点で,次のデータA2,B2,C2が表示されます.これを繰り返し,データが100になった時点で,最初に戻ります. このような機能をもつプログラムを作りたいのですが,どのような作り方をすればいいでしょうか.
- ベストアンサー
- その他MS Office製品
- エクセルのデータ並び替えについて
A B C D E F 1(1) (2) (3) (4) (5) (6) 2(7) (8) (9) (0) (イ) (ロ) エクセルのデータの並べ替えにおいてですが、例えば上のようなデータを A B C D E F 1(1) (2) (3) 2(4) (5) (6) 3(7) (8) (9) 4(0) (イ) (ロ) のように並び替えたいのですが、どのように簡単に並べることが出来ますでしょうか。
- ベストアンサー
- 数学・算数
- エクセル ソート
当方、エクセル２０１０、Windows7の環境です。 エクセルで 「Ａ列」「Ｂ列」 「１」「Ｘ」 「１」「」 「２」「Ｙ」 「１」「Ｚ」 というように、「Ａ列」に数字が 「Ｂ列」には文字が入っています。 ただし、「Ｂ列」には何も入っていないこともあります。 この「Ａ列」を第一、「Ｂ列」を第二優先順位で ソートすると、 「１」「Ｘ」 「１」「Ｚ」 「１」「」 というように、何も入っていない行が 一番下にきてしまいます。 「Ｂ列」に何も入っていないのですから、 「１」のかたまりのなかで 一番上にきそうですが、 一番下にきてしまいます。 これを 「１」「」 「１」「Ｘ」 「１」「Ｚ」 の順番にソートすることは可能でしょうか？
- ベストアンサー
- Excel（エクセル）
- エクセル あいうえお順に並べ替えしたいのですが。。
はじめまして。 今、エクセルで下記のような顧客名簿を作成しています。 Ａ列：日付 Ｂ列：氏名 Ｃ列：住所 Ｄ列：マンション名 Ｅ列：電話番号 氏名であいうえお順に並べ替えしたいのですが うまくいきません(ToT) いつもの通りに『並べ替えしたい範囲を選択→データ→並べ替え →最優先されるキーＢ列選択→ＯＫ』 とやってみたのですが、あいうえお順でもなくバラバラなんです。。 かといって住所順になっているわけでもないし。。 どなたかお分かりになる方いらっしゃいましたら アドバイスお願い致します！！！
- ベストアンサー
- オフィス系ソフト
- エクセルVBA及び関数
初心者です。お教えお願いします エクセル2003です 空白行及び0をなくしたいのですが（C列を入力された時点で自動でE列のようにしたい） 関数の場合及びVBAのシートコードを両方教えていただけないでしょうか VBAのコードは勉強の為です Sheet1 A B C D E F 16 文字A 文字A 17 文字B 文字B 18 0 文字C 19 文字C 文字D 20 0 文字E 21 文字D 文字F 22 23 文字E 24 25 文字F 文字はC16～C80まで入っております B16～E80までのセルのみで行いたいのですが 他の場所は関数やグラフ等がすでに入ってますのでいじりたくありません E16～をフォームのコンボボックスのリストにしようと思ってます よろしくお願いましす
- ベストアンサー
- オフィス系ソフト
- エクセル VBA
エクセルVBAで以下のようなデータがあります。 D列の文字列と右隣のE列の文字列の2つが入っているものをA列から探し、見つかったセルの上にセルを追加し、E列の右隣のF列に入っている文字列を代入したいです。 どのようなプログラムになりますか？
- 締切済み
- Visual Basic
