おはようございます。 RYUさん、どうもありがとうございました。できました!! とても便利なアクションができたので今後の運用もスムーズに なります。心から感謝しています。m(__)m あのコードはおっしゃった通り、正解でした。 Call Selection.Sort(xlsSheet.Range("D2"),1, , , , , ,1,1,False,1) 私は省略している部分とそうでない部分をどうやって区別つける のかそれにずっと悩んでいました。RYUさんの説明はとてもわかり やすかったです。 本当にありがとうございました。これにめげずにもっといろんな スクリプトに挑戦していきたいと思います。