お忙しいところ恐縮ですがみなさん知恵をお借りしたいです
sheet1:
A列 予約番号 :001/002/003/004....
B列 商品タイプ :テレビ45型/テレビ27型/乾電池単4/乾電池単3...
C列 購入者 :タナカタロウ/サトウタケル/カワカミアキラ/マキカケル
D列 購入金額 :45000円/20000円/650円/300円
このsheet1を参照してsheet2に指定順に並び変えたいです
並び変える優先順位は下記になります
B列(数字の大きい順)>D列(小さい順)>C列(カナ順)>A列(数字が小さい順)
申し訳ございません。よろしくお願いします
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
こんばんは!
当方の勘違いならごめんなさい。
>B列(数字の大きい順)
とはB列(商品タイプ)には必ず数値が入っていて、その数値のみの降順!というコトでしょうか?
そうであれば数値のみを抜き出す方法が必要ですね。
関数を使って裏技的な方法はあるみたいですが、当方は知りませんのでユーザー定義関数を作ってみました。
Alt+F11キー → VBE画面が表示されますので、メニュー → 挿入 → 標準モジュール → カーソルが点滅しているところに
↓のコードをコピー&ペーストしてください。
Function suuti(myR As Range) '//この行から//
Dim k As Long
Dim myStr As String
For k = 1 To Len(myR)
myStr = Mid(myR, k, 1)
If IsNumeric(myStr) Then
suuti = suuti & myStr
End If
Next k
suuti = Val(suuti)
End Function '//この行まで//
これで通常のワークシート関数と同じような使い方が可能です。
↓の画像のような配置で元データはSheet1にあり、Sheet2に表示するとします。
Sheet1には作業用に数列を使用しています。
E2セル(B列数値のみを抜き出し)にさっそくユーザー定義関数を使います。
E2セルに
=IF(B2="","",suuti(B2))
F2セルに
=IF(C2="","",COUNTIF(C$2:C$1000,"<"&C2)+COUNTIF(C$2:C2,C2))
G2セルに
=IF(COUNTBLANK(A2:D2),"",RANK(E2,E:E)*10^9+RANK(D2,D:D,2)*10^6+RANK(F2,F:F,2)*10^3+RANK(A2,A:A,2))
という数式を入れフィルハンドルでこれ以上データはない!という位まで下へコピーしておきます。
そしてSheet2のA2セルに
=IFERROR(INDEX(Sheet1!A:A,MATCH(SMALL(Sheet1!$G:$G,ROW(A1)),Sheet1!$G:$G,0)),"")
という数式を入れ、フィルハンドルで列・行方向にコピーすると
画像のような感じになります。
※ B列すうちを抜き出す関数は数値が飛び飛びにあってもすべて抜き出されてしまいます。
※ 作業列が目障りであれば遠く離れた列にするか
非表示にしてください。
※ 保存時は「マクロ有効ブック」として保存する必要があります。
まずはこの程度で・・・m(_ _)m
No.1
- 回答日時:
こんにちは
どういう仕組みになさりたいのかよくわかりませんが、参照しつつご質問のような結果になれば良いものとして…
1)別シートのA1セルに「=Sheet1!A1」の参照式を入力します。
2)必要な範囲まで、右方、下方にフィルコピーします
(Sheet1を参照した同じシートができます)
3)別シートの必要範囲を選択して、「データ」-「並べ替え」を選択し、
ご質問の様な優先順位と昇順/降順で設定します。
そのまま並べ替えを実行すると、Sheet1を参照したままで並べ替えが行われます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) SUMIFSと日付変換 10 2023/04/16 15:38
- Excel(エクセル) Excel 複数列のある文字を優先して1列に表示したいです 2 2022/12/03 12:07
- Excel(エクセル) Excelにて、行の最後のセルの値をコピーして別sheetに張りつけるVBAコードをご教授願います 3 2022/11/20 14:35
- Excel(エクセル) 単価シートから単価をエクセル関数で自動取得する方法 1 2023/07/02 22:00
- Excel(エクセル) エクセルデーターの並び替え 5 2022/08/06 09:59
- Excel(エクセル) Googleスプレッドシートで、あるセルの値に応じて行を自動挿入したい 急いでいます! くわしい方、 3 2023/03/06 19:05
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
- 高校 数学、円順列について。 時計回りに並べるとはどういう意味ですか? 例えば A D ◯ B C という 4 2022/09/05 23:32
- Visual Basic(VBA) VBAで、1つのエクセルで、2つのシートからもう1つのシートに条件のある転記コードを教えてください。 1 2023/03/16 18:07
- Excel(エクセル) IFERROR、SMALL関数について 2 2022/08/22 23:40
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
エクセルの2つのシートを並び替えで連動させる方法
Excel(エクセル)
-
2つのエクセルのデータを同じように並べ替えたい
Excel(エクセル)
-
別のシートで自動的に並べ替えをしたい(エクセル)
Excel(エクセル)
-
-
4
Excelで数式だけを消して、数値を残すには?
Excel(エクセル)
-
5
【エクセル】表から条件に合ったデータを別シートに順番に抽出したい
Excel(エクセル)
-
6
Excelで重複データの件数ではなく、何番目かを求める方法
Excel(エクセル)
-
7
EXCELで2つの数値のうち大きい方を採択する数式
Excel(エクセル)
-
8
【Excel関数】別シートに日付順でデータを抽出する方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
IFとIFS関数
-
Excelを無料で使うには? パソ...
-
セルの数を求めたい
-
エクセルの数式バーのフォント...
-
Excelの表示についての質問
-
再質問です。マクロの修正箇所...
-
データチェックを行うエクセル...
-
Excelに詳しい方! B列が「日...
-
西暦や和暦の表示をyyyymmdd表...
-
Excelで50個のセルに同じ文字を...
-
Excelの数式について教えてくだ...
-
Excel VBAで全ての矢印を赤色に...
-
エクセル関数を使って
-
祝日と土曜、日曜の合計をカウ...
-
xlsxファイルを保存する際にPDF...
-
Excelについて
-
エクセルVBA、別ブックへ転記す...
-
エクセルで「ページレイアウト...
-
2列に入っているデータを1列...
-
【ExcelVBA】名前を付けて保存→...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
半角カタカナをヘボン式ローマ...
-
(マクロ)vlookupの元データを同...
-
エクセルで上位バイトのセルと...
-
exselの質問です
-
Excel 大小比較演算子による「...
-
Excel VBについての質問です。
-
エクセルの問題です。絶対値の...
-
非表示列の再表示に失敗
-
職場の人から聞かれており、こ...
-
Excel関数-文字列で自動作成さ...
-
Excelデータをコピペして、ペー...
-
ユーザー定義関数をアドイン登...
-
【マクロ】for next構文について
-
エクセルの日付を編集する
-
【マクロ】VLOOKUPにて参照元に...
-
exselで最小数で並び替える関数
-
libre 表計算ソフトの計算がう...
-
エクセルで表
-
エクセルの表で1年間の曜日を...
-
西暦和暦
おすすめ情報