No.2
- 回答日時:
Key:=Range("Selection:Selection") _
, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
Key:=Selection.Sort SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
No.1
- 回答日時:
こんにちは
選択されているセル範囲は、Selection で取得できます。
一方、適当な範囲を選択してご希望のソートを行う操作を「マクロの記録」にとってみれば、「固定範囲に対するソート」のコードが得られます。
ですので、この固定範囲を Selection になるように書き換えてあげれば、お望みのコードとなります。
御回答ありがとうございます。
修正をお願いできないでしょうか。うまくいきませんでした。
ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add2 Key:=Range("Selection:Selection") _
, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add2 Key:=Range("F:F") _
, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Sheet1").Sort
.SetRange Range("C:F")
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロを教えてください 4 2022/02/04 08:05
- Visual Basic(VBA) Excelで、マウスで範囲を選択した列文字を選択した列の左の列に結合させるVBAをご教授願います 1 2022/02/05 09:24
- Excel(エクセル) 空白行も含めてソートしたい 3 2022/02/01 23:13
- Excel(エクセル) エクセルVBA 複数行にまたがっている選択を判定するには 2 2023/05/21 21:54
- Excel(エクセル) エクセル マクロ シンプルな転記 5 2022/02/01 13:35
- Excel(エクセル) エクセル作業の効率化マクロを教えて下さい 7 2022/02/06 00:47
- Excel(エクセル) 結合セルのソートについて 5 2022/04/22 11:57
- Visual Basic(VBA) A列の最終行に合わせて範囲をコピー 2 2022/09/04 19:10
- その他(Microsoft Office) 選択行の列範囲に二重線を引く 3 2022/06/08 12:21
- Visual Basic(VBA) Excel(VBA) 特定の条件に該当する行の値、書式を同じセルにコピ&ペーストしたいです 1 2022/05/21 18:18
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
<急募>エクセルデータの関数を用いた並び替えについて
Excel(エクセル)
-
エクセルのセル統合について
Excel(エクセル)
-
IF関数
Excel(エクセル)
-
-
4
Excelの関数で起きた現象の原因がわかりません。
Excel(エクセル)
-
5
Excel 書式のクリア・値貼付けをしても書式が変わらない
Excel(エクセル)
-
6
Googleシート「A1」でなくて「A001」にしたいのですが
Excel(エクセル)
-
7
Excelの同じ数値に記号をつけたい
Excel(エクセル)
-
8
VBA エクセル で FIND でのエラーについて,教えてください。
Excel(エクセル)
-
9
複数エクセルファイルの合成
Excel(エクセル)
-
10
引数に数値、文字列の混在
Visual Basic(VBA)
-
11
Excelのテーブルでmatch関数の使い方について
Excel(エクセル)
-
12
エクセル詳しい方教えて下さい
Excel(エクセル)
-
13
なぜか「Nextに対応するForがありません」
Excel(エクセル)
-
14
同一セルに入力規則のリストと参照する設定併用できるような設定はありますでしょうか!!
Excel(エクセル)
-
15
“丸(〇/○/◯)”に似た文字…
Excel(エクセル)
-
16
データの入力規則 Excelです。 例えば、 C1セルに、 A列のデータ(B列にあいうえお"と入っ"
Excel(エクセル)
-
17
10行目にフィルターを使用して見出しがあります。列はA:DFで11行目以降(2000行ぐらい)はデー
Visual Basic(VBA)
-
18
Excel VBA 文字列のセルを反映させたいです
Visual Basic(VBA)
-
19
エクセルの気味悪い不思議
Excel(エクセル)
-
20
エクセルで比較 かつ 部分一致について
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
LEFT関数とIF関数の組み合わせ...
-
エクセルで離れた列を選択して...
-
VBA 指定した列にある日時デー...
-
「段」と「行」の違いがよくわ...
-
CSVファイルの「0落ち」にVBA
-
VLOOKUPの列番号の最大は?
-
Excelの行数、列数を増やしたい...
-
VBAで別ブックの列を検索し、該...
-
Alt+Shift+↑を一括で行うには、...
-
エクセルマクロの組み方
-
エクセルで複数列の検索をマク...
-
エクセルで住所を県と市・郡と...
-
エクセルマクロPrivate Subを複...
-
エクセルの行を65536以上に増や...
-
横軸を日付・時間とするグラフ化
-
えABのある列って
-
エクセルで?
-
アクセス 取り込み時に、桁数(...
-
エクセルマクロ 並び替え 手動...
-
列方向、行方向の定義
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで離れた列を選択して...
-
VLOOKUPの列番号の最大は?
-
「段」と「行」の違いがよくわ...
-
LEFT関数とIF関数の組み合わせ...
-
VBA 指定した列にある日時デー...
-
CSVファイルの「0落ち」にVBA
-
エクセルで複数列の検索をマク...
-
Excelの行数、列数を増やしたい...
-
エクセルマクロの組み方
-
エクセルマクロPrivate Subを複...
-
リストからデータを紐付けしたい
-
エクセルのソートで、数字より...
-
エクセルで住所を県と市・郡と...
-
VBAで別ブックの列を検索し、該...
-
VBA
-
Excel文字列一括変換
-
エクセル 重複 隣の列 一番...
-
列方向、行方向の定義
-
Alt+Shift+↑を一括で行うには、...
-
VBAで結合セルを転記する法を教...
おすすめ情報