Excelで
1 2 3 4 5 6 7 8 9 10 ・・・100
A班 B班 C班 D班 E班 F班 G班 H班 I班 J班
50 20 23 22 10 35 62 21 16 15
という並びのものを列を入れ替えて、
1 2 3 8 5 16 17 4 9 10 ・・・100
A班 B班 C班 H班 E班 P班 Q班 D班 I班 J班
50 20 23 21 10 55 41 22 16 15
というように毎回指定の順序で列の並び替えを行いたいと考えています。
それぞれの列には100行程度データがぶら下がっています。
手作業で入替を行うと毎回時間がかかるため、一回フォームを作って
自動化したいのですが、方法がわかりません。
VBAかプログラムを使えばできそうな気がするのですが、
何か参考になるものがあれば教えていただけるとありがたいです。
Excelの列の入れ替えツールを探したところ、「入替え君」「DB構造変更「そよ風」」
といったツールがありましたが、自動化できるものはありませんでした。
よろしくお願いします。
No.3ベストアンサー
- 回答日時:
検証してみましたが、特にVBAを使わなくてもできると思います。
VBAも、簡単なコードで済みますが、指定順序を100個ともなると、ユーザー設定で、コードを入れるのにも、間違えずに入れていただくにも大変です。毎回の指定順序があるなら、まず、その指定順序番号をどこかに用意してください。(ワークシート上です)
ただし、文字列でなくてはいけませんから、数字は、書式で、「文字列」にしておいてください。1度、設定したら、毎回設定する必要ありません。
その文字列の行を、ツール-オプション-ユーザー設定リストを開けて、
リストの取り込み元範囲で、その範囲を決定して、「インポート」してください。
(不要になったら、リストの中から選んで、削除できます)
*正しく設定されたかリストの中を確認してください。
次に、並び替えする範囲を選択してから、
データ-並べ替え-オプション-
並べ替え順序 の指定で、
先ほどの数字を選んでください。
方向は、列単位
「OK」
で並び替えが終了します。
(並べ替えデータは、特に、数字が、文字列になっていなくてもよいようです)
**
それを、マクロ化されたいのでしたら、記録マクロで十分だと思います。
既に設定された順序があれば、おそらく専門的なプログラムよりも、はるかに良いものが出来上がるはずです。
おおっ、こんな方法があったんですね。
できました!すばらしい。
目からウロコ状態です。
ありがとうございました。
お礼が遅くなってすみません。
(一週間前に書き込んだのですが、反映されていなかったのに今日気づきました)
No.2
- 回答日時:
毎回全く同じ列を入れ替えるのでしょうか?
それならば下記方法が簡単です。
ツールメニュー→マクロ→新しいマクロの記憶を選択します。
その状態で手作業で入替を行ってください。
入替が終わったら記憶の終了。
これで手作業で行った入替がマクロ化されます。
後はツール→マクロ→マクロで同じ操作が行われます。
回答、ありがとうございました。
マクロも検討してみたのですが、
No.3の方の方法が一番融通がききそうですので
そちらで対応することにしました。
ありがとうございました。
お礼が遅くなってすみません。
(一週間前に書き込んだのですが、反映されていなかったのに今日気づきました)
No.1
- 回答日時:
並べ替えをするためのルールのようなものは
毎回定まっているのでしょうか?
それがあればなんとかVBAを使用して自動化できるかもしれません。
決められたルールが定まっていないようであれば、
結局手作業ではありますが、一番最後の行に並び順の
数字を1から入力して、それをキーに並べ変えれば
少しは手間が省けると思います。
ルールがあるのであれば、差し支えない程度に
教えていただければ何か助言ができるかもしれません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
準・究極の選択
「年収1000万円で一生カレーライス」か 「年収180万円で毎日何でも食べ放題」 あなたはどちらを選びますか?
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
vba セルに入力した時間をマクロで受け取るには?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで縦に並んだデータを...
-
Excel2000:Ontimeメソッドで特...
-
ExcelのVBA。public変数の値が...
-
既存のマクロをコンボボックス...
-
エクセルで別のセルにあるふり...
-
右クリックによるイベントマク...
-
Excel マクロ VBA プロシー...
-
Excel・Word リサーチ機能を無...
-
一つのTeratermのマクロで複数...
-
Excelで特定の文字のところで自...
-
特定のPCだけ動作しないVBAマク...
-
マクロ実行時、ユーザーフォー...
-
エクセルに張り付けた写真のフ...
-
エクセルでA1セルに時刻をリア...
-
エクセル マクロ 指定日の指定...
-
EXCELのマクロの重複起動...
-
VBAの記述の、Sub SetValue()など
-
エクセルのマクロについて教え...
-
VC++ 2008 EXPRESS "_T"識別子...
-
ワードで算用数字を漢数字に変...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
エクセルで特定の列が0表示の場...
-
Excel マクロ VBA プロシー...
-
メッセージボックスのOKボタ...
-
一つのTeratermのマクロで複数...
-
ExcelのVBA。public変数の値が...
-
エクセルに張り付けた写真のフ...
-
Excel VBAからAccessマクロを実...
-
TERA TERMを隠す方法
-
Excel マクロでShearePoint先の...
-
ExcelVBAでPDFを閉じるソース
-
特定文字のある行の前に空白行...
-
マクロ実行時、ユーザーフォー...
-
wordを起動した際に特定のペー...
-
エクセルで別のセルにあるふり...
-
ソース内の行末に\\
-
マクロで空白セルを詰めて別シ...
-
【EXCEL VBA】オートシェイプを...
-
エクセルのマクロをセルの値に...
おすすめ情報