Excelのソートダイアログを表示する

私は保護されたシートを分類しなければならず、そして無防備 - 分類 - 保護ダンスを行う必要があります。

問題はこのようにして私が予測可能な問題で、私が（完全ではないが）Excel自身のソート機能を複製していることです。

ワークシートを保護するように設定し、[このシートのユーザを許可する]で[シートの保護]ウィンドウの[並べ替え]を有効にしましたが、期待通りに動作しません。

私はそれからExcelのソートダイアログを引き上げることを試みることを考えていました（下記参照）。これは私たちの開発者に公開されていますか？

自動フィルタを使ってみてください。これにより、ワークシートを保護したままにして、ユーザーが列をソートできるようになります。

これにより、ソートダイアログが表示されます（XL 2010でテスト済み）。現在の選択範囲にソート可能なコンテンツが含まれていない場合は、エラーメッセージ付きのMsgboxが表示されます。列全体を選択しても、通常のExcelのように選択範囲を広げるようにユーザーに促されることはありません。 1つのオプションは、ダイアログを表示する前にUsedRangeまたは別の範囲を選択することです。あなたは実験したいと思うでしょう。

Excel 2007以降には、並べ替えるフィールドを格納する新しいSortオブジェクトがありますが、このダイアログと対話する方法がまったくわかりません。

xlDialogSort引数のリストを見つけることができます。 ここに 。

 Sub ShowSortDialog()

    On Error Resume Next
    Application.Dialogs(xlDialogSort).Show
    If Err.Number = 1004 Then
        MsgBox "Place the cursor in the area to be sorted"
    End If
    Err.Clear

    End Sub